---

Step * of Lemma fps-not-null

∀[p:FinProbSpace]. (null(p) ~ ff)
BY
{ xxx((D 0 THENA Auto)
      THEN RepeatFor 2 (D 1)
      THEN Reduce 0
      THEN Auto
      THEN RepUR ``qsum rng_sum mon_itop`` 1
      THEN RecUnfold `itop` 1
      THEN Reduce 1
      THEN RWO  "assert-qeq<" 1
      THEN Auto
      THEN RepUR ``qeq`` 1
      THEN Auto)xxx }

---

Latex:

---

Latex:
\mforall{}[p:FinProbSpace].  (null(p)  \msim{}  ff)


By

---

Latex:
xxx((D  0  THENA  Auto)
        THEN  RepeatFor  2  (D  1)
        THEN  Reduce  0
        THEN  Auto
        THEN  RepUR  ``qsum  rng\_sum  mon\_itop``  1
        THEN  RecUnfold  `itop`  1
        THEN  Reduce  1
        THEN  RWO    "assert-qeq<"  1
        THEN  Auto
        THEN  RepUR  ``qeq``  1
        THEN  Auto)xxx

---

Home Index