---

Step * 1 of Lemma rng-pp-nontriv2_wf

.....equality..... 
1. r : IntegDom{i}
2. eq : EqDecider(|r|)
3. a : {p:ℕ3 ⟶ |r|| ¬(p = 0 ∈ (ℕ3 ⟶ |r|))} 
⊢ rng-pp-nontriv2(r;eq;a) ~ TERMOF{rng-pp-nontrivial-4-ext:o, \\v:l, i:l} r eq a
BY
{ (RW (AddrC [2] (TagC (mk_tag_term 1))) 0 THEN Reduce 0 THEN Auto) }

---

Latex:

---

Latex:
.....equality..... 
1.  r  :  IntegDom\{i\}
2.  eq  :  EqDecider(|r|)
3.  a  :  \{p:\mBbbN{}3  {}\mrightarrow{}  |r||  \mneg{}(p  =  0)\} 
\mvdash{}  rng-pp-nontriv2(r;eq;a)  \msim{}  TERMOF\{rng-pp-nontrivial-4-ext:o,  \mbackslash{}\mbackslash{}v:l,  i:l\}  r  eq  a


By

---

Latex:
(RW  (AddrC  [2]  (TagC  (mk\_tag\_term  1)))  0  THEN  Reduce  0  THEN  Auto)

---

Home Index