sig
type operator = LessThan | Equal | Diff
val min_max_plus_inter : int -> int -> int -> int -> int * int
val min_max_minus_inter : int -> int -> int -> int -> int * int
val cstr :
?boolsum:int ->
(int * Fcl_var.Fd.t) list -> Fcl_linear.operator -> int -> Fcl_cstr.t
val linear_aux : (int * Fcl_var.Fd.t) list -> int -> Fcl_var.Fd.t
val shift_cstr : Fcl_var.Fd.t -> Fcl_var.Fd.t -> int -> Fcl_cstr.t
val get_boolsum_threshold : unit -> int
val set_boolsum_threshold : int -> unit
end