Make.Numberval one : tval zero : tval if_ : Boolean.var -> then_:t -> else_:t -> tval (<) : t -> t -> Boolean.varval (>) : t -> t -> Boolean.varval (<=) : t -> t -> Boolean.varval (>=) : t -> t -> Boolean.varval (=) : t -> t -> Boolean.varval of_bits : Boolean.var list -> tval to_bits : t -> Boolean.var listval of_pow_2 : [ `Two_to_the of int ] -> t