val eq_op1 : Micromega.op1 -> Micromega.op1 -> boolval eq_positive : Micromega.positive -> Micromega.positive -> boolval eq_z : Micromega.z -> Micromega.z -> boolval eq_q : Micromega.q -> Micromega.q -> boolval eq_pol : ('a -> 'a -> bool) -> 'a Micromega.pol -> 'a Micromega.pol -> boolval eq_pair : ('a -> 'a -> bool) -> ('b -> 'b -> bool) -> ('a * 'b) -> ('a * 'b) -> boolval hash_op1 : int -> Micromega.op1 -> intval hash_pol : (int -> 'a -> int) -> int -> 'a Micromega.pol -> intval hash_pair : (int -> 'a -> int) -> (int -> 'b -> int) -> int -> ('a * 'b) -> intval hash_z : int -> Micromega.z -> intval hash_q : int -> Micromega.q -> intval hash_string : int -> string -> intval hash_elt : ('a -> int) -> int -> 'a -> int