Step
*
2
of Lemma
partial-not-exception
1. T : Type
2. x : Base
3. x1 : Base
4. x = x1 ∈ pertype(λx,y. ((x ∈ base-partial(T)) ∧ (y ∈ base-partial(T)) ∧ per-partial(T;x;y)))
5. x ∈ base-partial(T)
6. x1 ∈ base-partial(T)
7. per-partial(T;x;x1)
⊢ (λx.x) = (λx.x) ∈ (¬is-exception(x))
BY
{ TACTIC:(Unfold `not` 0 THEN EqCD) }
1
.....subterm..... T:t
1:n
1. T : Type
2. x : Base
3. x1 : Base
4. x = x1 ∈ pertype(λx,y. ((x ∈ base-partial(T)) ∧ (y ∈ base-partial(T)) ∧ per-partial(T;x;y)))
5. x ∈ base-partial(T)
6. x1 ∈ base-partial(T)
7. per-partial(T;x;x1)
8. x2 : is-exception(x)@i
⊢ x2 = x2 ∈ False
2
.....eq aux..... 
1. T : Type
2. x : Base
3. x1 : Base
4. x = x1 ∈ pertype(λx,y. ((x ∈ base-partial(T)) ∧ (y ∈ base-partial(T)) ∧ per-partial(T;x;y)))
5. x ∈ base-partial(T)
6. x1 ∈ base-partial(T)
7. per-partial(T;x;x1)
⊢ is-exception(x) = is-exception(x) ∈ Type
Latex:
Latex:
1.  T  :  Type
2.  x  :  Base
3.  x1  :  Base
4.  x  =  x1
5.  x  \mmember{}  base-partial(T)
6.  x1  \mmember{}  base-partial(T)
7.  per-partial(T;x;x1)
\mvdash{}  (\mlambda{}x.x)  =  (\mlambda{}x.x)
By
Latex:
TACTIC:(Unfold  `not`  0  THEN  EqCD)
Home
Index