Step
*
of Lemma
tcWO-induction
∀[T:Type]. ∀[>:T ⟶ T ⟶ ℙ]. ∀[Q:T ⟶ ℙ]. TI(T;x,y.>[x;y];t.Q[t]) supposing tcWO(T;x,y.>[x;y])
BY
{ (InstLemma `AF-induction2` []
THEN RepeatFor 3 (ParallelLast')
THEN D -1
THEN Auto
THEN D -1
THEN Unfold `almost-full` 0
THEN Auto) }
Latex:
Latex:
\mforall{}[T:Type]. \mforall{}[>:T {}\mrightarrow{} T {}\mrightarrow{} \mBbbP{}]. \mforall{}[Q:T {}\mrightarrow{} \mBbbP{}]. TI(T;x,y.>[x;y];t.Q[t]) supposing tcWO(T;x,y.>[x;y])
By
Latex:
(InstLemma `AF-induction2` []
THEN RepeatFor 3 (ParallelLast')
THEN D -1
THEN Auto
THEN D -1
THEN Unfold `almost-full` 0
THEN Auto)
Home
Index