fact: Definition adequate v w P n := exists p q, der (Γ v w P) n (arr p (arr q p)).
imports: List Lia ssreflect ssrbool ssrfun Undecidability.HilbertCalculi.HSC Undecidability.HilbertCalculi.Util.HSCFacts Undecidability.PCP.PCP