sig
val ( =+ ) : int Pervasives.ref -> int -> unit
val ( =+. ) : float Pervasives.ref -> float -> unit
val min : int -> int -> int
val max : int -> int -> int
val ( * ) : int -> int -> int
val ( + ) : int -> int -> int
val ( - ) : int -> int -> int
val sign : int -> int
val ( /+ ) : int -> int -> int
val ( /- ) : int -> int -> int
end