exception Overflow of stringtype dimsup = {pos : int;nbdims : int;
}val print_limit : int refval initialize : strict:bool -> maxdims:int -> maxrows:int -> unitval finalize : unit -> unitval set_widening_affine : unit -> unitval set_widening_linear : unit -> unitval denominator_of_list :
(Big_int.big_int * Big_int.big_int * string) list ->
Big_int.big_intval to_constraint :
(int -> string) ->
(int -> Big_int.big_int) ->
int ->
stringval to_frame : (int -> string) -> (int -> Big_int.big_int) -> int -> stringval to_expr : (int -> string) -> (int -> Big_int.big_int) -> int -> stringtype cons = | Egal| SupEgal| Sup
type gen = | Vertex| Ray| Line