Step * of Lemma decidable__equal_equipollent

[T:Type]. ∀k:ℕ(T ~ ℕ (∀a,b:T.  Dec(a b ∈ T)))
BY
(Auto THEN THEN ((Decide ⌜(f a) (f b) ∈ ℕk⌝⋅ THENA Auto) THENL [OrLeft; OrRight]) THEN Auto) }


Latex:


Latex:
\mforall{}[T:Type].  \mforall{}k:\mBbbN{}.  (T  \msim{}  \mBbbN{}k  {}\mRightarrow{}  (\mforall{}a,b:T.    Dec(a  =  b)))


By


Latex:
(Auto  THEN  D  3  THEN  ((Decide  \mkleeneopen{}(f  a)  =  (f  b)\mkleeneclose{}\mcdot{}  THENA  Auto)  THENL  [OrLeft;  OrRight])  THEN  Auto)




Home Index