Step
*
1
of Lemma
length-append
1. bs : Base
2. as : Base
3. x : Base@i
4. y : Base@i
5. r1 : Base@i
6. r2 : Base@i
7. ||r1|| ≤ r2 + ||bs||@i
⊢ ||r1|| + 1 ≤ (r2 + 1) + ||bs||
BY
{ ((RWO "add-associates" 0 THENA Auto)
   THEN (RW (AddrC [2;2] (LemmaC  `add-commutes`)) 0 THENA Auto)
   THEN RWO "add-associates<" 0
   THEN Auto) }
Latex:
Latex:
1.  bs  :  Base
2.  as  :  Base
3.  x  :  Base@i
4.  y  :  Base@i
5.  r1  :  Base@i
6.  r2  :  Base@i
7.  ||r1||  \mleq{}  r2  +  ||bs||@i
\mvdash{}  ||r1||  +  1  \mleq{}  (r2  +  1)  +  ||bs||
By
Latex:
((RWO  "add-associates"  0  THENA  Auto)
  THEN  (RW  (AddrC  [2;2]  (LemmaC    `add-commutes`))  0  THENA  Auto)
  THEN  RWO  "add-associates<"  0
  THEN  Auto)
Home
Index