module Numbers:sig
..end
typerational =
int64 * int64
typesrational =
int32 * int32
val float_of_rational : int64 * int64 -> float
val float_of_srational : int32 * int32 -> float
val string_of_rational : int64 -> int64 -> string
val string_of_srational : int32 -> int32 -> string