proposition: Lemma squash_pure P (d : dec P) (H H' : squash P) : H = H'.
proof: Proof. remember (squash P) as S. unfold squash in HeqS. destruct Dec in HeqS; subst; try tauto. now destruct H, H'. Qed.
imports: Undecidability.FOL(Semantics.FiniteTarski.Full) Undecidability.FOL(Syntax.Facts Semantics.Tarski.FullFacts Syntax.BinSig) Undecidability.SeparationLogic(MSL) Undecidability.Shared(Dec) Undecidability.Synthetic.DecidabilityFacts List