Nuprl Lemma : slln-lemma2

∀p:FinProbSpace. ∀f:ℕ ─→ ℕ. ∀X:n:ℕ ─→ RandomVariable(p;f[n]). ∀s,k:ℚ.
  ((∀n:ℕ. ∀i:ℕn.  rv-disjoint(p;f[n];X[i];X[n]))
     ⇒ (∃B:ℚ
          ∀n:ℕ
            (E(f[n];rv-partial-sum(n;k.if (k =z 0)
            then 0
            else (x.(x * x) * x * x) o (1/k)*rv-partial-sum(k;i.X[i])
            fi )) ≤ B))) supposing 
     ((∀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 ∈ ℚ))) and 
     (∀n:ℕ. ∀i:ℕn.  f[i] < f[n]))


Proof




Definitions occuring in Statement :  rv-partial-sum: rv-partial-sum(n;i.X[i]),  rv-compose: (x.F[x]) o X,  rv-disjoint: rv-disjoint(p;n;X;Y),  expectation: E(n;F),  rv-const: a,  rv-scale: q*X,  random-variable: RandomVariable(p;n),  finite-prob-space: FinProbSpace,  int_seg: {i..j-},  nat: ℕ,  ifthenelse: if b then t else f fi ,  eq_int: (i =z j),  less_than: a < b,  uimplies: b supposing a,  so_apply: x[s],  all: ∀x:A. B[x],  exists: ∃x:A. B[x],  implies: P ⇒ Q,  and: P ∧ Q,  function: x:A ─→ B[x],  natural_number: $n,  equal: s = t ∈ T,  qdiv: (r/s),  qmul: r * s,  rationals: ℚ
Lemmas :  member-less_than,  int_seg_subtype-nat,  false_wf,  nat_wf,  int_seg_wf,  slln-lemma1,  qmul_wf,  int-subtype-rationals,  all_wf,  Error :qle_wf,  expectation_wf,  rv-partial-sum_wf,  eq_int_wf,  bool_wf,  eqtt_to_assert,  assert_of_eq_int,  rv-const_wf,  eqff_to_assert,  equal_wf,  bool_cases_sqequal,  subtype_base_sq,  bool_subtype_base,  iff_transitivity,  assert_wf,  bnot_wf,  not_wf,  equal-wf-T-base,  iff_weakening_uiff,  assert_of_bnot,  int_upper_subtype_nat,  le_wf,  nat_properties,  nequal-le-implies,  zero-add,  rv-compose_wf,  rv-scale_wf,  qdiv_wf,  subtype_rel_set,  Error :int_nzero-rational,  subtype_rel_sets,  nequal_wf,  not-equal-2,  decidable__le,  not-le-2,  condition-implies-le,  minus-add,  minus-one-mul,  add-swap,  add-associates,  add-commutes,  add_functionality_wrt_le,  le-add-cancel2,  or_wf,  equal-wf-base,  int_subtype_base,  rv-disjoint_wf,  subtype_rel-random-variable,  le_weakening2,  rationals_wf,  less_than_wf,  random-variable_wf,  finite-prob-space_wf,  expectation-qsum,  assert-bnot,  neg_assert_of_eq_int,  lelt_wf,  int-equal-in-rationals,  int_entire_a,  qmul-mul,  Error :qsum-qle,  uiff_transitivity,  Error :qle_reflexivity,  Error :non-neg-qmul,  iff_weakening_equal,  expectation-rv-const,  true_wf,  squash_wf,  expectation-monotone-in-first,  p-outcome_wf,  mul_nzero,  Error :qmul-qdiv,  Error :qmul_comm_qrng,  Error :qmul_ac_1_qrng,  Error :qmul_assoc_qrng,  le_antisymmetry_iff,  decidable__equal_int,  zero_ann_a,  mul-associates,  minus-zero,  le-add-cancel,  add-zero,  expectation-rv-scale,  Error :qle_weakening_eq_qorder,  Error :qmul_functionality_wrt_qle,  Error :qle_functionality_wrt_implies,  Error :qless_wf,  decidable__lt,  Error :qless-int,  Error :qmul-positive,  Error :qinv-nonneg,  expectation-non-neg,  Error :q-square-non-neg,  Error :qmul_preserves_qle,  qmul_assoc,  qmul_com,  Error :qmul-qdiv-cancel,  Error :qsum_wf,  Error :prod_sum_l_q,  sq_stable__le,  Error :sum_unroll_base_q,  less_than_irreflexivity,  less_than_transitivity1,  subtype_rel-equal,  Error :qle_witness,  Error :qmul_preserves_qle2,  Error :qmul_zero_qrng,  Error :sum_unroll_lo_q,  Error :qsum-reciprocal-squares-bound,  Error :decidable__equal_rationals,  Error :mon_ident_q,  Error :qmul_over_plus_qrng,  qadd_wf,  Error :qmul_one_qrng,  Error :qmul-qdiv-cancel2,  Error :qle_weakening_lt_qorder,  Error :qinv-positive,  Error :q-square-positive,  Error :qmul_preserves_qless,  Error :qle-iff
\mforall{}p:FinProbSpace.  \mforall{}f:\mBbbN{}  {}\mrightarrow{}  \mBbbN{}.  \mforall{}X:n:\mBbbN{}  {}\mrightarrow{}  RandomVariable(p;f[n]).  \mforall{}s,k:\mBbbQ{}.
    ((\mforall{}n:\mBbbN{}.  \mforall{}i:\mBbbN{}n.    rv-disjoint(p;f[n];X[i];X[n]))
          {}\mRightarrow{}  (\mexists{}B:\mBbbQ{}
                    \mforall{}n:\mBbbN{}
                        (E(f[n];rv-partial-sum(n;k.if  (k  =\msubz{}  0)
                        then  0
                        else  (x.(x  *  x)  *  x  *  x)  o  (1/k)*rv-partial-sum(k;i.X[i])
                        fi  ))  \mleq{}  B)))  supposing 
          ((\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)))  and 
          (\mforall{}n:\mBbbN{}.  \mforall{}i:\mBbbN{}n.    f[i]  <  f[n]))



Date html generated: 2015_07_17-AM-08_03_40
Last ObjectModification: 2015_07_17-AM-07_31_03

Home Index