---

Step * of Lemma p-int_wf

∀[p:ℕ+]. ∀[k:ℤ].  (k(p) ∈ p-adics(p))
BY
{ (Unfold `p-adics` 0
   THEN ProveWfLemma
   THEN MemTypeCD
   THEN Auto
   THEN Reduce 0
   THEN RW (AddrC [3] (LemmaC `p-reduce-eqmod`)) 0 
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[p:\mBbbN{}\msupplus{}].  \mforall{}[k:\mBbbZ{}].    (k(p)  \mmember{}  p-adics(p))


By

---

Latex:
(Unfold  `p-adics`  0
  THEN  ProveWfLemma
  THEN  MemTypeCD
  THEN  Auto
  THEN  Reduce  0
  THEN  RW  (AddrC  [3]  (LemmaC  `p-reduce-eqmod`))  0 
  THEN  Auto)

---

Home Index