1DEFFNZ(X,Y)=X-Y*INT(X/Y)
2END