sig
external ( + ) : float -> float -> float = "%addfloat"
external ( - ) : float -> float -> float = "%subfloat"
external ( * ) : float -> float -> float = "%mulfloat"
external ( / ) : float -> float -> float = "%divfloat"
external ( % ) : float -> float -> float = "caml_fmod_float" "fmod" "float"
external ( ** ) : float -> float -> float = "caml_power_float" "pow"
"float"
val ( < ) : float -> float -> bool
val ( > ) : float -> float -> bool
val ( = ) : float -> float -> bool
val ( <= ) : float -> float -> bool
val ( >= ) : float -> float -> bool
end