1-Impl.Enumerablemodule M : sig ... endtype var = Field.Var.tval to_bits : M.t -> bool listval var_to_bits : var -> Boolean.var list Checked.tval if_ : Boolean.var -> then_:var -> else_:var -> var Checked.tval (=) : var -> var -> Boolean.var Checked.t