---

Step * 2 1 of Lemma spread-exception-type


1. T : Type
2. a : Base
3. b : Base
4. c : a = b ∈ T
5. B : Top
6. is-exception(a)
7. is-exception(b)
⊢ (let u,v = a in B[u;v] ~ a) = (let u,v = b in B[u;v] ~ b) ∈ Type
BY
{ (SquashConcl THEN ExceptionSqequal (-1) THEN HypSubst' (-1) 0) }

1
1. T : Type
2. a : Base
3. b : Base
4. c : a = b ∈ T
5. B : Top
6. is-exception(a)
7. is-exception(b)
8. u : Base
9. v : Base
10. b ~ exception(u; v)
⊢ ↓(let u,v = a in B[u;v] ~ a) = (let u,v = exception(u; v) in B[u;v] ~ exception(u; v)) ∈ Type

---

Latex:

---

Latex:

1.  T  :  Type
2.  a  :  Base
3.  b  :  Base
4.  c  :  a  =  b
5.  B  :  Top
6.  is-exception(a)
7.  is-exception(b)
\mvdash{}  (let  u,v  =  a  in  B[u;v]  \msim{}  a)  =  (let  u,v  =  b  in  B[u;v]  \msim{}  b)


By

---

Latex:
(SquashConcl  THEN  ExceptionSqequal  (-1)  THEN  HypSubst'  (-1)  0)

---

Home Index