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  }