(* *)
(**************************************************************************)
-include "Basic_2/reducibility/cpr.ma".
+include "basic_2/reducibility/cpr.ma".
(* CONTEXT-SENSITIVE NORMAL TERMS *******************************************)
>(cpr_inv_sort1 … H) //
qed.
+(* Basic_1: was: nf2_dec *)
axiom cnf_dec: ∀L,T1. L ⊢ 𝐍[T1] ∨
∃∃T2. L ⊢ T1 ➡ T2 & (T1 = T2 → False).