---

Step * 2 of Lemma list_ind_reverse_wf


1. A : Type
2. B : Type
3. L : A List
4. nilcase : B
5. F : B ⟶ (A List) ⟶ A ⟶ B
6. ∀n:ℕ. ∀LL:A List.
     ((||LL|| = n ∈ ℕ)
     ⇒ ((λF@0,l. if (||l|| =z 0) then nilcase else F (F@0 firstn(||l|| - 1;l)) firstn(||l|| - 1;l) last(l) fi ) 
         fix((λF@0,l. if (||l|| =z 0) then nilcase else F (F@0 firstn(||l|| - 1;l)) firstn(||l|| - 1;l) last(l) fi )) 
         LL ∈ B))
⊢ (λF@0,l. if (||l|| =z 0) then nilcase else F (F@0 firstn(||l|| - 1;l)) firstn(||l|| - 1;l) last(l) fi ) 
  fix((λF@0,l. if (||l|| =z 0) then nilcase else F (F@0 firstn(||l|| - 1;l)) firstn(||l|| - 1;l) last(l) fi )) 
  L ∈ B
BY
{ (InstHyp [⌜||L||⌝;⌜L⌝] (-1)⋅ THEN Auto) }

---

Latex:

---

Latex:

1.  A  :  Type
2.  B  :  Type
3.  L  :  A  List
4.  nilcase  :  B
5.  F  :  B  {}\mrightarrow{}  (A  List)  {}\mrightarrow{}  A  {}\mrightarrow{}  B
6.  \mforall{}n:\mBbbN{}.  \mforall{}LL:A  List.
          ((||LL||  =  n)
          {}\mRightarrow{}  ((\mlambda{}F@0,l.  if  (||l||  =\msubz{}  0)
                                  then  nilcase
                                  else  F  (F@0  firstn(||l||  -  1;l))  firstn(||l||  -  1;l)  last(l)
                                  fi  ) 
                  fix((\mlambda{}F@0,l.  if  (||l||  =\msubz{}  0)
                                          then  nilcase
                                          else  F  (F@0  firstn(||l||  -  1;l))  firstn(||l||  -  1;l)  last(l)
                                          fi  )) 
                  LL  \mmember{}  B))
\mvdash{}  (\mlambda{}F@0,l.  if  (||l||  =\msubz{}  0)
                    then  nilcase
                    else  F  (F@0  firstn(||l||  -  1;l))  firstn(||l||  -  1;l)  last(l)
                    fi  ) 
    fix((\mlambda{}F@0,l.  if  (||l||  =\msubz{}  0)
                            then  nilcase
                            else  F  (F@0  firstn(||l||  -  1;l))  firstn(||l||  -  1;l)  last(l)
                            fi  )) 
    L  \mmember{}  B


By

---

Latex:
(InstHyp  [\mkleeneopen{}||L||\mkleeneclose{};\mkleeneopen{}L\mkleeneclose{}]  (-1)\mcdot{}  THEN  Auto)

---

Home Index