sig
  type error_details = {
    error_code : int;
    module_name : string;
    function_name : string;
    error_message : string;
  }
  val format_float : string -> float -> string
  val floata : float -> string
  val compare_float : ?tol:float -> float -> float -> bool
end