fact: Definition check_distinct ha diseq := match get_atom ha with | Atom.Anop (Atom.NO_distinct ty) dist => check_diseqs ty dist diseq | _ => false end.
imports: List PArray Bool Int63 ZMicromega Misc State SMT_terms