include module type of sig ... end
type t
= Q.t
=
{
}
val make : Z.t -> Z.t -> t
val zero : t
val one : t
val minus_one : t
val inf : t
val minus_inf : t
val undef : t
val of_bigint : Z.t -> t
val of_int : int -> t
val of_int32 : int32 -> t
val of_int64 : int64 -> t
val of_nativeint : nativeint -> t
val of_ints : int -> int -> t
val of_float : float -> t
val of_string : string -> t
val num : t -> Z.t
val den : t -> Z.t
type kind
= Q.kind
=
| ZERO |
| INF |
| MINF |
| UNDEF |
| NZERO |
val classify : t -> kind
val is_real : t -> bool
val sign : t -> int
val compare : t -> t -> int
val equal : t -> t -> bool
val min : t -> t -> t
val max : t -> t -> t
val leq : t -> t -> bool
val geq : t -> t -> bool
val lt : t -> t -> bool
val gt : t -> t -> bool
val to_bigint : t -> Z.t
val to_int : t -> int
val to_int32 : t -> int32
val to_int64 : t -> int64
val to_nativeint : t -> nativeint
val to_string : t -> string
val to_float : t -> float
val neg : t -> t
val abs : t -> t
val add : t -> t -> t
val sub : t -> t -> t
val mul : t -> t -> t
val inv : t -> t
val div : t -> t -> t
val mul_2exp : t -> int -> t
val div_2exp : t -> int -> t
val print : t -> unit
val output : Stdlib.out_channel -> t -> unit
val sprint : unit -> t -> string
val bprint : Stdlib.Buffer.t -> t -> unit
val pp_print : Stdlib.Format.formatter -> t -> unit
val (~-) : t -> t
val (~+) : t -> t
val (+) : t -> t -> t
val (-) : t -> t -> t
val (*) : t -> t -> t
val (/) : t -> t -> t
val (lsl) : t -> int -> t
val (asr) : t -> int -> t
val (~$) : int -> t
val (//) : int -> int -> t
val (~$$) : Z.t -> t
val (///) : Z.t -> Z.t -> t
val (=) : t -> t -> bool
val (<) : t -> t -> bool
val (>) : t -> t -> bool
val (<=) : t -> t -> bool
val (>=) : t -> t -> bool
val (<>) : t -> t -> bool
val yojson_of_t : t -> Ppx_yojson_conv_lib.Yojson.Safe.t
val is_zero : t -> bool
val is_not_zero : t -> bool
val is_one : t -> bool
val is_minus_one : t -> bool
val not_equal : t -> t -> bool
val to_int : t -> int option
val to_int32 : t -> int32 option
val to_int64 : t -> int64 option
val to_bigint : t -> Z.t option
val to_nativeint : t -> nativeint option