---

Step * 1 1 1 2 1 of Lemma FormSafe-iff-FormSafe1'


1. C : Type
2. left : Form(C)
3. right : Form(C)
4. vs : Atom List
5. as : Atom List
6. bs : Atom List
7. set-equal(Atom;vs;as @ bs)
8. FormSafe1(left) as
9. FormSafe1(right) bs
10. l_disjoint(Atom;bs;FormFvs(left))
⊢ l_subset(Atom;bs;vs-FormFvs(left))
BY
{ ((D 0 THENA Auto) THEN (RWO "member-list-diff" 0 THENA Auto)) }

1
1. C : Type
2. left : Form(C)
3. right : Form(C)
4. vs : Atom List
5. as : Atom List
6. bs : Atom List
7. set-equal(Atom;vs;as @ bs)
8. FormSafe1(left) as
9. FormSafe1(right) bs
10. l_disjoint(Atom;bs;FormFvs(left))
11. x : Atom
⊢ (x ∈ bs) ⇒ ((x ∈ vs) ∧ (¬(x ∈ FormFvs(left))))

---

Latex:

---

Latex:

1.  C  :  Type
2.  left  :  Form(C)
3.  right  :  Form(C)
4.  vs  :  Atom  List
5.  as  :  Atom  List
6.  bs  :  Atom  List
7.  set-equal(Atom;vs;as  @  bs)
8.  FormSafe1(left)  as
9.  FormSafe1(right)  bs
10.  l\_disjoint(Atom;bs;FormFvs(left))
\mvdash{}  l\_subset(Atom;bs;vs-FormFvs(left))


By

---

Latex:
((D  0  THENA  Auto)  THEN  (RWO  "member-list-diff"  0  THENA  Auto))

---

Home Index