Def a  n
Def == if 0a a  n ; ((-a) rem n)=0 -((-a)  n) else -((-a)  n)+-1 fi

is mentioned by

Thm* a:, n:. a = (a  n)n+(a mod n)

[div_floor_mod_sum]

Try larger context: StandardLIB IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html