Function: _%=_
C-Name: gmode
Prototype: &G
Section: symbolic_operators
Help: x%=y: shortcut for x=x%y.
Description:
 (*small, small):small:parens            $1 = smodss($1, $2)
 (*int, small):int:parens                $1 = modis($1, $2)
 (*int, int):int:parens                  $1 = modii($1, $2)
 (*pol, gen):gen:parens                  $1 = gmod($1, $2)
 (*gen, small):gen:parens                $1 = gmodgs($1, $2)
 (*gen, gen):gen:parens                  $1 = gmod($1, $2)
