Step * of Lemma cWO-induction

[T:Type]. ∀[R:T ⟶ T ⟶ ℙ].  ∀[Q:T ⟶ ℙ]. TI(T;x,y.R[x;y];t.Q[t]) supposing cWO(T;x,y.R[x;y])
BY
xxx(UseWitness ⌜λf.fix((λF,t. (f F)))⌝⋅ THEN RWO "cWO-induction-extract-sqequal" THEN Auto)xxx }


Latex:


Latex:
\mforall{}[T:Type].  \mforall{}[R:T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}].    \mforall{}[Q:T  {}\mrightarrow{}  \mBbbP{}].  TI(T;x,y.R[x;y];t.Q[t])  supposing  cWO(T;x,y.R[x;y])


By


Latex:
xxx(UseWitness  \mkleeneopen{}\mlambda{}f.fix((\mlambda{}F,t.  (f  t  F)))\mkleeneclose{}\mcdot{}  THEN  RWO  "cWO-induction-extract-sqequal"  0  THEN  Auto)xxx




Home Index