---

Step * 2 2 1 1 of Lemma mono-list


1. A : Type
2. mono(A)
3. u : A
4. v : A List
5. ∀b:Base. (is-above(A List;v;b) ⇒ (v = b ∈ (A List)))
6. b : Base
7. is-above(A List;<u, v>;b)
8. is-above(A × (A List);<u, v>;b)
9. c : Base
10. d : Base
11. b ~ <c, d>
12. is-above(A;u;c)
13. is-above(A List;v;d)
14. v = d ∈ (A List)
⊢ <u, v> = b ∈ (A List)
BY
{ ((D 2 With ⌜u⌝  THENA Auto) THEN (FHyp (-1) [-4] THENA Auto)) }

1
1. A : Type
2. u : A
3. v : A List
4. ∀b:Base. (is-above(A List;v;b) ⇒ (v = b ∈ (A List)))
5. b : Base
6. is-above(A List;<u, v>;b)
7. is-above(A × (A List);<u, v>;b)
8. c : Base
9. d : Base
10. b ~ <c, d>
11. is-above(A;u;c)
12. is-above(A List;v;d)
13. v = d ∈ (A List)
14. ∀b:Base. (is-above(A;u;b) ⇒ (u = b ∈ A))
15. u = c ∈ A
⊢ <u, v> = b ∈ (A List)

---

Latex:

---

Latex:

1.  A  :  Type
2.  mono(A)
3.  u  :  A
4.  v  :  A  List
5.  \mforall{}b:Base.  (is-above(A  List;v;b)  {}\mRightarrow{}  (v  =  b))
6.  b  :  Base
7.  is-above(A  List;<u,  v>b)
8.  is-above(A  \mtimes{}  (A  List);<u,  v>b)
9.  c  :  Base
10.  d  :  Base
11.  b  \msim{}  <c,  d>
12.  is-above(A;u;c)
13.  is-above(A  List;v;d)
14.  v  =  d
\mvdash{}  <u,  v>  =  b


By

---

Latex:
((D  2  With  \mkleeneopen{}u\mkleeneclose{}    THENA  Auto)  THEN  (FHyp  (-1)  [-4]  THENA  Auto))

---

Home Index