ProdWord_bla(gtL,gtRes,lnL)1 void ProdWord_bla ( gtL, gtRes, lnL )
2     int *gtL, *gtRes;
3     int lnL;
4 {
5     while ( 1 < lnL )
6     {
7         *gtRes++ = *gtL++;
8         --lnL;
9     }
10     if ( 0 < lnL )
11         if ( gtL[0] == gtL[1] )
12             *gtRes++ = 0;
13 }
14