module type S = sig

type fpclass = Stdlib.fpclass =
  | FP_normal 
  | FP_subnormal 
  | FP_zero 
  | FP_infinite 
  | FP_nan 

(*
type fpclass =
  | FP_normal 
  | FP_subnormal 
  | FP_zero 
  | FP_infinite 
  | FP_nan 
*)
(** @since 4.07.0:
    type fpclass = Stdlib.fpclass =
      | FP_normal 
      | FP_subnormal 
      | FP_zero 
      | FP_infinite 
      | FP_nan 
 *)


type t = float

(*
type t = float
*)
(** @since 4.07.0: type t = float
 *)


module Array = Float.Array

(*

module Array :
sig type t = Stdcompat__init.floatarray val length : t -> int
val get : t -> int -> float val set : t -> int -> float -> unit
val make : int -> float -> t val create : int -> t
val init : int -> (int -> float) -> t val append : t -> t -> t
val concat : t list -> t val sub : t -> int -> int -> t val copy : t -> t
val fill : t -> int -> int -> float -> unit
val blit : t -> int -> t -> int -> int -> unit val to_list : t -> float list
val of_list : float list -> t val iter : (float -> unit) -> t -> unit
val iteri : (int -> float -> unit) -> t -> unit
val map : (float -> float) -> t -> t
val mapi : (int -> float -> float) -> t -> t
val fold_left : ('a -> float -> 'a) -> 'a -> t -> 'a
val fold_right : (float -> 'a -> 'a) -> t -> 'a -> 'a
val iter2 : (float -> float -> unit) -> t -> t -> unit
val map2 : (float -> float -> float) -> t -> t -> t
val for_all : (float -> bool) -> t -> bool
val exists : (float -> bool) -> t -> bool val mem : float -> t -> bool
val mem_ieee : float -> t -> bool
val sort : (float -> float -> int) -> t -> unit
val stable_sort : (float -> float -> int) -> t -> unit
val fast_sort : (float -> float -> int) -> t -> unit
val to_seq : t -> float Stdcompat__seq.t
val to_seqi : t -> (int * float) Stdcompat__seq.t
val of_seq : float Stdcompat__seq.t -> t
val map_to_array : (float -> 'a) -> t -> 'a array
val map_from_array : ('a -> float) -> 'a array -> t
external unsafe_get : floatarray -> int -> float = "%floatarray_unsafe_get"
external unsafe_set :
  floatarray -> int -> float -> unit = "%floatarray_unsafe_set"
end

(*
module Array :
sig type t = Stdcompat__init.floatarray val length : t -> int
val get : t -> int -> float val set : t -> int -> float -> unit
val make : int -> float -> t val create : int -> t
val init : int -> (int -> float) -> t val append : t -> t -> t
val concat : t list -> t val sub : t -> int -> int -> t val copy : t -> t
val fill : t -> int -> int -> float -> unit
val blit : t -> int -> t -> int -> int -> unit val to_list : t -> float list
val of_list : float list -> t val iter : (float -> unit) -> t -> unit
val iteri : (int -> float -> unit) -> t -> unit
val map : (float -> float) -> t -> t
val mapi : (int -> float -> float) -> t -> t
val fold_left : ('a -> float -> 'a) -> 'a -> t -> 'a
val fold_right : (float -> 'a -> 'a) -> t -> 'a -> 'a
val iter2 : (float -> float -> unit) -> t -> t -> unit
val map2 : (float -> float -> float) -> t -> t -> t
val for_all : (float -> bool) -> t -> bool
val exists : (float -> bool) -> t -> bool val mem : float -> t -> bool
val mem_ieee : float -> t -> bool
val sort : (float -> float -> int) -> t -> unit
val stable_sort : (float -> float -> int) -> t -> unit
val fast_sort : (float -> float -> int) -> t -> unit
val to_seq : t -> float Stdcompat__seq.t
val to_seqi : t -> (int * float) Stdcompat__seq.t
val of_seq : float Stdcompat__seq.t -> t
val map_to_array : (float -> 'a) -> t -> 'a array
val map_from_array : ('a -> float) -> 'a array -> t
val unsafe_get : t -> int -> float val unsafe_set : t -> int -> float -> unit
end
*)

*)
(** @since 4.08.0: module Array = Float.Array
 *)


module ArrayLabels = Float.ArrayLabels

(*

module ArrayLabels :
sig type t = Stdcompat__init.floatarray val length : t -> int
val get : t -> int -> float val set : t -> int -> float -> unit
val make : int -> float -> t val create : int -> t
val init : int -> f:(int -> float) -> t val append : t -> t -> t
val concat : t list -> t val sub : t -> pos:int -> len:int -> t
val copy : t -> t val fill : t -> pos:int -> len:int -> float -> unit
val blit : src:t -> src_pos:int -> dst:t -> dst_pos:int -> len:int -> unit
val to_list : t -> float list val of_list : float list -> t
val iter : f:(float -> unit) -> t -> unit
val iteri : f:(int -> float -> unit) -> t -> unit
val map : f:(float -> float) -> t -> t
val mapi : f:(int -> float -> float) -> t -> t
val fold_left : f:('a -> float -> 'a) -> init:'a -> t -> 'a
val fold_right : f:(float -> 'a -> 'a) -> t -> init:'a -> 'a
val iter2 : f:(float -> float -> unit) -> t -> t -> unit
val map2 : f:(float -> float -> float) -> t -> t -> t
val for_all : f:(float -> bool) -> t -> bool
val exists : f:(float -> bool) -> t -> bool val mem : float -> set:t -> bool
val mem_ieee : float -> set:t -> bool
val sort : cmp:(float -> float -> int) -> t -> unit
val stable_sort : cmp:(float -> float -> int) -> t -> unit
val fast_sort : cmp:(float -> float -> int) -> t -> unit
val to_seq : t -> float Stdcompat__seq.t
val to_seqi : t -> (int * float) Stdcompat__seq.t
val of_seq : float Stdcompat__seq.t -> t
val map_to_array : f:(float -> 'a) -> t -> 'a array
val map_from_array : f:('a -> float) -> 'a array -> t
external unsafe_get : floatarray -> int -> float = "%floatarray_unsafe_get"
external unsafe_set :
  floatarray -> int -> float -> unit = "%floatarray_unsafe_set"
end

(*
module ArrayLabels :
sig type t = Stdcompat__init.floatarray val length : t -> int
val get : t -> int -> float val set : t -> int -> float -> unit
val make : int -> float -> t val create : int -> t
val init : int -> f:(int -> float) -> t val append : t -> t -> t
val concat : t list -> t val sub : t -> pos:int -> len:int -> t
val copy : t -> t val fill : t -> pos:int -> len:int -> float -> unit
val blit : src:t -> src_pos:int -> dst:t -> dst_pos:int -> len:int -> unit
val to_list : t -> float list val of_list : float list -> t
val iter : f:(float -> unit) -> t -> unit
val iteri : f:(int -> float -> unit) -> t -> unit
val map : f:(float -> float) -> t -> t
val mapi : f:(int -> float -> float) -> t -> t
val fold_left : f:('a -> float -> 'a) -> init:'a -> t -> 'a
val fold_right : f:(float -> 'a -> 'a) -> t -> init:'a -> 'a
val iter2 : f:(float -> float -> unit) -> t -> t -> unit
val map2 : f:(float -> float -> float) -> t -> t -> t
val for_all : f:(float -> bool) -> t -> bool
val exists : f:(float -> bool) -> t -> bool val mem : float -> set:t -> bool
val mem_ieee : float -> set:t -> bool
val sort : cmp:(float -> float -> int) -> t -> unit
val stable_sort : cmp:(float -> float -> int) -> t -> unit
val fast_sort : cmp:(float -> float -> int) -> t -> unit
val to_seq : t -> float Stdcompat__seq.t
val to_seqi : t -> (int * float) Stdcompat__seq.t
val of_seq : float Stdcompat__seq.t -> t
val map_to_array : f:(float -> 'a) -> t -> 'a array
val map_from_array : f:('a -> float) -> 'a array -> t
val unsafe_get : t -> int -> float val unsafe_set : t -> int -> float -> unit
end
*)

*)
(** @since 4.08.0: module ArrayLabels = Float.ArrayLabels
 *)


external cbrt : float -> float = "caml_cbrt_float" "caml_cbrt"[@@unboxed ]
[@@noalloc ]

(*
val cbrt : float -> float
*)
(** @since 4.13.0:
    external cbrt : float -> float = "caml_cbrt_float" "caml_cbrt"[@@unboxed
                                                                    ]
    [@@noalloc ]
 *)


external exp2 : float -> float = "caml_exp2_float" "caml_exp2"[@@unboxed ]
[@@noalloc ]

(*
val exp2 : float -> float
*)
(** @since 4.13.0:
    external exp2 : float -> float = "caml_exp2_float" "caml_exp2"[@@unboxed
                                                                    ]
    [@@noalloc ]
 *)


external log2 : float -> float = "caml_log2_float" "caml_log2"[@@unboxed ]
[@@noalloc ]

(*
val log2 : float -> float
*)
(** @since 4.13.0:
    external log2 : float -> float = "caml_log2_float" "caml_log2"[@@unboxed
                                                                    ]
    [@@noalloc ]
 *)


external acosh : float -> float = "caml_acosh_float" "caml_acosh"[@@unboxed ]
[@@noalloc ]

(*
val acosh : float -> float
*)
(** @since 4.13.0:
    external acosh : float -> float = "caml_acosh_float" "caml_acosh"
    [@@unboxed ][@@noalloc ]
 *)


external asinh : float -> float = "caml_asinh_float" "caml_asinh"[@@unboxed ]
[@@noalloc ]

(*
val asinh : float -> float
*)
(** @since 4.13.0:
    external asinh : float -> float = "caml_asinh_float" "caml_asinh"
    [@@unboxed ][@@noalloc ]
 *)


external atanh : float -> float = "caml_atanh_float" "caml_atanh"[@@unboxed ]
[@@noalloc ]

(*
val atanh : float -> float
*)
(** @since 4.13.0:
    external atanh : float -> float = "caml_atanh_float" "caml_atanh"
    [@@unboxed ][@@noalloc ]
 *)


external erf : float -> float = "caml_erf_float" "caml_erf"[@@unboxed ]
[@@noalloc ]

(*
val erf : float -> float
*)
(** @since 4.13.0:
    external erf : float -> float = "caml_erf_float" "caml_erf"[@@unboxed ]
    [@@noalloc ]
 *)


external erfc : float -> float = "caml_erfc_float" "caml_erfc"[@@unboxed ]
[@@noalloc ]

(*
val erfc : float -> float
*)
(** @since 4.13.0:
    external erfc : float -> float = "caml_erfc_float" "caml_erfc"[@@unboxed
                                                                    ]
    [@@noalloc ]
 *)

val zero : float
(** @since 4.08.0: val zero : float *)

val one : float
(** @since 4.08.0: val one : float *)

val minus_one : float
(** @since 4.08.0: val minus_one : float *)


external fma : float -> float -> float -> float = "caml_fma_float" "caml_fma"
[@@unboxed ][@@noalloc ]

(*
val fma : float -> float -> float -> float
*)
(** @since 4.08.0:
    external fma :
      float -> float -> float -> float = "caml_fma_float" "caml_fma"[@@unboxed
                                                                    ]
    [@@noalloc ]
 *)

val succ : float -> float
(** @since 4.08.0: val succ : float -> float *)

val pred : float -> float
(** @since 4.08.0: val pred : float -> float *)

val is_finite : float -> bool
(** @since 4.08.0: val is_finite : float -> bool *)

val is_infinite : float -> bool
(** @since 4.08.0: val is_infinite : float -> bool *)

val is_nan : float -> bool
(** @since 4.08.0: val is_nan : float -> bool *)

val is_integer : float -> bool
(** @since 4.08.0: val is_integer : float -> bool *)


external trunc : float -> float = "caml_trunc_float" "caml_trunc"[@@unboxed ]
[@@noalloc ]

(*
val trunc : float -> float
*)
(** @since 4.08.0:
    external trunc : float -> float = "caml_trunc_float" "caml_trunc"
    [@@unboxed ][@@noalloc ]
 *)


external round : float -> float = "caml_round_float" "caml_round"[@@unboxed ]
[@@noalloc ]

(*
val round : float -> float
*)
(** @since 4.08.0:
    external round : float -> float = "caml_round_float" "caml_round"
    [@@unboxed ][@@noalloc ]
 *)


external next_after :
  float -> float -> float = "caml_nextafter_float" "caml_nextafter"[@@unboxed
                                                                    ]
[@@noalloc ]

(*
val next_after : float -> float -> float
*)
(** @since 4.08.0:
    external next_after :
      float -> float -> float = "caml_nextafter_float" "caml_nextafter"
    [@@unboxed ][@@noalloc ]
 *)


external copy_sign :
  float -> float -> float = "caml_copysign_float" "caml_copysign"[@@unboxed ]
[@@noalloc ]

(*

external copy_sign :
  float -> float -> float = "caml_copysign_float" "caml_copysign" "float"

(*
val copy_sign : float -> float -> float
*)

*)
(** @since 4.08.0:
    external copy_sign :
      float -> float -> float = "caml_copysign_float" "caml_copysign"
    [@@unboxed ][@@noalloc ]
 *)


external sign_bit :
  ((float)[@unboxed ]) -> bool = "caml_signbit_float" "caml_signbit"[@@noalloc
                                                                    ]

(*
val sign_bit : float -> bool
*)
(** @since 4.08.0:
    external sign_bit :
      ((float)[@unboxed ]) -> bool = "caml_signbit_float" "caml_signbit"
    [@@noalloc ]
 *)

val min : t -> t -> t
(** @since 4.08.0: val min : t -> t -> t *)

val max : float -> float -> float
(** @since 4.08.0: val max : float -> float -> float *)

val min_max : float -> float -> (float * float)
(** @since 4.08.0: val min_max : float -> float -> (float * float) *)

val min_num : t -> t -> t
(** @since 4.08.0: val min_num : t -> t -> t *)

val max_num : t -> t -> t
(** @since 4.08.0: val max_num : t -> t -> t *)

val min_max_num : float -> float -> (float * float)
(** @since 4.08.0: val min_max_num : float -> float -> (float * float) *)

external neg : float -> float = "%negfloat"
(** @since 4.07.0: external neg : float -> float = "%negfloat" *)

external add : float -> float -> float = "%addfloat"
(** @since 4.07.0: external add : float -> float -> float = "%addfloat" *)

external sub : float -> float -> float = "%subfloat"
(** @since 4.07.0: external sub : float -> float -> float = "%subfloat" *)

external mul : float -> float -> float = "%mulfloat"
(** @since 4.07.0: external mul : float -> float -> float = "%mulfloat" *)

external div : float -> float -> float = "%divfloat"
(** @since 4.07.0: external div : float -> float -> float = "%divfloat" *)


external rem : float -> float -> float = "caml_fmod_float" "fmod"[@@unboxed ]
[@@noalloc ]

(*

external rem : float -> float -> float = "caml_fmod_float" "fmod" "float"

(*
external rem : float -> float -> float = "fmod_float" "fmod" "float"
*)

*)
(** @since 4.07.0:
    external rem : float -> float -> float = "caml_fmod_float" "fmod"
    [@@unboxed ][@@noalloc ]
 *)

external abs : float -> float = "%absfloat"
(** @since 4.07.0: external abs : float -> float = "%absfloat" *)

val infinity : float
(** @since 4.07.0: val infinity : float *)

val neg_infinity : float
(** @since 4.07.0: val neg_infinity : float *)

val nan : float
(** @since 4.07.0: val nan : float *)

val pi : float
(** @since 4.07.0: val pi : float *)

val max_float : float
(** @since 4.07.0: val max_float : float *)

val min_float : float
(** @since 4.07.0: val min_float : float *)

val epsilon : float
(** @since 4.07.0: val epsilon : float *)

external of_int : int -> float = "%floatofint"
(** @since 4.07.0: external of_int : int -> float = "%floatofint" *)

external to_int : float -> int = "%intoffloat"
(** @since 4.07.0: external to_int : float -> int = "%intoffloat" *)


external of_string : string -> float = "caml_float_of_string"

(*
external of_string : string -> float = "float_of_string"
*)
(** @since 4.07.0:
    external of_string : string -> float = "caml_float_of_string"
 *)

val of_string_opt : string -> float option
(** @since 4.07.0: val of_string_opt : string -> float option *)

val to_string : float -> string
(** @since 4.07.0: val to_string : float -> string *)


external classify_float :
  ((float)[@unboxed ]) -> fpclass = "caml_classify_float"
    "caml_classify_float_unboxed"[@@noalloc ]

(*

external classify_float : float -> fpclass = "caml_classify_float"

(*
external classify_float : float -> fpclass = "classify_float"
*)

*)
(** @since 4.07.0:
    external classify_float :
      ((float)[@unboxed ]) -> fpclass = "caml_classify_float"
        "caml_classify_float_unboxed"[@@noalloc ]
 *)


external pow : float -> float -> float = "caml_power_float" "pow"[@@unboxed ]
[@@noalloc ]

(*

external pow : float -> float -> float = "caml_power_float" "pow" "float"

(*
external pow : float -> float -> float = "power_float" "pow" "float"
*)

*)
(** @since 4.07.0:
    external pow : float -> float -> float = "caml_power_float" "pow"
    [@@unboxed ][@@noalloc ]
 *)


external sqrt : float -> float = "caml_sqrt_float" "sqrt"[@@unboxed ]
[@@noalloc ]

(*

external sqrt : float -> float = "caml_sqrt_float" "sqrt" "float"

(*
external sqrt : float -> float = "sqrt_float" "sqrt" "float"
*)

*)
(** @since 4.07.0:
    external sqrt : float -> float = "caml_sqrt_float" "sqrt"[@@unboxed ]
    [@@noalloc ]
 *)


external exp : float -> float = "caml_exp_float" "exp"[@@unboxed ][@@noalloc
                                                                    ]

(*

external exp : float -> float = "caml_exp_float" "exp" "float"

(*
external exp : float -> float = "exp_float" "exp" "float"
*)

*)
(** @since 4.07.0:
    external exp : float -> float = "caml_exp_float" "exp"[@@unboxed ]
    [@@noalloc ]
 *)


external log : float -> float = "caml_log_float" "log"[@@unboxed ][@@noalloc
                                                                    ]

(*

external log : float -> float = "caml_log_float" "log" "float"

(*
external log : float -> float = "log_float" "log" "float"
*)

*)
(** @since 4.07.0:
    external log : float -> float = "caml_log_float" "log"[@@unboxed ]
    [@@noalloc ]
 *)


external log10 : float -> float = "caml_log10_float" "log10"[@@unboxed ]
[@@noalloc ]

(*

external log10 : float -> float = "caml_log10_float" "log10" "float"

(*
external log10 : float -> float = "log10_float" "log10" "float"
*)

*)
(** @since 4.07.0:
    external log10 : float -> float = "caml_log10_float" "log10"[@@unboxed ]
    [@@noalloc ]
 *)


external expm1 : float -> float = "caml_expm1_float" "caml_expm1"[@@unboxed ]
[@@noalloc ]

(*

external expm1 : float -> float = "caml_expm1_float" "caml_expm1" "float"

(*
val expm1 : float -> float
*)

*)
(** @since 4.07.0:
    external expm1 : float -> float = "caml_expm1_float" "caml_expm1"
    [@@unboxed ][@@noalloc ]
 *)


external log1p : float -> float = "caml_log1p_float" "caml_log1p"[@@unboxed ]
[@@noalloc ]

(*

external log1p : float -> float = "caml_log1p_float" "caml_log1p" "float"

(*
val log1p : float -> float
*)

*)
(** @since 4.07.0:
    external log1p : float -> float = "caml_log1p_float" "caml_log1p"
    [@@unboxed ][@@noalloc ]
 *)


external cos : float -> float = "caml_cos_float" "cos"[@@unboxed ][@@noalloc
                                                                    ]

(*

external cos : float -> float = "caml_cos_float" "cos" "float"

(*
external cos : float -> float = "cos_float" "cos" "float"
*)

*)
(** @since 4.07.0:
    external cos : float -> float = "caml_cos_float" "cos"[@@unboxed ]
    [@@noalloc ]
 *)


external sin : float -> float = "caml_sin_float" "sin"[@@unboxed ][@@noalloc
                                                                    ]

(*

external sin : float -> float = "caml_sin_float" "sin" "float"

(*
external sin : float -> float = "sin_float" "sin" "float"
*)

*)
(** @since 4.07.0:
    external sin : float -> float = "caml_sin_float" "sin"[@@unboxed ]
    [@@noalloc ]
 *)


external tan : float -> float = "caml_tan_float" "tan"[@@unboxed ][@@noalloc
                                                                    ]

(*

external tan : float -> float = "caml_tan_float" "tan" "float"

(*
external tan : float -> float = "tan_float" "tan" "float"
*)

*)
(** @since 4.07.0:
    external tan : float -> float = "caml_tan_float" "tan"[@@unboxed ]
    [@@noalloc ]
 *)


external acos : float -> float = "caml_acos_float" "acos"[@@unboxed ]
[@@noalloc ]

(*

external acos : float -> float = "caml_acos_float" "acos" "float"

(*
external acos : float -> float = "acos_float" "acos" "float"
*)

*)
(** @since 4.07.0:
    external acos : float -> float = "caml_acos_float" "acos"[@@unboxed ]
    [@@noalloc ]
 *)


external asin : float -> float = "caml_asin_float" "asin"[@@unboxed ]
[@@noalloc ]

(*

external asin : float -> float = "caml_asin_float" "asin" "float"

(*
external asin : float -> float = "asin_float" "asin" "float"
*)

*)
(** @since 4.07.0:
    external asin : float -> float = "caml_asin_float" "asin"[@@unboxed ]
    [@@noalloc ]
 *)


external atan : float -> float = "caml_atan_float" "atan"[@@unboxed ]
[@@noalloc ]

(*

external atan : float -> float = "caml_atan_float" "atan" "float"

(*
external atan : float -> float = "atan_float" "atan" "float"
*)

*)
(** @since 4.07.0:
    external atan : float -> float = "caml_atan_float" "atan"[@@unboxed ]
    [@@noalloc ]
 *)


external atan2 : float -> float -> float = "caml_atan2_float" "atan2"
[@@unboxed ][@@noalloc ]

(*

external atan2 : float -> float -> float = "caml_atan2_float" "atan2" "float"

(*
external atan2 : float -> float -> float = "atan2_float" "atan2" "float"
*)

*)
(** @since 4.07.0:
    external atan2 : float -> float -> float = "caml_atan2_float" "atan2"
    [@@unboxed ][@@noalloc ]
 *)


external hypot : float -> float -> float = "caml_hypot_float" "caml_hypot"
[@@unboxed ][@@noalloc ]

(*

external hypot :
  float -> float -> float = "caml_hypot_float" "caml_hypot" "float"

(*
val hypot : float -> float -> float
*)

*)
(** @since 4.07.0:
    external hypot :
      float -> float -> float = "caml_hypot_float" "caml_hypot"[@@unboxed ]
    [@@noalloc ]
 *)


external cosh : float -> float = "caml_cosh_float" "cosh"[@@unboxed ]
[@@noalloc ]

(*

external cosh : float -> float = "caml_cosh_float" "cosh" "float"

(*
external cosh : float -> float = "cosh_float" "cosh" "float"
*)

*)
(** @since 4.07.0:
    external cosh : float -> float = "caml_cosh_float" "cosh"[@@unboxed ]
    [@@noalloc ]
 *)


external sinh : float -> float = "caml_sinh_float" "sinh"[@@unboxed ]
[@@noalloc ]

(*

external sinh : float -> float = "caml_sinh_float" "sinh" "float"

(*
external sinh : float -> float = "sinh_float" "sinh" "float"
*)

*)
(** @since 4.07.0:
    external sinh : float -> float = "caml_sinh_float" "sinh"[@@unboxed ]
    [@@noalloc ]
 *)


external tanh : float -> float = "caml_tanh_float" "tanh"[@@unboxed ]
[@@noalloc ]

(*

external tanh : float -> float = "caml_tanh_float" "tanh" "float"

(*
external tanh : float -> float = "tanh_float" "tanh" "float"
*)

*)
(** @since 4.07.0:
    external tanh : float -> float = "caml_tanh_float" "tanh"[@@unboxed ]
    [@@noalloc ]
 *)


external ceil : float -> float = "caml_ceil_float" "ceil"[@@unboxed ]
[@@noalloc ]

(*

external ceil : float -> float = "caml_ceil_float" "ceil" "float"

(*
external ceil : float -> float = "ceil_float" "ceil" "float"
*)

*)
(** @since 4.07.0:
    external ceil : float -> float = "caml_ceil_float" "ceil"[@@unboxed ]
    [@@noalloc ]
 *)


external floor : float -> float = "caml_floor_float" "floor"[@@unboxed ]
[@@noalloc ]

(*

external floor : float -> float = "caml_floor_float" "floor" "float"

(*
external floor : float -> float = "floor_float" "floor" "float"
*)

*)
(** @since 4.07.0:
    external floor : float -> float = "caml_floor_float" "floor"[@@unboxed ]
    [@@noalloc ]
 *)


external frexp : float -> (float * int) = "caml_frexp_float"

(*
external frexp : float -> (float * int) = "frexp_float"
*)
(** @since 4.07.0:
    external frexp : float -> (float * int) = "caml_frexp_float"
 *)


external ldexp :
  ((float)[@unboxed ]) -> ((int)[@untagged ]) -> ((float)[@unboxed ]) =
    "caml_ldexp_float" "caml_ldexp_float_unboxed"[@@noalloc ]

(*

external ldexp : float -> int -> float = "caml_ldexp_float"

(*
val ldexp : float -> int -> float
*)

*)
(** @since 4.07.0:
    external ldexp :
      ((float)[@unboxed ]) -> ((int)[@untagged ]) -> ((float)[@unboxed ]) =
        "caml_ldexp_float" "caml_ldexp_float_unboxed"[@@noalloc ]
 *)


external modf : float -> (float * float) = "caml_modf_float"

(*
external modf : float -> (float * float) = "modf_float"
*)
(** @since 4.07.0:
    external modf : float -> (float * float) = "caml_modf_float"
 *)

val compare : t -> t -> int
(** @since 4.07.0: val compare : t -> t -> int *)

val equal : t -> t -> bool
(** @since 4.07.0: val equal : t -> t -> bool *)

val hash : t -> int
(** @since 4.07.0: val hash : t -> int *)

end
