sig
val is_ascii_hex_digit : Uucp.uchar -> bool
val is_hex_digit : Uucp.uchar -> bool
type numeric_type = [ `De | `Di | `None | `Nu ]
val pp_numeric_type : Format.formatter -> Uucp.Num.numeric_type -> unit
val numeric_type : Uucp.uchar -> Uucp.Num.numeric_type
type numeric_value = [ `Frac of int * int | `NaN | `Num of int64 ]
val pp_numeric_value : Format.formatter -> Uucp.Num.numeric_value -> unit
val numeric_value :
Uucp.uchar -> [ `Frac of int * int | `NaN | `Num of int64 ]
end