---

Step * 1 1 1 1 2 1 1 of Lemma slln-lemma2

.....equality..... 
1. p : FinProbSpace
2. f : ℕ ⟶ ℕ
3. X : n:ℕ ⟶ RandomVariable(p;f[n])
4. s : ℚ
5. k : ℚ
6. ∀n:ℕ. ∀i:ℕn.  f[i] < f[n]
7. ∀n:ℕ. ((E(f[n];X[n]) = 0 ∈ ℚ) ∧ (E(f[n];(x.x * x) o X[n]) = s ∈ ℚ) ∧ (E(f[n];(x.(x * x) * x * x) o X[n]) = k ∈ ℚ))
8. ∀n:ℕ. ∀i:ℕn.  rv-disjoint(p;f[n];X[i];X[n])
9. B : ℚ
10. 0 ≤ B
11. ∀n:ℕ. (E(f[n];(x.(x * x) * x * x) o rv-partial-sum(n;i.X[i])) ≤ (B * n * n))
12. n : ℕ
13. ∀k:ℕn. (rv-partial-sum(k;i.X[i]) ∈ RandomVariable(p;f[n]))
14. i : ℤ
15. 0 ≤ i
16. i < n
17. ¬(i = 0 ∈ ℤ)
18. E(f[n];(x.(x * x) * x * x) o rv-partial-sum(i;i.X[i])) ≤ (B * i * i)
⊢ E(f[n];(x.(x * x) * x * x) o (1/i)*rv-partial-sum(i;i.X[i]))
= E(f[n];(1/(i * i) * i * i)*(x.(x * x) * x * x) o rv-partial-sum(i;i.X[i]))
∈ ℚ
BY
{ xxx(EqCD
      THEN Auto
      THEN (GenConcl ⌜rv-partial-sum(i;i.X[i]) = Z ∈ RandomVariable(p;f[n])⌝⋅ THENA Auto)
      THEN RepUR ``random-variable rv-compose rv-scale`` 0
      THEN Unfold `random-variable` -2
      THEN (All (Fold `p-outcome`)))xxx }

1
1. p : FinProbSpace
2. f : ℕ ⟶ ℕ
3. X : n:ℕ ⟶ RandomVariable(p;f[n])
4. s : ℚ
5. k : ℚ
6. ∀n:ℕ. ∀i:ℕn.  f[i] < f[n]
7. ∀n:ℕ. ((E(f[n];X[n]) = 0 ∈ ℚ) ∧ (E(f[n];(x.x * x) o X[n]) = s ∈ ℚ) ∧ (E(f[n];(x.(x * x) * x * x) o X[n]) = k ∈ ℚ))
8. ∀n:ℕ. ∀i:ℕn.  rv-disjoint(p;f[n];X[i];X[n])
9. B : ℚ
10. 0 ≤ B
11. ∀n:ℕ. (E(f[n];(x.(x * x) * x * x) o rv-partial-sum(n;i.X[i])) ≤ (B * n * n))
12. n : ℕ
13. ∀k:ℕn. (rv-partial-sum(k;i.X[i]) ∈ RandomVariable(p;f[n]))
14. i : ℤ
15. 0 ≤ i
16. i < n
17. ¬(i = 0 ∈ ℤ)
18. E(f[n];(x.(x * x) * x * x) o rv-partial-sum(i;i.X[i])) ≤ (B * i * i)
19. Z : (ℕf[n] ⟶ Outcome) ⟶ ℚ
20. rv-partial-sum(i;i.X[i]) = Z ∈ RandomVariable(p;f[n])
⊢ (λs.((((1/i) * (Z s)) * (1/i) * (Z s)) * ((1/i) * (Z s)) * (1/i) * (Z s)))
= (λs.((1/(i * i) * i * i) * ((Z s) * (Z s)) * (Z s) * (Z s)))
∈ ((ℕf[n] ⟶ Outcome) ⟶ ℚ)

---

Latex:

---

Latex:
.....equality..... 
1.  p  :  FinProbSpace
2.  f  :  \mBbbN{}  {}\mrightarrow{}  \mBbbN{}
3.  X  :  n:\mBbbN{}  {}\mrightarrow{}  RandomVariable(p;f[n])
4.  s  :  \mBbbQ{}
5.  k  :  \mBbbQ{}
6.  \mforall{}n:\mBbbN{}.  \mforall{}i:\mBbbN{}n.    f[i]  <  f[n]
7.  \mforall{}n:\mBbbN{}
          ((E(f[n];X[n])  =  0)
          \mwedge{}  (E(f[n];(x.x  *  x)  o  X[n])  =  s)
          \mwedge{}  (E(f[n];(x.(x  *  x)  *  x  *  x)  o  X[n])  =  k))
8.  \mforall{}n:\mBbbN{}.  \mforall{}i:\mBbbN{}n.    rv-disjoint(p;f[n];X[i];X[n])
9.  B  :  \mBbbQ{}
10.  0  \mleq{}  B
11.  \mforall{}n:\mBbbN{}.  (E(f[n];(x.(x  *  x)  *  x  *  x)  o  rv-partial-sum(n;i.X[i]))  \mleq{}  (B  *  n  *  n))
12.  n  :  \mBbbN{}
13.  \mforall{}k:\mBbbN{}n.  (rv-partial-sum(k;i.X[i])  \mmember{}  RandomVariable(p;f[n]))
14.  i  :  \mBbbZ{}
15.  0  \mleq{}  i
16.  i  <  n
17.  \mneg{}(i  =  0)
18.  E(f[n];(x.(x  *  x)  *  x  *  x)  o  rv-partial-sum(i;i.X[i]))  \mleq{}  (B  *  i  *  i)
\mvdash{}  E(f[n];(x.(x  *  x)  *  x  *  x)  o  (1/i)*rv-partial-sum(i;i.X[i]))
=  E(f[n];(1/(i  *  i)  *  i  *  i)*(x.(x  *  x)  *  x  *  x)  o  rv-partial-sum(i;i.X[i]))


By

---

Latex:
xxx(EqCD
        THEN  Auto
        THEN  (GenConcl  \mkleeneopen{}rv-partial-sum(i;i.X[i])  =  Z\mkleeneclose{}\mcdot{}  THENA  Auto)
        THEN  RepUR  ``random-variable  rv-compose  rv-scale``  0
        THEN  Unfold  `random-variable`  -2
        THEN  (All  (Fold  `p-outcome`)))xxx

---

Home Index