fact: Fixpoint pos L (d : D) : nat := match L with | nil => 0 | e::L => if Dec (d = e) then 0 else S (pos L d) end.
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