let check_guard args sa reqs = SMT.clear (); SMT.assume ~id:0 (distinct_vars (List.length args)); let f = make_formula_set (SAtom.union sa reqs) in SMT.assume ~id:0 f; SMT.check ()