fact: Fixpoint check_diseqs_complete_aux a dist t := match dist with | nil => true | b::q => if aexistsbi (fun _ (x:option (int*int)) => match x with | Some (a',b') => ((a =? a') && (b =? b')) || ((a =? b') && (b =? a')) | None => false end ) t then check_diseqs_complete_aux a q t else false end.
imports: List PArray Bool Int63 ZMicromega Misc State SMT_terms