---

Step * 3 of Lemma sqeq-copath2


1. b : Base
2. a : Base
3. m : Base
4. n : Base
5. (if n=m - 1 then a else b)↓
⊢ if n=m - 1 then a else b ≤ if n + 1=m then a else b
BY
{ (HasValueD (-1)
   THEN (Assert ⌜(m - 1)↓⌝⋅ THENA Auto)
   THEN RepUR ``subtract`` (-1)
   THEN HasValueD (-1)
   THEN AutoSplit) }

---

Latex:

---

Latex:

1.  b  :  Base
2.  a  :  Base
3.  m  :  Base
4.  n  :  Base
5.  (if  n=m  -  1  then  a  else  b)\mdownarrow{}
\mvdash{}  if  n=m  -  1  then  a  else  b  \mleq{}  if  n  +  1=m  then  a  else  b


By

---

Latex:
(HasValueD  (-1)
  THEN  (Assert  \mkleeneopen{}(m  -  1)\mdownarrow{}\mkleeneclose{}\mcdot{}  THENA  Auto)
  THEN  RepUR  ``subtract``  (-1)
  THEN  HasValueD  (-1)
  THEN  AutoSplit)

---

Home Index