[619] % z3debug small.smt2
sat
unsat
[620] % cat small.smt2
(declare-fun a () Int)
(declare-fun b (Int) Int)
(assert (forall ((c Int)) (distinct (b (mod c 8)) 0)))
(check-sat)
(check-sat-using (then purify-arith qe2))