---

Step * of Lemma bpa-add_wf

∀[p:ℕ+]. ∀[x,y:basic-padic(p)].  (bpa-add(p;x;y) ∈ basic-padic(p))
BY
{ (Auto
   THEN D -2
   THEN D -1
   THEN RepUR ``bpa-add basic-padic`` 0
   THEN (Assert (x1 ≤ imax(x1;y1)) ∧ (y1 ≤ imax(x1;y1)) BY
               Auto)
   THEN RepeatFor 3 ((CallByValueReduce 0 THENA Auto))
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[p:\mBbbN{}\msupplus{}].  \mforall{}[x,y:basic-padic(p)].    (bpa-add(p;x;y)  \mmember{}  basic-padic(p))


By

---

Latex:
(Auto
  THEN  D  -2
  THEN  D  -1
  THEN  RepUR  ``bpa-add  basic-padic``  0
  THEN  (Assert  (x1  \mleq{}  imax(x1;y1))  \mwedge{}  (y1  \mleq{}  imax(x1;y1))  BY
                          Auto)
  THEN  RepeatFor  3  ((CallByValueReduce  0  THENA  Auto))
  THEN  Auto)

---

Home Index