include "primitives.alh" Integer function remainder(a : Integer, b: Integer): return a - ((a / b) * b)!