65 lines
2.8 KiB
OCaml
65 lines
2.8 KiB
OCaml
(***********************************************************************)
|
|
(* *)
|
|
(* Objective Caml *)
|
|
(* *)
|
|
(* Valerie Menissier-Morain, projet Cristal, INRIA Rocquencourt *)
|
|
(* *)
|
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
|
(* Automatique. Distributed only by permission. *)
|
|
(* *)
|
|
(***********************************************************************)
|
|
|
|
(* $Id$ *)
|
|
|
|
(* Module [Big_int]: operations on big integers *)
|
|
|
|
(* Big integers (type [big_int]) are signed integers of arbitrary size. *)
|
|
|
|
open Nat
|
|
|
|
type big_int
|
|
|
|
val sign_big_int : big_int -> int
|
|
val zero_big_int : big_int
|
|
val unit_big_int : big_int
|
|
val num_digits_big_int : big_int -> int
|
|
val minus_big_int : big_int -> big_int
|
|
val abs_big_int : big_int -> big_int
|
|
val compare_big_int : big_int -> big_int -> int
|
|
val eq_big_int : big_int -> big_int -> bool
|
|
val le_big_int : big_int -> big_int -> bool
|
|
val ge_big_int : big_int -> big_int -> bool
|
|
val lt_big_int : big_int -> big_int -> bool
|
|
val gt_big_int : big_int -> big_int -> bool
|
|
val max_big_int : big_int -> big_int -> big_int
|
|
val min_big_int : big_int -> big_int -> big_int
|
|
val pred_big_int : big_int -> big_int
|
|
val succ_big_int : big_int -> big_int
|
|
val add_big_int : big_int -> big_int -> big_int
|
|
val big_int_of_int : int -> big_int
|
|
val add_int_big_int : int -> big_int -> big_int
|
|
val sub_big_int : big_int -> big_int -> big_int
|
|
val mult_int_big_int : int -> big_int -> big_int
|
|
val mult_big_int : big_int -> big_int -> big_int
|
|
val quomod_big_int : big_int -> big_int -> big_int * big_int
|
|
val div_big_int : big_int -> big_int -> big_int
|
|
val mod_big_int : big_int -> big_int -> big_int
|
|
val gcd_big_int : big_int -> big_int -> big_int
|
|
val int_of_big_int : big_int -> int
|
|
val is_int_big_int : big_int -> bool
|
|
val nat_of_big_int : big_int -> nat
|
|
val big_int_of_nat : nat -> big_int
|
|
val string_of_big_int : big_int -> string
|
|
val big_int_of_string : string -> big_int
|
|
val float_of_big_int : big_int -> float
|
|
val square_big_int: big_int -> big_int
|
|
val sqrt_big_int: big_int -> big_int
|
|
val base_power_big_int: int -> int -> big_int -> big_int
|
|
val sys_big_int_of_string: string -> int -> int -> big_int
|
|
val power_int_positive_int: int -> int -> big_int
|
|
val power_big_int_positive_int: big_int -> int -> big_int
|
|
val power_int_positive_big_int: int -> big_int -> big_int
|
|
val power_big_int_positive_big_int: big_int -> big_int -> big_int
|
|
val round_futur_last_digit : string -> int -> int -> bool
|
|
val approx_big_int: int -> big_int -> string
|