fact: Fixpoint hfs_numeral n := match n with | O => hfs_empty | S n => hfs_cons (hfs_numeral n) (hfs_numeral n) end.
imports: Undecidability.FOL(Syntax.Facts Semantics.Tarski.FullFacts) Undecidability.FOL(Sets.ZF) Undecidability.FOL(ZF) Undecidability.FOL.TRAKHTENBROT(hfs) Undecidability.Shared.Libs.DLW.Utils(finite) Undecidability(Shared.ListAutomation) Lia