---

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


1. C : Type
2. left : Form(C)
3. right : Form(C)
4. vs : Atom List
5. phi : Atom List
6. l_subset(Atom;phi;vs-FormFvs(left))
7. FormSafe1(left) vs-phi
8. FormSafe1(right) phi
⊢ set-equal(Atom;vs;vs-phi @ phi)
BY
{ ((D 0 THENA Auto)
   THEN (RWW "member_append member-list-diff" 0 THENA Auto)
   THEN Decide ⌜(t ∈ phi)⌝⋅
   THEN Auto
   THEN D -6 With ⌜t⌝ 
   THEN Auto) }

---

Latex:

---

Latex:

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


By

---

Latex:
((D  0  THENA  Auto)
  THEN  (RWW  "member\_append  member-list-diff"  0  THENA  Auto)
  THEN  Decide  \mkleeneopen{}(t  \mmember{}  phi)\mkleeneclose{}\mcdot{}
  THEN  Auto
  THEN  D  -6  With  \mkleeneopen{}t\mkleeneclose{} 
  THEN  Auto)

---

Home Index