---

Step * 1 1 of Lemma free-dma-lift_wf

.....equality..... 
1. T : Type
2. eq : EqDecider(T)
3. dm : DeMorganAlgebra
4. eq2 : EqDecider(Point(dm))
5. f : T ⟶ Point(dm)
⊢ TERMOF{free-DeMorgan-algebra-property:o, 1:l, 1:l} ~ TERMOF{free-DeMorgan-algebra-property:o, 1:l, i:l}
BY
{ RepeatFor 2 ((RW (SubC (TagC (mk_tag_term 1000))) 0 THEN RepeatFor 6 ((EqCD THEN Try (Trivial))))) }

---

Latex:

---

Latex:
.....equality..... 
1.  T  :  Type
2.  eq  :  EqDecider(T)
3.  dm  :  DeMorganAlgebra
4.  eq2  :  EqDecider(Point(dm))
5.  f  :  T  {}\mrightarrow{}  Point(dm)
\mvdash{}  TERMOF\{free-DeMorgan-algebra-property:o,  1:l,  1:l\}  \msim{}  TERMOF\{free-DeMorgan-algebra-property:o,
                                                                                                                            1:l,
                                                                                                                            i:l\}


By

---

Latex:
RepeatFor  2  ((RW  (SubC  (TagC  (mk\_tag\_term  1000)))  0  THEN  RepeatFor  6  ((EqCD  THEN  Try  (Trivial)))))

---

Home Index