Step
*
1
of Lemma
brouwer_prin_27_2_imp_27_5
1. 
A:
 
 
 
 
 
 
     ((
f:
 
 
. 
b:
. (A f b))
     
 (
T:
 List 
 
          
f:
 
 
. (
!y:
. (T mklist(y;f)) > 0 
 (
y:
. (((T mklist(y;f)) > 0) 
 (A f (T mklist(y;f)--1)))))))@i'
2. A : 
 
 
 
 
 
 
@i'
3. g : 
 List 
 
@i
4. spr(g)@i
5. 
f:
 
 
. ((f 
 spr(g)) 
 (
b:
. (A f b)))@i
 
T:
 List 
 
   
f:
 
 
     ((f 
 spr(g)) 
 (
!y:
. (T mklist(y;f)) > 0 
 (
y:
. (((T mklist(y;f)) > 0) 
 (A f (T mklist(y;f)--1))))))
BY
{ (BoolCase 
(g [] =
 0)
 THENA Auto) }
1
1. 
A:
 
 
 
 
 
 
     ((
f:
 
 
. 
b:
. (A f b))
     
 (
T:
 List 
 
          
f:
 
 
. (
!y:
. (T mklist(y;f)) > 0 
 (
y:
. (((T mklist(y;f)) > 0) 
 (A f (T mklist(y;f)--1)))))))@i'
2. A : 
 
 
 
 
 
 
@i'
3. g : 
 List 
 
@i
4. spr(g)@i
5. 
f:
 
 
. ((f 
 spr(g)) 
 (
b:
. (A f b)))@i
6. (g []) = 0
 
T:
 List 
 
   
f:
 
 
     ((f 
 spr(g)) 
 (
!y:
. (T mklist(y;f)) > 0 
 (
y:
. (((T mklist(y;f)) > 0) 
 (A f (T mklist(y;f)--1))))))
2
1. 
A:
 
 
 
 
 
 
     ((
f:
 
 
. 
b:
. (A f b))
     
 (
T:
 List 
 
          
f:
 
 
. (
!y:
. (T mklist(y;f)) > 0 
 (
y:
. (((T mklist(y;f)) > 0) 
 (A f (T mklist(y;f)--1)))))))@i'
2. A : 
 
 
 
 
 
 
@i'
3. g : 
 List 
 
@i
4. g [] 
 0
5. spr(g)@i
6. 
f:
 
 
. ((f 
 spr(g)) 
 (
b:
. (A f b)))@i
 
T:
 List 
 
   
f:
 
 
     ((f 
 spr(g)) 
 (
!y:
. (T mklist(y;f)) > 0 
 (
y:
. (((T mklist(y;f)) > 0) 
 (A f (T mklist(y;f)--1))))))
1.  \mforall{}A:\mBbbN{}  {}\mrightarrow{}  \mBbbN{}  {}\mrightarrow{}  \mBbbN{}  {}\mrightarrow{}  \mBbbP{}
          ((\mforall{}f:\mBbbN{}  {}\mrightarrow{}  \mBbbN{}.  \mexists{}b:\mBbbN{}.  (A  f  b))
          {}\mRightarrow{}  (\mexists{}T:\mBbbN{}  List  {}\mrightarrow{}  \mBbbN{}
                    \mforall{}f:\mBbbN{}  {}\mrightarrow{}  \mBbbN{}
                        (\mexists{}!y:\mBbbN{}.  (T  mklist(y;f))  >  0
                        \mwedge{}  (\mforall{}y:\mBbbN{}.  (((T  mklist(y;f))  >  0)  {}\mRightarrow{}  (A  f  (T  mklist(y;f)--1)))))))@i'
2.  A  :  \mBbbN{}  {}\mrightarrow{}  \mBbbN{}  {}\mrightarrow{}  \mBbbN{}  {}\mrightarrow{}  \mBbbP{}@i'
3.  g  :  \mBbbN{}  List  {}\mrightarrow{}  \mBbbN{}@i
4.  spr(g)@i
5.  \mforall{}f:\mBbbN{}  {}\mrightarrow{}  \mBbbN{}.  ((f  \mmember{}  spr(g))  {}\mRightarrow{}  (\mexists{}b:\mBbbN{}.  (A  f  b)))@i
\mvdash{}  \mexists{}T:\mBbbN{}  List  {}\mrightarrow{}  \mBbbN{}
      \mforall{}f:\mBbbN{}  {}\mrightarrow{}  \mBbbN{}
          ((f  \mmember{}  spr(g))
          {}\mRightarrow{}  (\mexists{}!y:\mBbbN{}.  (T  mklist(y;f))  >  0  \mwedge{}  (\mforall{}y:\mBbbN{}.  (((T  mklist(y;f))  >  0)  {}\mRightarrow{}  (A  f  (T  mklist(y;f)--1))))))
By
(BoolCase  \mkleeneopen{}(g  []  =\msubz{}  0)\mkleeneclose{}\mcdot{}  THENA  Auto)
Home
Index