Step
*
of Lemma
sqeq-copath2
∀[a,b,n,m:Top].  (if n + 1=m then a else b ~ if n=m - 1 then a else b)
BY
{ ((UnivCD THENA Auto) THEN SqequalSqle THEN SqLeTopToBase THEN AssumeHasValue) }
1
1. b : Base
2. a : Base
3. m : Base
4. n : Base
5. (if n + 1=m then a else b)↓
⊢ if n + 1=m then a else b ≤ if n=m - 1 then a else b
2
1. b : Base
2. a : Base
3. m : Base
4. n : Base
5. is-exception(if n + 1=m then a else b)
⊢ if n + 1=m then a else b ≤ if n=m - 1 then a else b
3
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
4
1. b : Base
2. a : Base
3. m : Base
4. n : Base
5. is-exception(if n=m - 1 then a else b)
⊢ if n=m - 1 then a else b ≤ if n + 1=m then a else b
Latex:
Latex:
\mforall{}[a,b,n,m:Top].    (if  n  +  1=m  then  a  else  b  \msim{}  if  n=m  -  1  then  a  else  b)
By
Latex:
((UnivCD  THENA  Auto)  THEN  SqequalSqle  THEN  SqLeTopToBase  THEN  AssumeHasValue)
Home
Index