/* Modular addition */
long xpymn(x,y,n) long x,y,n; {
   long result;

   if (n<=0)  return 0;
   result = (x+y) % n;

   return result;
}