Step * 2 2 1 of Lemma nat-to-incomparable-property


1. : ℕ
2. : ℕ
3. Atom List
4. 0 < ||l||
5. (nat-to-str(n) [/]) (nat-to-str(m) [/]) ∈ (Atom List)
6. l ≤ [/]
7. nat-to-str(n) nat-to-str(m) ∈ (Atom List)
⊢ m ∈ ℤ
BY
(((InstLemma `str-to-nat-to-str` [⌜n⌝]⋅ THENM RevHypSubst' (-1) 0) THENA Auto)
   THEN ((InstLemma `str-to-nat-to-str` [⌜m⌝]⋅ THENM RevHypSubst' (-1) 0) THENA Auto)
   THEN EqCD
   THEN Auto) }


Latex:


Latex:

1.  n  :  \mBbbN{}
2.  m  :  \mBbbN{}
3.  l  :  Atom  List
4.  0  <  ||l||
5.  (nat-to-str(n)  @  [/])  =  (nat-to-str(m)  @  [/])
6.  l  \mleq{}  [/]
7.  nat-to-str(n)  =  nat-to-str(m)
\mvdash{}  n  =  m


By


Latex:
(((InstLemma  `str-to-nat-to-str`  [\mkleeneopen{}n\mkleeneclose{}]\mcdot{}  THENM  RevHypSubst'  (-1)  0)  THENA  Auto)
  THEN  ((InstLemma  `str-to-nat-to-str`  [\mkleeneopen{}m\mkleeneclose{}]\mcdot{}  THENM  RevHypSubst'  (-1)  0)  THENA  Auto)
  THEN  EqCD
  THEN  Auto)




Home Index