Step
*
4
1
of Lemma
sqeq-copath2
1. b : Base
2. a : Base
3. m : Base
4. n : Base
5. is-exception(if n=m - 1 then a else b)
6. n ∈ ℤ
7. m - 1 ∈ ℤ
⊢ if n=m - 1 then a else b ≤ if n + 1=m then a else b
BY
{ ((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.  is-exception(if  n=m  -  1  then  a  else  b)
6.  n  \mmember{}  \mBbbZ{}
7.  m  -  1  \mmember{}  \mBbbZ{}
\mvdash{}  if  n=m  -  1  then  a  else  b  \mleq{}  if  n  +  1=m  then  a  else  b
By
Latex:
((Assert  \mkleeneopen{}(m  -  1)\mdownarrow{}\mkleeneclose{}\mcdot{}  THENA  Auto)  THEN  RepUR  ``subtract``  (-1)  THEN  HasValueD  (-1)  THEN  AutoSplit)
Home
Index