---

Step * 2 2 of Lemma not_base_decidble_eq_diag2


1. t1,t2:Base.  Dec(t1 = t2)@i
2. eqd : Base  Base  
3. t1,t2:Base.  ((eqd t1 t2)  t1 = t2)
4. isBot:Base  . t:Base. ((isBot t)  t = bottom())
 False
BY
{ (D (-1) THEN (Assert isBot fix((t.if isBot t then x.x else bottom() fi ))   BY MaAuto) THEN skip{diagonalize }) }

1
1. t1,t2:Base.  Dec(t1 = t2)@i
2. eqd : Base  Base  
3. t1,t2:Base.  ((eqd t1 t2)  t1 = t2)
4. isBot : Base  
5. t:Base. ((isBot t)  t = bottom())
6. isBot fix((t.if isBot t then x.x else bottom() fi ))  
 False



1.  \mforall{}t1,t2:Base.    Dec(t1  =  t2)@i
2.  eqd  :  Base  {}\mrightarrow{}  Base  {}\mrightarrow{}  \mBbbB{}
3.  \mforall{}t1,t2:Base.    (\muparrow{}(eqd  t1  t2)  \mLeftarrow{}{}\mRightarrow{}  t1  =  t2)
4.  \mexists{}isBot:Base  {}\mrightarrow{}  \mBbbB{}.  \mforall{}t:Base.  (\muparrow{}(isBot  t)  \mLeftarrow{}{}\mRightarrow{}  t  =  bottom())
\mvdash{}  False


By

(D  (-1)
  THEN  (Assert  isBot  fix((\mlambda{}t.if  isBot  t  then  \mlambda{}x.x  else  bottom()  fi  ))  \mmember{}  \mBbbB{}  BY
                          MaAuto)
  THEN  skip\{diagonalize
                      \mcdot{}\})



Home Index