fact: Definition dom_rel (a : dom) (b:dom) : Prop := match (a,b) with | (Num 0, Num 1) => H10UPC_SAT h10 | (Num n1, Num n2) => n1 = n2 | (Num n1, Pair x2 _) => n1 = x2 | (Pair _ y1, Num n2) => n2 = y1 | (Pair x1 y1, Pair x2 y2) => h10upc_sem_direct ((x1, y1), (x2, y2)) end.
imports: Undecidability.DiophantineConstraints(H10C) Undecidability.DiophantineConstraints.Util(H10UPC_facts) Undecidability.FOL(Syntax.Facts Deduction.FragmentNDFacts Semantics.Tarski.FragmentSoundness Semantics.Tarski.FragmentFacts Syntax.BinSig Semantics.Kripke.FragmentCore Semantics.Kripke.FragmentSoundness Semantics.Kripke.FragmentToTarski) Undecidability.Shared(Dec) Undecidability.Shared.Libs.PSL(Numbers) Undecidability.Shared(ListAutomation) Coq(Arith Lia List)