module Nat:sig..end
typet =string
val zero : tval one : tval of_string : string -> tval of_int : int -> tval of_big_int : Big_int.big_int -> tval to_big_int : t -> Big_int.big_intval add : t -> t -> tval mul : t -> t -> tval sub : t -> t -> tval div : t -> t -> tval neg : t -> tval add_int : int -> t -> tval mul_int : int -> t -> tval compare : t -> t -> int