type t = float val to_float : t -> float val to_int : t -> int val to_string: t -> string val of_float : float -> t val of_int : int -> t val of_string: string -> t