---

Step * 1 2 2 of Lemma aa_kleene_fan_contra4


1. f :     bar()@i
2. b:  bar(). a:. ((f a) = b)@i
3. T :     @i
4. i,nsteps:.  (((T i nsteps))  (f i i))@i
5. i:. ((f i i)  (nsteps:. ((T i nsteps))))@i
6. A :   @i
7. a : 
8. (f a) = A
9. (f a) = A
 x:
   ((y:
        ((y < ||mklist(x;A)||)
         ((((nsteps:. ((nsteps < ||mklist(x;A)||)  ((T y nsteps))))  f y y = ff)  mklist(x;A)[y] = tt)
            (((nsteps:. ((nsteps < ||mklist(x;A)||)  ((T y nsteps))))  f y y = tt)  mklist(x;A)[y] = ff)))))
BY
{ ((Assert (A a) BY MaAuto) THEN (Assert (f a a) BY MaAuto)) }

1
1. f :     bar()@i
2. b:  bar(). a:. ((f a) = b)@i
3. T :     @i
4. i,nsteps:.  (((T i nsteps))  (f i i))@i
5. i:. ((f i i)  (nsteps:. ((T i nsteps))))@i
6. A :   @i
7. a : 
8. (f a) = A
9. (f a) = A
10. (A a)
11. (f a a)
 x:
   ((y:
        ((y < ||mklist(x;A)||)
         ((((nsteps:. ((nsteps < ||mklist(x;A)||)  ((T y nsteps))))  f y y = ff)  mklist(x;A)[y] = tt)
            (((nsteps:. ((nsteps < ||mklist(x;A)||)  ((T y nsteps))))  f y y = tt)  mklist(x;A)[y] = ff)))))



1.  f  :  \mBbbN{}  {}\mrightarrow{}  \mBbbN{}  {}\mrightarrow{}  bar(\mBbbB{})@i
2.  \mforall{}b:\mBbbN{}  {}\mrightarrow{}  bar(\mBbbB{}).  \mexists{}a:\mBbbN{}.  ((f  a)  =  b)@i
3.  T  :  \mBbbN{}  {}\mrightarrow{}  \mBbbN{}  {}\mrightarrow{}  \mBbbB{}@i
4.  \mforall{}i,nsteps:\mBbbN{}.    ((\muparrow{}(T  i  nsteps))  {}\mRightarrow{}  (f  i  i)\mdownarrow{})@i
5.  \mforall{}i:\mBbbN{}.  ((f  i  i)\mdownarrow{}  {}\mRightarrow{}  (\mexists{}nsteps:\mBbbN{}.  (\muparrow{}(T  i  nsteps))))@i
6.  A  :  \mBbbN{}  {}\mrightarrow{}  \mBbbB{}@i
7.  a  :  \mBbbN{}
8.  (f  a)  =  A
9.  (f  a)  =  A
\mvdash{}  \mexists{}x:\mBbbN{}
      (\mneg{}(\mforall{}y:\mBbbN{}
                ((y  <  ||mklist(x;A)||)
                {}\mRightarrow{}  ((((\mexists{}nsteps:\mBbbN{}.  ((nsteps  <  ||mklist(x;A)||)  \mwedge{}  (\muparrow{}(T  y  nsteps))))  \mwedge{}  f  y  y  =  ff)
                      {}\mRightarrow{}  mklist(x;A)[y]  =  tt)
                      \mwedge{}  (((\mexists{}nsteps:\mBbbN{}.  ((nsteps  <  ||mklist(x;A)||)  \mwedge{}  (\muparrow{}(T  y  nsteps))))  \mwedge{}  f  y  y  =  tt)
                          {}\mRightarrow{}  mklist(x;A)[y]  =  ff)))))


By

((Assert  (A  a)\mdownarrow{}  BY  MaAuto)  THEN  (Assert  (f  a  a)\mdownarrow{}  BY  MaAuto))\mcdot{}



Home Index