1void 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