---

Step * 1 1 1 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;as;FormFvs(right))
⊢ ∃theta:Atom List. (l_subset(Atom;theta;vs-FormFvs(right)) ∧ (FormSafe1(left) theta) ∧ (FormSafe1(right) vs-theta))
BY
{ (D 0 With ⌜as⌝  THEN 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;as;FormFvs(right))
⊢ l_subset(Atom;as;vs-FormFvs(right))

2
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;as;FormFvs(right))
11. l_subset(Atom;as;vs-FormFvs(right))
12. FormSafe1(left) as
⊢ FormSafe1(right) vs-as

---

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;as;FormFvs(right))
\mvdash{}  \mexists{}theta:Atom  List
      (l\_subset(Atom;theta;vs-FormFvs(right))  \mwedge{}  (FormSafe1(left)  theta)  \mwedge{}  (FormSafe1(right)  vs-theta))


By

---

Latex:
(D  0  With  \mkleeneopen{}as\mkleeneclose{}    THEN  Auto)

---

Home Index