/* if allocation flag is zero */
if ( AllocFlag == 0 ) ...
/ * if allocating new member * /
if ( AllocFlag == 0 ) ...
0
/ if allocaing new member /
if ( AllocFlag == NEW_MEMBER )...
for ( i = 0; i < ElmtCount; i++ )
{
/* Use right shift to divide by two. Substituting the
right-shift operation cuts the loop time by 75%. */
Elmt[ i ] = Em1t[ i ]>> 1;
}