Theory martingale

Parents

Contents

Type operators

(none)

Constants

Definitions

RN_deriv_defRN_deriv_property_deffcp_cross_deffcp_prod_deffcp_sigma_deffiltered_measure_space_deffiltration_defgeneral_cross_defgeneral_prod_defgeneral_prod_measure_defgeneral_prod_measure_spacegeneral_sigma_definfty_sigma_algebra_deflborel_2d_deflp_space_defmartingale_defpair_operation_defprod_measure_defprod_measure_space_defseminorm_defsigma_finite_filtered_measure_space_defsub_martingale_defsub_sigma_algebra_defsuper_martingale_def

Theorems

CROSS_ALTCauchy_Schwarz_inequalityCauchy_Schwarz_inequality'EXISTENCE_OF_PROD_MEASUREEXISTENCE_OF_PROD_MEASURE'FCP_BIGUNION_CROSSFCP_CROSS_BIGUNIONFCP_CROSS_DIFFFCP_CROSS_DIFF'FCP_INTER_CROSSFCP_SUBSET_CROSSFILTRATIONFILTRATION_BOUNDEDFILTRATION_MONOFILTRATION_SUBSETSFUBINIFUBINI'FubiniFubini'Hoelder_inequalityHoelder_inequality'INDICATOR_FN_FCP_CROSSINFTY_SIGMA_ALGEBRA_BOUNDEDINFTY_SIGMA_ALGEBRA_MAXIMALIN_FCP_CROSSIN_FCP_PRODIN_MEASURABLE_BOREL_FROM_PROD_SIGMAIN_RN_deriv_propertyIN_general_crossIN_general_prodL1_space_alt_integrableL2_space_alt_integrable_squareMARTINGALE_EQ_SUB_SUPERMEASURABLE_SPACE_PRODMinkowski_inequalityMinkowski_inequality'PROD_MEASURE_CROSSPROD_SIGMA_OF_GENERATORRN_derivIRN_deriv_1RN_deriv_RN_deriv_propertyRN_deriv_integralRN_deriv_invRN_deriv_mulRN_deriv_pos_fn_integralRN_deriv_positive_integralRN_deriv_property_1RN_deriv_property_almost_RN_derivRN_deriv_property_almost_uniqueRN_deriv_property_mulRN_deriv_property_pos_fn_integralRN_deriv_thmRN_deriv_thm'SIGMA_FINITE_FILTERED_MEASURE_SPACESPACE_PRODSUB_SIGMA_ALGEBRA_ANTISYMSUB_SIGMA_ALGEBRA_MEASURE_SPACESUB_SIGMA_ALGEBRA_ORDERSUB_SIGMA_ALGEBRA_REFLSUB_SIGMA_ALGEBRA_TRANSTONELLIUNIQUENESS_OF_PROD_MEASUREUNIQUENESS_OF_PROD_MEASURE'continuity_lemmacontinuity_univ_lemmadensity_RN_derivdensity_eqdensity_of_pos_fndifferentiable_lemmadifferentiable_lemma'differentiable_univ_lemmadifferentiable_univ_lemma'exhausting_sequence_CROSSexhausting_sequence_crossexhausting_sequence_general_crossexistence_of_prod_measureexistence_of_prod_measure_generalfatou_lemmafatou_lemma'fcp_cross_UNIVfcp_cross_altfcp_prod_altfcp_sigma_altfiltration_from_measurable_functionsfubini_generalgeneral_BIGUNION_CROSSgeneral_CROSS_BIGUNIONgeneral_CROSS_DIFFgeneral_CROSS_DIFF'general_INTER_CROSSgeneral_SUBSET_CROSSgeneral_cross_emptygeneral_cross_reducegeneral_prod_measure_space_defgeneral_sigma_of_generatorindicator_fn_general_crossintegrable_AE_finiteintegrable_add'integrable_bounded_existsintegrable_cong_AEintegrable_cong_AE_altintegrable_cong_measureintegrable_cong_measure'integrable_eq_AE_altintegrable_measurableintegrable_sub'integrable_sum'integral_add'integral_add3integral_cong_measureintegral_cong_measure'integral_densityintegral_disjoint_setsintegral_disjoint_sets_sumintegral_distrintegral_eq_0_imp_AE_0integral_eq_imp_AE_eqintegral_mono_AEintegral_sub'integral_sum'lborel_2d_prod_measurelebesgue_dominated_convergencelebesgue_dominated_convergence'lp_space_AE_normallp_space_addlp_space_add_cmullp_space_alt_finitelp_space_alt_finite'lp_space_alt_infinitelp_space_alt_seminormlp_space_cmullp_space_conglp_space_cong_AElp_space_submartingale_altmartingale_alt_generatormeasure_space_general_prod_measuremeasure_space_prod_measurepair_operation_CONSpair_operation_FCP_CONCATpair_operation_pairpos_fn_integrable_AE_finitepos_fn_integral_add3pos_fn_integral_cong'pos_fn_integral_cong_measurepos_fn_integral_cong_measure'pos_fn_integral_densitypos_fn_integral_density_ofpos_fn_integral_density_of_reducepos_fn_integral_density_reducepos_fn_integral_distrpos_fn_integral_distr_ofpos_fn_integral_eq_0_imp_AE_0pos_fn_integral_exchangeprod_measure_space_altprod_measure_space_alt_generalprod_sets_altprod_sigma_altprod_sigma_of_generatorseminorm_cmulseminorm_congseminorm_cong_AEseminorm_eq_0seminorm_inftyseminorm_infty_AE_boundseminorm_infty_altseminorm_normalseminorm_not_inftyseminorm_oneseminorm_posseminorm_powrseminorm_twoseminorm_zerosigma_algebra_general_sigmasigma_algebra_prod_sigmasigma_algebra_prod_sigma'sigma_finite_filtered_measure_space_altsigma_finite_filtered_measure_space_alt_allsub_martingale_altsub_martingale_alt_generatorsuper_martingale_altsuper_martingale_alt_generatortonelli_generaluniqueness_of_prod_measureuniqueness_of_prod_measure'uniqueness_of_prod_measure_generaluniqueness_of_prod_measure_general'

Definitions

⊢ ∀v m.
    v / m =
    @f. f ∈ Borel_measurable (measurable_space m) ∧
        (∀x. x ∈ m_space m ⇒ 0 ≤ f x) ∧
        ∀s. s ∈ measurable_sets m ⇒ (f * m) s = v s
⊢ ∀sa nu mu f.
    RN_deriv_property sa nu mu f ⇔
    f ∈ Borel_measurable sa ∧ (∀x. x ∈ space sa ⇒ 0 ≤ f x) ∧
    ∀s. s ∈ subsets sa ⇒ (f * (space sa,subsets sa,mu)) s = nu s
⊢ ∀A B. fcp_cross A B = {FCP_CONCAT a b | a ∈ A ∧ b ∈ B}
⊢ ∀a b. fcp_prod a b = {fcp_cross s t | s ∈ a ∧ t ∈ b}
⊢ ∀a b.
    fcp_sigma a b =
    sigma (fcp_cross (space a) (space b))
      (fcp_prod (subsets a) (subsets b))
⊢ ∀m a.
    filtered_measure_space m a ⇔
    measure_space m ∧ filtration (measurable_space m) a
⊢ ∀A a.
    filtration A a ⇔
    (∀n. sub_sigma_algebra (a n) A) ∧
    ∀i j. i ≤ j ⇒ subsets (a i) ⊆ subsets (a j)
⊢ ∀cons A B. general_cross cons A B = {cons a b | a ∈ A ∧ b ∈ B}
⊢ ∀cons A B.
    general_prod cons A B = {general_cross cons a b | a ∈ A ∧ b ∈ B}
⊢ ∀cons m1 m2.
    general_prod_measure cons m1 m2 =
    (λs. ∫⁺ m2 (λy. ∫⁺ m1 (λx. 𝟙 s (cons x y))))
⊢ ∀cons m1 m2.
    general_prod_measure_space cons m1 m2 =
    (general_cross cons (m_space m1) (m_space m2),
     subsets
       (general_sigma cons (measurable_space m1) (measurable_space m2)),
     general_prod_measure cons m1 m2)
⊢ ∀cons A B.
    general_sigma cons A B =
    sigma (general_cross cons (space A) (space B))
      (general_prod cons (subsets A) (subsets B))
⊢ ∀sp a.
    infty_sigma_algebra sp a =
    sigma sp (BIGUNION (IMAGE (λi. subsets (a i)) 𝕌(:num)))
lborel_2d_def
⊢ sigma_finite_measure_space lborel_2d ∧
  m_space lborel_2d = 𝕌(:real) × 𝕌(:real) ∧
  measurable_sets lborel_2d =
  subsets ((𝕌(:real),subsets borel) × (𝕌(:real),subsets borel)) ∧
  (∀s t.
     s ∈ subsets borel ∧ t ∈ subsets borel ⇒
     measure lborel_2d (s × t) = lambda s * lambda t) ∧
  ∀s. s ∈ measurable_sets lborel_2d ⇒
      (∀x. (λy. 𝟙 s (x,y)) ∈ Borel_measurable borel) ∧
      (∀y. (λx. 𝟙 s (x,y)) ∈ Borel_measurable borel) ∧
      (λy. ∫⁺ lborel (λx. 𝟙 s (x,y))) ∈ Borel_measurable borel ∧
      (λx. ∫⁺ lborel (λy. 𝟙 s (x,y))) ∈ Borel_measurable borel ∧
      measure lborel_2d s = ∫⁺ lborel (λy. ∫⁺ lborel (λx. 𝟙 s (x,y))) ∧
      measure lborel_2d s = ∫⁺ lborel (λx. ∫⁺ lborel (λy. 𝟙 s (x,y)))
⊢ ∀p m.
    lp_space p m =
    {f |
     f ∈ Borel_measurable (measurable_space m) ∧
     if p = +∞ then
       ∃c. 0 < c ∧ c ≠ +∞ ∧
           measure m {x | x ∈ m_space m ∧ c ≤ abs (f x)} = 0
     else ∫⁺ m (λx. abs (f x) powr p) ≠ +∞}
⊢ ∀m a u.
    martingale m a u ⇔
    sigma_finite_filtered_measure_space m a ∧ (∀n. integrable m (u n)) ∧
    ∀n s.
      s ∈ subsets (a n) ⇒
      ∫ m (λx. u (SUC n) x * 𝟙 s x) = ∫ m (λx. u n x * 𝟙 s x)
⊢ ∀cons car cdr.
    pair_operation cons car cdr ⇔
    (∀a b. car (cons a b) = a ∧ cdr (cons a b) = b) ∧
    ∀a b c d. cons a b = cons c d ⇔ a = c ∧ b = d
⊢ ∀m1 m2. prod_measure m1 m2 = (λs. ∫⁺ m2 (λy. ∫⁺ m1 (λx. 𝟙 s (x,y))))
⊢ ∀m1 m2.
    m1 × m2 =
    (m_space m1 × m_space m2,
     subsets (measurable_space m1 × measurable_space m2),prod_measure m1 m2)
⊢ ∀p m f.
    seminorm p m f =
    if p = +∞ then
      inf {c | 0 < c ∧ measure m {x | x ∈ m_space m ∧ c ≤ abs (f x)} = 0}
    else ∫⁺ m (λx. abs (f x) powr p) powr p⁻¹
⊢ ∀m a.
    sigma_finite_filtered_measure_space m a ⇔
    filtered_measure_space m a ∧
    sigma_finite (m_space m,subsets (a 0),measure m)
⊢ ∀m a u.
    sub_martingale m a u ⇔
    sigma_finite_filtered_measure_space m a ∧ (∀n. integrable m (u n)) ∧
    ∀n s.
      s ∈ subsets (a n) ⇒
      ∫ m (λx. u n x * 𝟙 s x) ≤ ∫ m (λx. u (SUC n) x * 𝟙 s x)
⊢ ∀a b.
    sub_sigma_algebra a b ⇔
    sigma_algebra a ∧ sigma_algebra b ∧ space a = space b ∧
    subsets a ⊆ subsets b
⊢ ∀m a u.
    super_martingale m a u ⇔
    sigma_finite_filtered_measure_space m a ∧ (∀n. integrable m (u n)) ∧
    ∀n s.
      s ∈ subsets (a n) ⇒
      ∫ m (λx. u (SUC n) x * 𝟙 s x) ≤ ∫ m (λx. u n x * 𝟙 s x)

Theorems

⊢ ∀A B. A × B = general_cross $, A B
⊢ ∀m u v.
    measure_space m ∧ u ∈ L2_space m ∧ v ∈ L2_space m ⇒
    integrable m (λx. u x * v x) ∧
    ∫ m (λx. abs (u x * v x)) ≤ seminorm 2 m u * seminorm 2 m v
⊢ ∀m u v.
    measure_space m ∧ u ∈ L2_space m ∧ v ∈ L2_space m ⇒
    ∫⁺ m (λx. abs (u x * v x)) ≤
    sqrt (∫⁺ m (λx. (u x)²) * ∫⁺ m (λx. (v x)²))
⊢ ∀X Y A B u v m0.
    sigma_finite_measure_space (X,A,u) ∧
    sigma_finite_measure_space (Y,B,v) ∧
    (∀s t. s ∈ A ∧ t ∈ B ⇒ m0 (s × t) = u s * v t) ⇒
    (∀s. s ∈ subsets ((X,A) × (Y,B)) ⇒
         (∀x. x ∈ X ⇒ (λy. 𝟙 s (x,y)) ∈ Borel_measurable (Y,B)) ∧
         (∀y. y ∈ Y ⇒ (λx. 𝟙 s (x,y)) ∈ Borel_measurable (X,A)) ∧
         (λy. ∫⁺ (X,A,u) (λx. 𝟙 s (x,y))) ∈ Borel_measurable (Y,B) ∧
         (λx. ∫⁺ (Y,B,v) (λy. 𝟙 s (x,y))) ∈ Borel_measurable (X,A)) ∧
    ∃m. sigma_finite_measure_space (X × Y,subsets ((X,A) × (Y,B)),m) ∧
        (∀s. s ∈ prod_sets A B ⇒ m s = m0 s) ∧
        ∀s. s ∈ subsets ((X,A) × (Y,B)) ⇒
            m s = ∫⁺ (Y,B,v) (λy. ∫⁺ (X,A,u) (λx. 𝟙 s (x,y))) ∧
            m s = ∫⁺ (X,A,u) (λx. ∫⁺ (Y,B,v) (λy. 𝟙 s (x,y)))
⊢ ∀X Y A B u v m0.
    sigma_finite_measure_space (X,A,u) ∧
    sigma_finite_measure_space (Y,B,v) ∧
    (∀s t. s ∈ A ∧ t ∈ B ⇒ m0 (s × t) = u s * v t) ⇒
    (∀s. s ∈ subsets ((X,A) × (Y,B)) ⇒
         (∀x. x ∈ X ⇒ (λy. 𝟙 s (x,y)) ∈ Borel_measurable (Y,B)) ∧
         (∀y. y ∈ Y ⇒ (λx. 𝟙 s (x,y)) ∈ Borel_measurable (X,A)) ∧
         (λy. ∫ (X,A,u) (λx. 𝟙 s (x,y))) ∈ Borel_measurable (Y,B) ∧
         (λx. ∫ (Y,B,v) (λy. 𝟙 s (x,y))) ∈ Borel_measurable (X,A)) ∧
    ∃m. sigma_finite_measure_space (X × Y,subsets ((X,A) × (Y,B)),m) ∧
        (∀s. s ∈ prod_sets A B ⇒ m s = m0 s) ∧
        ∀s. s ∈ subsets ((X,A) × (Y,B)) ⇒
            m s = ∫ (Y,B,v) (λy. ∫ (X,A,u) (λx. 𝟙 s (x,y))) ∧
            m s = ∫ (X,A,u) (λx. ∫ (Y,B,v) (λy. 𝟙 s (x,y)))
⊢ ∀f s t.
    fcp_cross (BIGUNION (IMAGE f s)) t =
    BIGUNION (IMAGE (λn. fcp_cross (f n) t) s)
⊢ ∀f s t.
    fcp_cross t (BIGUNION (IMAGE f s)) =
    BIGUNION (IMAGE (λn. fcp_cross t (f n)) s)
⊢ ∀X s t.
    FINITE 𝕌(:β) ∧ FINITE 𝕌(:γ) ⇒
    fcp_cross (X DIFF s) t = fcp_cross X t DIFF fcp_cross s t
⊢ ∀s X t.
    FINITE 𝕌(:β) ∧ FINITE 𝕌(:γ) ⇒
    fcp_cross s (X DIFF t) = fcp_cross s X DIFF fcp_cross s t
⊢ ∀a b c d.
    FINITE 𝕌(:β) ∧ FINITE 𝕌(:γ) ⇒
    fcp_cross a b ∩ fcp_cross c d = fcp_cross (a ∩ c) (b ∩ d)
⊢ ∀a b c d. a ⊆ b ∧ c ⊆ d ⇒ fcp_cross a c ⊆ fcp_cross b d
⊢ ∀A a.
    filtration A a ⇔
    (∀n. sub_sigma_algebra (a n) A) ∧ (∀n. subsets (a n) ⊆ subsets A) ∧
    ∀i j. i ≤ j ⇒ subsets (a i) ⊆ subsets (a j)
⊢ ∀A a. filtration A a ⇒ ∀n. sub_sigma_algebra (a n) A
⊢ ∀A a. filtration A a ⇒ ∀i j. i ≤ j ⇒ subsets (a i) ⊆ subsets (a j)
⊢ ∀A a. filtration A a ⇒ ∀n. subsets (a n) ⊆ subsets A
⊢ ∀X Y A B u v f.
    sigma_finite_measure_space (X,A,u) ∧
    sigma_finite_measure_space (Y,B,v) ∧
    f ∈ Borel_measurable ((X,A) × (Y,B)) ∧
    (∫⁺ ((X,A,u) × (Y,B,v)) (abs ∘ f) ≠ +∞ ∨
     ∫⁺ (Y,B,v) (λy. ∫⁺ (X,A,u) (λx. (abs ∘ f) (x,y))) ≠ +∞ ∨
     ∫⁺ (X,A,u) (λx. ∫⁺ (Y,B,v) (λy. (abs ∘ f) (x,y))) ≠ +∞) ⇒
    ∫⁺ ((X,A,u) × (Y,B,v)) (abs ∘ f) ≠ +∞ ∧
    ∫⁺ (Y,B,v) (λy. ∫⁺ (X,A,u) (λx. (abs ∘ f) (x,y))) ≠ +∞ ∧
    ∫⁺ (X,A,u) (λx. ∫⁺ (Y,B,v) (λy. (abs ∘ f) (x,y))) ≠ +∞ ∧
    integrable ((X,A,u) × (Y,B,v)) f ∧
    (AE y::(Y,B,v). integrable (X,A,u) (λx. f (x,y))) ∧
    (AE x::(X,A,u). integrable (Y,B,v) (λy. f (x,y))) ∧
    integrable (X,A,u) (λx. ∫ (Y,B,v) (λy. f (x,y))) ∧
    integrable (Y,B,v) (λy. ∫ (X,A,u) (λx. f (x,y))) ∧
    ∫ ((X,A,u) × (Y,B,v)) f = ∫ (Y,B,v) (λy. ∫ (X,A,u) (λx. f (x,y))) ∧
    ∫ ((X,A,u) × (Y,B,v)) f = ∫ (X,A,u) (λx. ∫ (Y,B,v) (λy. f (x,y)))
⊢ ∀X Y A B u v f.
    sigma_finite_measure_space (X,A,u) ∧
    sigma_finite_measure_space (Y,B,v) ∧
    f ∈ Borel_measurable ((X,A) × (Y,B)) ∧
    (∫ ((X,A,u) × (Y,B,v)) (abs ∘ f) ≠ +∞ ∨
     ∫ (Y,B,v) (λy. ∫ (X,A,u) (λx. (abs ∘ f) (x,y))) ≠ +∞ ∨
     ∫ (X,A,u) (λx. ∫ (Y,B,v) (λy. (abs ∘ f) (x,y))) ≠ +∞) ⇒
    ∫ ((X,A,u) × (Y,B,v)) (abs ∘ f) ≠ +∞ ∧
    ∫ (Y,B,v) (λy. ∫ (X,A,u) (λx. (abs ∘ f) (x,y))) ≠ +∞ ∧
    ∫ (X,A,u) (λx. ∫ (Y,B,v) (λy. (abs ∘ f) (x,y))) ≠ +∞ ∧
    integrable ((X,A,u) × (Y,B,v)) f ∧
    (AE y::(Y,B,v). integrable (X,A,u) (λx. f (x,y))) ∧
    (AE x::(X,A,u). integrable (Y,B,v) (λy. f (x,y))) ∧
    integrable (X,A,u) (λx. ∫ (Y,B,v) (λy. f (x,y))) ∧
    integrable (Y,B,v) (λy. ∫ (X,A,u) (λx. f (x,y))) ∧
    ∫ ((X,A,u) × (Y,B,v)) f = ∫ (Y,B,v) (λy. ∫ (X,A,u) (λx. f (x,y))) ∧
    ∫ ((X,A,u) × (Y,B,v)) f = ∫ (X,A,u) (λx. ∫ (Y,B,v) (λy. f (x,y)))
⊢ ∀m1 m2 f.
    sigma_finite_measure_space m1 ∧ sigma_finite_measure_space m2 ∧
    f ∈ Borel_measurable (measurable_space m1 × measurable_space m2) ∧
    (∫⁺ (m1 × m2) (abs ∘ f) ≠ +∞ ∨
     ∫⁺ m2 (λy. ∫⁺ m1 (λx. (abs ∘ f) (x,y))) ≠ +∞ ∨
     ∫⁺ m1 (λx. ∫⁺ m2 (λy. (abs ∘ f) (x,y))) ≠ +∞) ⇒
    ∫⁺ (m1 × m2) (abs ∘ f) ≠ +∞ ∧
    ∫⁺ m2 (λy. ∫⁺ m1 (λx. (abs ∘ f) (x,y))) ≠ +∞ ∧
    ∫⁺ m1 (λx. ∫⁺ m2 (λy. (abs ∘ f) (x,y))) ≠ +∞ ∧ integrable (m1 × m2) f ∧
    (AE y::m2. integrable m1 (λx. f (x,y))) ∧
    (AE x::m1. integrable m2 (λy. f (x,y))) ∧
    integrable m1 (λx. ∫ m2 (λy. f (x,y))) ∧
    integrable m2 (λy. ∫ m1 (λx. f (x,y))) ∧
    ∫ (m1 × m2) f = ∫ m2 (λy. ∫ m1 (λx. f (x,y))) ∧
    ∫ (m1 × m2) f = ∫ m1 (λx. ∫ m2 (λy. f (x,y)))
⊢ ∀m1 m2 f.
    sigma_finite_measure_space m1 ∧ sigma_finite_measure_space m2 ∧
    f ∈ Borel_measurable (measurable_space m1 × measurable_space m2) ∧
    (∫ (m1 × m2) (abs ∘ f) ≠ +∞ ∨
     ∫ m2 (λy. ∫ m1 (λx. (abs ∘ f) (x,y))) ≠ +∞ ∨
     ∫ m1 (λx. ∫ m2 (λy. (abs ∘ f) (x,y))) ≠ +∞) ⇒
    ∫ (m1 × m2) (abs ∘ f) ≠ +∞ ∧
    ∫ m2 (λy. ∫ m1 (λx. (abs ∘ f) (x,y))) ≠ +∞ ∧
    ∫ m1 (λx. ∫ m2 (λy. (abs ∘ f) (x,y))) ≠ +∞ ∧ integrable (m1 × m2) f ∧
    (AE y::m2. integrable m1 (λx. f (x,y))) ∧
    (AE x::m1. integrable m2 (λy. f (x,y))) ∧
    integrable m1 (λx. ∫ m2 (λy. f (x,y))) ∧
    integrable m2 (λy. ∫ m1 (λx. f (x,y))) ∧
    ∫ (m1 × m2) f = ∫ m2 (λy. ∫ m1 (λx. f (x,y))) ∧
    ∫ (m1 × m2) f = ∫ m1 (λx. ∫ m2 (λy. f (x,y)))
⊢ ∀m u v p q.
    measure_space m ∧ 0 < p ∧ 0 < q ∧ p⁻¹ + q⁻¹ = 1 ∧ u ∈ lp_space p m ∧
    v ∈ lp_space q m ⇒
    integrable m (λx. u x * v x) ∧
    ∫ m (λx. abs (u x * v x)) ≤ seminorm p m u * seminorm q m v
⊢ ∀m u v p q.
    measure_space m ∧ 0 < p ∧ 0 < q ∧ p⁻¹ + q⁻¹ = 1 ∧ u ∈ lp_space p m ∧
    v ∈ lp_space q m ⇒
    ∫⁺ m (λx. abs (u x * v x)) ≤ seminorm p m u * seminorm q m v
⊢ ∀s t x y.
    FINITE 𝕌(:β) ∧ FINITE 𝕌(:γ) ⇒
    𝟙 (fcp_cross s t) (FCP_CONCAT x y) = 𝟙 s x * 𝟙 t y
⊢ ∀A a.
    filtration A a ⇒ sub_sigma_algebra (infty_sigma_algebra (space A) a) A
⊢ ∀A a.
    filtration A a ⇒
    ∀n. sub_sigma_algebra (a n) (infty_sigma_algebra (space A) a)
⊢ ∀s a b. s ∈ fcp_cross a b ⇔ ∃t u. s = FCP_CONCAT t u ∧ t ∈ a ∧ u ∈ b
⊢ ∀s A B. s ∈ fcp_prod A B ⇔ ∃a b. s = fcp_cross a b ∧ a ∈ A ∧ b ∈ B
⊢ ∀X Y A B f.
    sigma_algebra (X,A) ∧ sigma_algebra (Y,B) ∧
    f ∈ Borel_measurable ((X,A) × (Y,B)) ⇒
    (∀y. y ∈ Y ⇒ (λx. f (x,y)) ∈ Borel_measurable (X,A)) ∧
    ∀x. x ∈ X ⇒ (λy. f (x,y)) ∈ Borel_measurable (Y,B)
⊢ ∀f sa nu mu.
    f ∈ RN_deriv_property sa nu mu ⇔
    f ∈ Borel_measurable sa ∧ (∀x. x ∈ space sa ⇒ 0 ≤ f x) ∧
    ∀s. s ∈ subsets sa ⇒ (f * (space sa,subsets sa,mu)) s = nu s
⊢ ∀cons s A B.
    s ∈ general_cross cons A B ⇔ ∃a b. s = cons a b ∧ a ∈ A ∧ b ∈ B
⊢ ∀cons s A B.
    s ∈ general_prod cons A B ⇔
    ∃a b. s = general_cross cons a b ∧ a ∈ A ∧ b ∈ B
⊢ ∀m f. measure_space m ⇒ (f ∈ L1_space m ⇔ integrable m f)
⊢ ∀m f.
    measure_space m ⇒
    (f ∈ L2_space m ⇔
     f ∈ Borel_measurable (measurable_space m) ∧ integrable m (λx. (f x)²))
⊢ ∀m a u. martingale m a u ⇔ sub_martingale m a u ∧ super_martingale m a u
⊢ ∀M1 M2.
    measure_space M1 ∧ measure_space M2 ⇒
    measurable_space (M1 × M2) = measurable_space M1 × measurable_space M2
⊢ ∀p m u v.
    measure_space m ∧ 1 ≤ p ∧ u ∈ lp_space p m ∧ v ∈ lp_space p m ⇒
    (λx. u x + v x) ∈ lp_space p m ∧
    seminorm p m (λx. u x + v x) ≤ seminorm p m u + seminorm p m v
⊢ ∀p m u v.
    measure_space m ∧ 1 ≤ p ∧ u ∈ lp_space p m ∧ v ∈ lp_space p m ⇒
    seminorm p m (λx. u x + v x) ≤ seminorm p m u + seminorm p m v
⊢ ∀M1 M2 s t.
    measure_space M1 ∧ measure_space M2 ∧ s ∈ measurable_sets M1 ∧
    t ∈ measurable_sets M2 ⇒
    prod_measure M1 M2 (s × t) = measure M1 s * measure M2 t
⊢ ∀X Y E G.
    subset_class X E ∧ subset_class Y G ∧ has_exhausting_sequence (X,E) ∧
    has_exhausting_sequence (Y,G) ⇒
    (X,E) × (Y,G) = sigma X E × sigma Y G
⊢ ∀f M N.
    measure_space M ∧ measure_space N ∧
    f ∈ Borel_measurable (measurable_space M) ∧
    (∀x. x ∈ m_space M ⇒ 0 ≤ f x) ∧ density_of M f = measure_of N ∧
    measure_space M ∧ measure_space N ∧
    measurable_sets M = measurable_sets N ⇒
    density_of M (RN_deriv' M N) = measure_of N
⊢ ∀m. sigma_finite_measure_space m ⇒ AE x::m. RN_deriv' m m x = 1
⊢ ∀sa mu nu.
    sigma_finite_measure_space (space sa,subsets sa,mu) ∧
    measure_space (space sa,subsets sa,nu) ∧ nu ≪ (space sa,subsets sa,mu) ⇒
    nu / (space sa,subsets sa,mu) ∈ RN_deriv_property sa nu mu
⊢ ∀m v f.
    f ∈ Borel_measurable (measurable_space m) ∧
    (∀x. x ∈ m_space m ⇒ 0 ≤ f x) ∧ sigma_finite_measure_space m ∧
    measure_space (m_space m,measurable_sets m,v) ∧ v ≪ m ⇒
    ∫ (m_space m,measurable_sets m,v) f = ∫ m (λx. (v / m) x * f x)
⊢ ∀m v.
    sigma_finite_measure_space m ∧
    sigma_finite_measure_space (m_space m,measurable_sets m,v) ∧ v ≪ m ∧
    measure_absolutely_continuous' m (m_space m,measurable_sets m,v) ⇒
    AE x::m. RN_deriv' (m_space m,measurable_sets m,v) m x = ((v / m) x)⁻¹
⊢ ∀m u v.
    sigma_finite_measure_space m ∧
    sigma_finite_measure_space (m_space m,measurable_sets m,u) ∧
    sigma_finite_measure_space (m_space m,measurable_sets m,v) ∧ u ≪ m ∧
    v ≪ (m_space m,measurable_sets m,u) ⇒
    AE x::m.
      (u / m) x * (v / (m_space m,measurable_sets m,u)) x = (v / m) x
⊢ ∀m v f.
    f ∈ Borel_measurable (measurable_space m) ∧
    (∀x. x ∈ m_space m ⇒ 0 ≤ f x) ∧ sigma_finite_measure_space m ∧
    measure_space (m_space m,measurable_sets m,v) ∧ v ≪ m ⇒
    ∫⁺ (m_space m,measurable_sets m,v) f = ∫⁺ m (λx. (v / m) x * f x)
⊢ ∀M N f.
    sigma_finite_measure_space M ∧ measure_space N ∧
    measure_absolutely_continuous' N M ∧
    measurable_sets M = measurable_sets N ∧
    f ∈ Borel_measurable (measurable_space M) ∧
    (∀x. x ∈ m_space M ⇒ 0 ≤ f x) ⇒
    ∫⁺ N f = ∫⁺ (density_of M (RN_deriv' M N)) f
⊢ ∀sa mu.
    measure_space (space sa,subsets sa,mu) ⇒
    (λx. 1) ∈ RN_deriv_property sa mu mu
⊢ ∀sa mu nu f g.
    sigma_finite_measure_space (space sa,subsets sa,mu) ∧
    sigma_finite_measure_space (space sa,subsets sa,nu) ∧
    nu ≪ (space sa,subsets sa,mu) ∧ f ∈ RN_deriv_property sa nu mu ⇒
    AE x::(space sa,subsets sa,mu). f x = (nu / (space sa,subsets sa,mu)) x
⊢ ∀sa mu nu f g.
    measure_space (space sa,subsets sa,mu) ∧
    sigma_finite_measure_space (space sa,subsets sa,nu) ∧
    f ∈ RN_deriv_property sa nu mu ∧ g ∈ RN_deriv_property sa nu mu ⇒
    AE x::(space sa,subsets sa,mu). f x = g x
⊢ ∀sa lam mu nu dmdl dndm dndl.
    measure_space (space sa,subsets sa,mu) ∧
    measure_space (space sa,subsets sa,nu) ∧
    measure_space (space sa,subsets sa,lam) ∧
    dmdl ∈ RN_deriv_property sa mu lam ∧
    dndm ∈ RN_deriv_property sa nu mu ∧
    (∀x. x ∈ space sa ⇒ dndl x = dmdl x * dndm x) ⇒
    dndl ∈ RN_deriv_property sa nu lam
⊢ ∀sa mu nu dndm f.
    f ∈ Borel_measurable sa ∧ (∀x. x ∈ space sa ⇒ 0 ≤ f x) ∧
    measure_space (space sa,subsets sa,mu) ∧
    measure_space (space sa,subsets sa,nu) ∧
    dndm ∈ RN_deriv_property sa nu mu ⇒
    ∫⁺ (space sa,subsets sa,nu) f =
    ∫⁺ (space sa,subsets sa,mu) (λx. dndm x * f x)
⊢ ∀m v.
    measure_space m ∧
    (∃f. f ∈ Borel_measurable (measurable_space m) ∧
         (∀x. x ∈ m_space m ⇒ 0 ≤ f x) ∧
         ∀s. s ∈ measurable_sets m ⇒ (f * m) s = v s) ⇒
    ∀s. s ∈ measurable_sets m ⇒ (v / m * m) s = v s
⊢ ∀f m v.
    measure_space m ∧ f ∈ Borel_measurable (measurable_space m) ∧
    (∀x. x ∈ m_space m ⇒ 0 ≤ f x) ∧
    (∀s. s ∈ measurable_sets m ⇒ (f * m) s = v s) ⇒
    measure_space_eq (density m (v / m)) (m_space m,measurable_sets m,v)
⊢ ∀m a.
    sigma_finite_filtered_measure_space m a ⇒
    ∀n. sigma_finite (m_space m,subsets (a n),measure m)
⊢ ∀M1 M2.
    measure_space M1 ∧ measure_space M2 ⇒
    m_space (M1 × M2) = m_space M1 × m_space M2
⊢ ∀a b. sub_sigma_algebra a b ∧ sub_sigma_algebra b a ⇒ a = b
⊢ ∀m a.
    measure_space m ∧ sub_sigma_algebra a (measurable_space m) ⇒
    measure_space (m_space m,subsets a,measure m)
⊢ Order sub_sigma_algebra
⊢ ∀a. sigma_algebra a ⇒ sub_sigma_algebra a a
⊢ ∀a b c.
    sub_sigma_algebra a b ∧ sub_sigma_algebra b c ⇒ sub_sigma_algebra a c
⊢ ∀X Y A B u v f.
    sigma_finite_measure_space (X,A,u) ∧
    sigma_finite_measure_space (Y,B,v) ∧
    f ∈ Borel_measurable ((X,A) × (Y,B)) ∧ (∀s. s ∈ X × Y ⇒ 0 ≤ f s) ⇒
    (∀y. y ∈ Y ⇒ (λx. f (x,y)) ∈ Borel_measurable (X,A)) ∧
    (∀x. x ∈ X ⇒ (λy. f (x,y)) ∈ Borel_measurable (Y,B)) ∧
    (λx. ∫⁺ (Y,B,v) (λy. f (x,y))) ∈ Borel_measurable (X,A) ∧
    (λy. ∫⁺ (X,A,u) (λx. f (x,y))) ∈ Borel_measurable (Y,B) ∧
    ∫⁺ ((X,A,u) × (Y,B,v)) f = ∫⁺ (Y,B,v) (λy. ∫⁺ (X,A,u) (λx. f (x,y))) ∧
    ∫⁺ ((X,A,u) × (Y,B,v)) f = ∫⁺ (X,A,u) (λx. ∫⁺ (Y,B,v) (λy. f (x,y)))
⊢ ∀X Y E G A B u v m m'.
    subset_class X E ∧ subset_class Y G ∧ sigma_finite (X,E,u) ∧
    sigma_finite (Y,G,v) ∧ (∀s t. s ∈ E ∧ t ∈ E ⇒ s ∩ t ∈ E) ∧
    (∀s t. s ∈ G ∧ t ∈ G ⇒ s ∩ t ∈ G) ∧ A = sigma X E ∧ B = sigma Y G ∧
    measure_space (X,subsets A,u) ∧ measure_space (Y,subsets B,v) ∧
    measure_space (X × Y,subsets (A × B),m) ∧
    measure_space (X × Y,subsets (A × B),m') ∧
    (∀s t. s ∈ E ∧ t ∈ G ⇒ m (s × t) = u s * v t) ∧
    (∀s t. s ∈ E ∧ t ∈ G ⇒ m' (s × t) = u s * v t) ⇒
    ∀x. x ∈ subsets (A × B) ⇒ m x = m' x
⊢ ∀X Y A B u v m m'.
    sigma_finite_measure_space (X,A,u) ∧
    sigma_finite_measure_space (Y,B,v) ∧
    measure_space (X × Y,subsets ((X,A) × (Y,B)),m) ∧
    measure_space (X × Y,subsets ((X,A) × (Y,B)),m') ∧
    (∀s t. s ∈ A ∧ t ∈ B ⇒ m (s × t) = u s * v t) ∧
    (∀s t. s ∈ A ∧ t ∈ B ⇒ m' (s × t) = u s * v t) ⇒
    ∀x. x ∈ subsets ((X,A) × (Y,B)) ⇒ m x = m' x
⊢ ∀s m u.
    measure_space m ∧ open s ∧ (∀t. t ∈ s ⇒ integrable m (Normal ∘ u t)) ∧
    (∀x. x ∈ m_space m ⇒ (λt. u t x) continuous_on s) ∧
    (∃w. integrable m w ∧ (∀x. x ∈ m_space m ⇒ 0 ≤ w x ∧ w x ≠ +∞) ∧
         ∀t x. t ∈ s ∧ x ∈ m_space m ⇒ Normal (abs (u t x)) ≤ w x) ⇒
    (λt. real (∫ m (Normal ∘ u t))) continuous_on s
⊢ ∀m u.
    measure_space m ∧ (∀t. integrable m (Normal ∘ u t)) ∧
    (∀x. x ∈ m_space m ⇒ (λt. u t x) continuous_on 𝕌(:real)) ∧
    (∃w. integrable m w ∧ (∀x. x ∈ m_space m ⇒ 0 ≤ w x ∧ w x ≠ +∞) ∧
         ∀t x. x ∈ m_space m ⇒ Normal (abs (u t x)) ≤ w x) ⇒
    (λt. real (∫ m (Normal ∘ u t))) continuous_on 𝕌(:real)
⊢ ∀M N.
    sigma_finite_measure_space M ∧ measure_space N ∧
    measure_absolutely_continuous' N M ∧
    measurable_sets M = measurable_sets N ⇒
    density_of M (RN_deriv' M N) = measure_of N
⊢ ∀m f g.
    measure_space m ∧ (∀x. x ∈ m_space m ⇒ 0 ≤ g x) ∧
    (∀x. x ∈ m_space m ⇒ f x = g x) ⇒
    density m f = density m g
⊢ ∀M f.
    measure_space M ∧ (∀x. x ∈ m_space M ⇒ 0 ≤ f x) ⇒
    density_of M f =
    (m_space M,measurable_sets M,
     (λs. if s ∈ measurable_sets M then ∫⁺ M (λx. f x * 𝟙 s x) else 0))
⊢ ∀s m u.
    measure_space m ∧ open s ∧ connected s ∧
    (∀t. t ∈ s ⇒ integrable m (Normal ∘ u t)) ∧
    (∀x. x ∈ m_space m ⇒ (λt. u t x) differentiable_on s) ∧
    (∃w. integrable m w ∧ (∀x. x ∈ m_space m ⇒ 0 ≤ w x ∧ w x ≠ +∞) ∧
         ∀t x.
           t ∈ s ∧ x ∈ m_space m ⇒ Normal (abs (diff1 (λt. u t x) t)) ≤ w x) ⇒
    ∀t. t ∈ s ⇒
        integrable m (λx. Normal (diff1 (λt. u t x) t)) ∧
        ((λt. real (∫ m (Normal ∘ u t))) has_vector_derivative
         real (∫ m (λx. Normal (diff1 (λt. u t x) t)))) (at t within s)
⊢ ∀s m u.
    measure_space m ∧ open s ∧ connected s ∧
    (∀t. t ∈ s ⇒ integrable m (Normal ∘ u t)) ∧
    (∀x. x ∈ m_space m ⇒ (λt. u t x) differentiable_on s) ∧
    (∃w. integrable m w ∧ (∀x. x ∈ m_space m ⇒ 0 ≤ w x ∧ w x ≠ +∞) ∧
         ∀t x.
           t ∈ s ∧ x ∈ m_space m ⇒ Normal (abs (diff1 (λt. u t x) t)) ≤ w x) ⇒
    (λt. real (∫ m (Normal ∘ u t))) differentiable_on s ∧
    ∀t. t ∈ s ⇒
        integrable m (λx. Normal (diff1 (λt. u t x) t)) ∧
        diff1 (λt. real (∫ m (Normal ∘ u t))) t =
        real (∫ m (λx. Normal (diff1 (λt. u t x) t)))
⊢ ∀m u.
    measure_space m ∧ (∀t. integrable m (Normal ∘ u t)) ∧
    (∀x. x ∈ m_space m ⇒ (λt. u t x) differentiable_on 𝕌(:real)) ∧
    (∃w. integrable m w ∧ (∀x. x ∈ m_space m ⇒ 0 ≤ w x ∧ w x ≠ +∞) ∧
         ∀t x. x ∈ m_space m ⇒ Normal (abs (diff1 (λt. u t x) t)) ≤ w x) ⇒
    ∀t. integrable m (λx. Normal (diff1 (λt. u t x) t)) ∧
        ((λt. real (∫ m (Normal ∘ u t))) has_vector_derivative
         real (∫ m (λx. Normal (diff1 (λt. u t x) t)))) (at t)
⊢ ∀m u.
    measure_space m ∧ (∀t. integrable m (Normal ∘ u t)) ∧
    (∀x. x ∈ m_space m ⇒ (λt. u t x) differentiable_on 𝕌(:real)) ∧
    (∃w. integrable m w ∧ (∀x. x ∈ m_space m ⇒ 0 ≤ w x ∧ w x ≠ +∞) ∧
         ∀t x. x ∈ m_space m ⇒ Normal (abs (diff1 (λt. u t x) t)) ≤ w x) ⇒
    (λt. real (∫ m (Normal ∘ u t))) differentiable_on 𝕌(:real) ∧
    ∀t. integrable m (λx. Normal (diff1 (λt. u t x) t)) ∧
        diff1 (λt. real (∫ m (Normal ∘ u t))) t =
        real (∫ m (λx. Normal (diff1 (λt. u t x) t)))
⊢ ∀X Y A B f g.
    exhausting_sequence (X,A) f ∧ exhausting_sequence (Y,B) g ⇒
    exhausting_sequence (X × Y,prod_sets A B) (λn. f n × g n)
⊢ ∀X Y A B f g.
    exhausting_sequence (X,A) f ∧ exhausting_sequence (Y,B) g ⇒
    exhausting_sequence (fcp_cross X Y,fcp_prod A B)
      (λn. fcp_cross (f n) (g n))
⊢ ∀cons X Y A B f g.
    exhausting_sequence (X,A) f ∧ exhausting_sequence (Y,B) g ⇒
    exhausting_sequence (general_cross cons X Y,general_prod cons A B)
      (λn. general_cross cons (f n) (g n))
⊢ ∀X Y A B u v m0.
    FINITE 𝕌(:β) ∧ FINITE 𝕌(:γ) ∧ sigma_finite_measure_space (X,A,u) ∧
    sigma_finite_measure_space (Y,B,v) ∧
    (∀s t. s ∈ A ∧ t ∈ B ⇒ m0 (fcp_cross s t) = u s * v t) ⇒
    (∀s. s ∈ subsets (fcp_sigma (X,A) (Y,B)) ⇒
         (∀x. x ∈ X ⇒ (λy. 𝟙 s (FCP_CONCAT x y)) ∈ Borel_measurable (Y,B)) ∧
         (∀y. y ∈ Y ⇒ (λx. 𝟙 s (FCP_CONCAT x y)) ∈ Borel_measurable (X,A)) ∧
         (λy. ∫⁺ (X,A,u) (λx. 𝟙 s (FCP_CONCAT x y))) ∈
         Borel_measurable (Y,B) ∧
         (λx. ∫⁺ (Y,B,v) (λy. 𝟙 s (FCP_CONCAT x y))) ∈
         Borel_measurable (X,A)) ∧
    ∃m. sigma_finite_measure_space
          (fcp_cross X Y,subsets (fcp_sigma (X,A) (Y,B)),m) ∧
        (∀s. s ∈ fcp_prod A B ⇒ m s = m0 s) ∧
        ∀s. s ∈ subsets (fcp_sigma (X,A) (Y,B)) ⇒
            m s = ∫⁺ (Y,B,v) (λy. ∫⁺ (X,A,u) (λx. 𝟙 s (FCP_CONCAT x y))) ∧
            m s = ∫⁺ (X,A,u) (λx. ∫⁺ (Y,B,v) (λy. 𝟙 s (FCP_CONCAT x y)))
⊢ ∀cons car cdr X Y A B u v m0.
    pair_operation cons car cdr ∧ sigma_finite_measure_space (X,A,u) ∧
    sigma_finite_measure_space (Y,B,v) ∧
    (∀s t. s ∈ A ∧ t ∈ B ⇒ m0 (general_cross cons s t) = u s * v t) ⇒
    (∀s. s ∈ subsets (general_sigma cons (X,A) (Y,B)) ⇒
         (∀x. x ∈ X ⇒ (λy. 𝟙 s (cons x y)) ∈ Borel_measurable (Y,B)) ∧
         (∀y. y ∈ Y ⇒ (λx. 𝟙 s (cons x y)) ∈ Borel_measurable (X,A)) ∧
         (λy. ∫⁺ (X,A,u) (λx. 𝟙 s (cons x y))) ∈ Borel_measurable (Y,B) ∧
         (λx. ∫⁺ (Y,B,v) (λy. 𝟙 s (cons x y))) ∈ Borel_measurable (X,A)) ∧
    ∃m. sigma_finite_measure_space
          (general_cross cons X Y,subsets (general_sigma cons (X,A) (Y,B)),
           m) ∧ (∀s. s ∈ general_prod cons A B ⇒ m s = m0 s) ∧
        ∀s. s ∈ subsets (general_sigma cons (X,A) (Y,B)) ⇒
            m s = ∫⁺ (Y,B,v) (λy. ∫⁺ (X,A,u) (λx. 𝟙 s (cons x y))) ∧
            m s = ∫⁺ (X,A,u) (λx. ∫⁺ (Y,B,v) (λy. 𝟙 s (cons x y)))
⊢ ∀m f.
    measure_space m ∧ (∀x n. x ∈ m_space m ⇒ 0 ≤ f n x) ∧
    (∀n. f n ∈ Borel_measurable (measurable_space m)) ⇒
    ∫⁺ m (λx. liminf (λn. f n x)) ≤ liminf (λn. ∫⁺ m (f n))
⊢ ∀m f w.
    measure_space m ∧ ∫⁺ m w < +∞ ∧
    (∀x n. x ∈ m_space m ⇒ 0 ≤ f n x ∧ f n x ≤ w x ∧ w x < +∞) ∧
    (∀n. f n ∈ Borel_measurable (measurable_space m)) ⇒
    limsup (λn. ∫⁺ m (f n)) ≤ ∫⁺ m (λx. limsup (λn. f n x))
⊢ FINITE 𝕌(:β) ∧ FINITE 𝕌(:γ) ⇒ fcp_cross 𝕌(:α[β]) 𝕌(:α[γ]) = 𝕌(:α[β + γ])
⊢ ∀A B. fcp_cross A B = general_cross FCP_CONCAT A B
⊢ ∀A B. fcp_prod A B = general_prod FCP_CONCAT A B
⊢ ∀A B. fcp_sigma A B = general_sigma FCP_CONCAT A B
⊢ ∀m X A.
    measure_space m ∧ (∀n. X n ∈ Borel_measurable (measurable_space m)) ∧
    (∀n. A n = sigma (m_space m) (λn. Borel) X (count1 n)) ⇒
    filtration (measurable_space m) A
⊢ ∀cons car cdr X Y A B u v f.
    pair_operation cons car cdr ∧ sigma_finite_measure_space (X,A,u) ∧
    sigma_finite_measure_space (Y,B,v) ∧
    f ∈ Borel_measurable (general_sigma cons (X,A) (Y,B)) ∧
    (∫⁺ (general_prod_measure_space cons (X,A,u) (Y,B,v)) (abs ∘ f) ≠ +∞ ∨
     ∫⁺ (Y,B,v) (λy. ∫⁺ (X,A,u) (λx. (abs ∘ f) (cons x y))) ≠ +∞ ∨
     ∫⁺ (X,A,u) (λx. ∫⁺ (Y,B,v) (λy. (abs ∘ f) (cons x y))) ≠ +∞) ⇒
    ∫⁺ (general_prod_measure_space cons (X,A,u) (Y,B,v)) (abs ∘ f) ≠ +∞ ∧
    ∫⁺ (Y,B,v) (λy. ∫⁺ (X,A,u) (λx. (abs ∘ f) (cons x y))) ≠ +∞ ∧
    ∫⁺ (X,A,u) (λx. ∫⁺ (Y,B,v) (λy. (abs ∘ f) (cons x y))) ≠ +∞ ∧
    integrable (general_prod_measure_space cons (X,A,u) (Y,B,v)) f ∧
    (AE y::(Y,B,v). integrable (X,A,u) (λx. f (cons x y))) ∧
    (AE x::(X,A,u). integrable (Y,B,v) (λy. f (cons x y))) ∧
    integrable (X,A,u) (λx. ∫ (Y,B,v) (λy. f (cons x y))) ∧
    integrable (Y,B,v) (λy. ∫ (X,A,u) (λx. f (cons x y))) ∧
    ∫ (general_prod_measure_space cons (X,A,u) (Y,B,v)) f =
    ∫ (Y,B,v) (λy. ∫ (X,A,u) (λx. f (cons x y))) ∧
    ∫ (general_prod_measure_space cons (X,A,u) (Y,B,v)) f =
    ∫ (X,A,u) (λx. ∫ (Y,B,v) (λy. f (cons x y)))
⊢ ∀cons f s t.
    general_cross cons (BIGUNION (IMAGE f s)) t =
    BIGUNION (IMAGE (λn. general_cross cons (f n) t) s)
⊢ ∀cons f s t.
    general_cross cons t (BIGUNION (IMAGE f s)) =
    BIGUNION (IMAGE (λn. general_cross cons t (f n)) s)
⊢ ∀cons car cdr X s t.
    pair_operation cons car cdr ⇒
    general_cross cons (X DIFF s) t =
    general_cross cons X t DIFF general_cross cons s t
⊢ ∀cons car cdr s X t.
    pair_operation cons car cdr ⇒
    general_cross cons s (X DIFF t) =
    general_cross cons s X DIFF general_cross cons s t
⊢ ∀cons car cdr a b c d.
    pair_operation cons car cdr ⇒
    general_cross cons a b ∩ general_cross cons c d =
    general_cross cons (a ∩ c) (b ∩ d)
⊢ ∀cons a b c d.
    a ⊆ b ∧ c ⊆ d ⇒ general_cross cons a c ⊆ general_cross cons b d
⊢ general_cross cons ∅ B = ∅ ∧ general_cross cons A ∅ = ∅
⊢ ∀cons car cdr s t.
    pair_operation cons car cdr ⇒
    (t ≠ ∅ ⇒ IMAGE car (general_cross cons s t) = s) ∧
    (s ≠ ∅ ⇒ IMAGE cdr (general_cross cons s t) = t)
⊢ ∀cons m1 m2.
    general_prod_measure_space cons m1 m2 =
    (general_cross cons (m_space m1) (m_space m2),
     subsets
       (general_sigma cons (measurable_space m1) (measurable_space m2)),
     (λs. ∫⁺ m2 (λy. ∫⁺ m1 (λx. 𝟙 s (cons x y)))))
⊢ ∀cons car cdr X Y E G.
    pair_operation cons car cdr ∧ subset_class X E ∧ subset_class Y G ∧
    has_exhausting_sequence (X,E) ∧ has_exhausting_sequence (Y,G) ⇒
    general_sigma cons (X,E) (Y,G) =
    general_sigma cons (sigma X E) (sigma Y G)
⊢ ∀cons car cdr s t x y.
    pair_operation cons car cdr ⇒
    𝟙 (general_cross cons s t) (cons x y) = 𝟙 s x * 𝟙 t y
⊢ ∀m f.
    measure_space m ∧ integrable m f ⇒ AE x::m. f x = (Normal ∘ real ∘ f) x
⊢ ∀m f g.
    measure_space m ∧ integrable m f ∧ integrable m g ⇒
    integrable m (λx. f x + g x)
⊢ ∀m fi.
    measure_space m ∧
    (∃w0. integrable m w0 ∧ ∀i x. x ∈ m_space m ⇒ abs (fi i x) ≤ w0 x) ⇒
    ∃w. integrable m w ∧ (∀x. x ∈ m_space m ⇒ 0 ≤ w x) ∧
        (AE x::m. w x ≠ +∞) ∧ ∀i x. x ∈ m_space m ⇒ abs (fi i x) ≤ w x
⊢ ∀m f g.
    complete_measure_space m ∧ (AE x::m. f x = g x) ⇒
    (integrable m f ⇔ integrable m g)
⊢ ∀m f g.
    measure_space m ∧ (AE x::m. f x = g x) ∧
    f ∈ Borel_measurable (measurable_space m) ∧
    g ∈ Borel_measurable (measurable_space m) ⇒
    (integrable m f ⇔ integrable m g)
⊢ ∀sp sts u v f.
    measure_space (sp,sts,u) ∧ (∀s. s ∈ sts ⇒ u s = v s) ⇒
    (integrable (sp,sts,u) f ⇔ integrable (sp,sts,v) f)
⊢ ∀m1 m2 f.
    measure_space m1 ∧ measure_space_eq m1 m2 ⇒
    (integrable m1 f ⇔ integrable m2 f)
⊢ ∀m f g.
    measure_space m ∧ integrable m f ∧ (AE x::m. f x = g x) ∧
    g ∈ Borel_measurable (measurable_space m) ⇒
    integrable m g
⊢ ∀m f. integrable m f ⇒ f ∈ Borel_measurable (measurable_space m)
⊢ ∀m f g.
    measure_space m ∧ integrable m f ∧ integrable m g ⇒
    integrable m (λx. f x − g x)
⊢ ∀m f s.
    FINITE s ∧ measure_space m ∧ (∀i. i ∈ s ⇒ integrable m (f i)) ⇒
    integrable m (λx. ∑ (λi. f i x) s)
⊢ ∀m f g.
    measure_space m ∧ integrable m f ∧ integrable m g ⇒
    ∫ m (λx. f x + g x) = ∫ m f + ∫ m g
⊢ ∀m f g h.
    measure_space m ∧ integrable m f ∧ integrable m g ∧ integrable m h ⇒
    ∫ m (λx. f x + g x + h x) = ∫ m f + ∫ m g + ∫ m h
⊢ ∀sp sts u v f.
    measure_space (sp,sts,u) ∧ (∀s. s ∈ sts ⇒ u s = v s) ⇒
    ∫ (sp,sts,u) f = ∫ (sp,sts,v) f
⊢ ∀m1 m2 f. measure_space m1 ∧ measure_space_eq m1 m2 ⇒ ∫ m1 f = ∫ m2 f
⊢ ∀m f g.
    measure_space m ∧ f ∈ Borel_measurable (measurable_space m) ∧
    g ∈ Borel_measurable (measurable_space m) ∧
    (∀x. x ∈ m_space m ⇒ 0 ≤ f x) ⇒
    (integrable (density m f) g ⇔ integrable m (λx. f x * g x)) ∧
    ∫ (density m f) g = ∫ m (λx. f x * g x)
⊢ ∀m f s t.
    measure_space m ∧ integrable m f ∧ DISJOINT s t ∧
    s ∈ measurable_sets m ∧ t ∈ measurable_sets m ⇒
    ∫ m (λx. f x * 𝟙 (s ∪ t) x) =
    ∫ m (λx. f x * 𝟙 s x) + ∫ m (λx. f x * 𝟙 t x)
⊢ ∀m f s a.
    FINITE s ∧ measure_space m ∧ integrable m f ∧
    (∀i. i ∈ s ⇒ a i ∈ measurable_sets m) ∧ disjoint_family_on a s ⇒
    ∫ m (λx. f x * 𝟙 (BIGUNION (IMAGE a s)) x) =
    ∑ (λi. ∫ m (λx. f x * 𝟙 (a i) x)) s
⊢ ∀M B f u.
    measure_space M ∧ sigma_algebra B ∧
    f ∈ measurable (measurable_space M) B ∧ u ∈ Borel_measurable B ⇒
    ∫ (space B,subsets B,distr M f) u = ∫ M (u ∘ f) ∧
    (integrable (space B,subsets B,distr M f) u ⇔ integrable M (u ∘ f))
⊢ ∀m f.
    measure_space m ∧ f ∈ Borel_measurable (measurable_space m) ∧
    (∀s. s ∈ measurable_sets m ⇒ ∫ m (λx. f x * 𝟙 s x) = 0) ⇒
    AE x::m. f x = 0
⊢ ∀m f g.
    measure_space m ∧ integrable m f ∧ integrable m g ∧
    (∀s. s ∈ measurable_sets m ⇒
         ∫ m (λx. f x * 𝟙 s x) = ∫ m (λx. g x * 𝟙 s x)) ⇒
    AE x::m. f x = g x
⊢ ∀m f g. measure_space m ∧ (AE x::m. f x ≤ g x) ⇒ ∫ m f ≤ ∫ m g
⊢ ∀m f g.
    measure_space m ∧ integrable m f ∧ integrable m g ⇒
    ∫ m (λx. f x − g x) = ∫ m f − ∫ m g
⊢ ∀m f s.
    FINITE s ∧ measure_space m ∧ (∀i. i ∈ s ⇒ integrable m (f i)) ⇒
    ∫ m (λx. ∑ (λi. f i x) s) = ∑ (λi. ∫ m (f i)) s
⊢ ∀s. s ∈ measurable_sets lborel_2d ⇒
      measure lborel_2d s = measure (lborel × lborel) s
⊢ ∀m f fi.
    measure_space m ∧ (∀i. integrable m (fi i)) ∧
    (∀i x. x ∈ m_space m ⇒ fi i x ≠ +∞ ∧ fi i x ≠ −∞) ∧
    (∀x. x ∈ m_space m ⇒ f x ≠ +∞ ∧ f x ≠ −∞) ∧
    (∀x. x ∈ m_space m ⇒ ((λi. real (fi i x)) ⟶ real (f x)) sequentially) ∧
    (∃w. integrable m w ∧ (∀x. x ∈ m_space m ⇒ 0 ≤ w x ∧ w x ≠ +∞) ∧
         ∀i x. x ∈ m_space m ⇒ abs (fi i x) ≤ w x) ⇒
    integrable m f ∧ ((λi. real (∫ m (fi i))) ⟶ real (∫ m f)) sequentially
⊢ ∀m f fi.
    measure_space m ∧ (∀i. integrable m (fi i)) ∧
    (∀i x. x ∈ m_space m ⇒ fi i x ≠ +∞ ∧ fi i x ≠ −∞) ∧
    (∀x. x ∈ m_space m ⇒ f x ≠ +∞ ∧ f x ≠ −∞) ∧
    (∀x. x ∈ m_space m ⇒ ((λi. fi i x) ⟶ f x) sequentially) ∧
    (∃w. integrable m w ∧ (∀x. x ∈ m_space m ⇒ 0 ≤ w x ∧ w x ≠ +∞) ∧
         ∀i x. x ∈ m_space m ⇒ abs (fi i x) ≤ w x) ⇒
    integrable m f ∧ ((λi. ∫ m (fi i)) ⟶ ∫ m f) sequentially
⊢ ∀p m f.
    measure_space m ∧ 0 < p ∧ f ∈ lp_space p m ⇒
    AE x::m. f x ≠ +∞ ∧ f x ≠ −∞
⊢ ∀p m u v.
    measure_space m ∧ 0 < p ∧ u ∈ lp_space p m ∧ v ∈ lp_space p m ⇒
    (λx. u x + v x) ∈ lp_space p m
⊢ ∀p m u v a b.
    measure_space m ∧ 0 < p ∧ u ∈ lp_space p m ∧ v ∈ lp_space p m ⇒
    (λx. Normal a * u x + Normal b * v x) ∈ lp_space p m
⊢ ∀p m f.
    0 < p ∧ p ≠ +∞ ⇒
    (f ∈ lp_space p m ⇔
     f ∈ Borel_measurable (measurable_space m) ∧
     ∫⁺ m (λx. abs (f x) powr p) ≠ +∞)
⊢ ∀p m f.
    measure_space m ∧ 0 < p ∧ p ≠ +∞ ⇒
    (f ∈ lp_space p m ⇔
     f ∈ Borel_measurable (measurable_space m) ∧
     ∫ m (λx. abs (f x) powr p) ≠ +∞)
⊢ ∀m f.
    measure_space m ⇒
    (f ∈ L_PosInf m ⇔
     f ∈ Borel_measurable (measurable_space m) ∧
     ∃c. 0 < c ∧ c ≠ +∞ ∧ AE x::m. abs (f x) < c)
⊢ ∀p m f.
    measure_space m ∧ 0 < p ⇒
    (f ∈ lp_space p m ⇔
     f ∈ Borel_measurable (measurable_space m) ∧ seminorm p m f < +∞)
⊢ ∀p m u r.
    measure_space m ∧ 0 < p ∧ u ∈ lp_space p m ⇒
    (λx. Normal r * u x) ∈ lp_space p m
⊢ ∀p m u v.
    measure_space m ∧ 0 < p ∧ (∀x. x ∈ m_space m ⇒ u x = v x) ⇒
    (u ∈ lp_space p m ⇔ v ∈ lp_space p m)
⊢ ∀p m u v.
    measure_space m ∧ 0 < p ∧ u ∈ Borel_measurable (measurable_space m) ∧
    v ∈ Borel_measurable (measurable_space m) ∧ (AE x::m. u x = v x) ⇒
    (u ∈ lp_space p m ⇔ v ∈ lp_space p m)
⊢ ∀p m u v.
    measure_space m ∧ 0 < p ∧ u ∈ lp_space p m ∧ v ∈ lp_space p m ⇒
    (λx. u x − v x) ∈ lp_space p m
⊢ ∀m a u.
    martingale m a u ⇔
    sigma_finite_filtered_measure_space m a ∧ (∀n. integrable m (u n)) ∧
    ∀i j s.
      i ≤ j ∧ s ∈ subsets (a i) ⇒
      ∫ m (λx. u i x * 𝟙 s x) = ∫ m (λx. u j x * 𝟙 s x)
⊢ ∀m a u g.
    (∀n. a n = sigma (m_space m) (g n)) ∧
    (∀n. has_exhausting_sequence (m_space m,g n)) ∧
    (∀n s. s ∈ g n ⇒ measure m s < +∞) ∧
    (∀n s t. s ∈ g n ∧ t ∈ g n ⇒ s ∩ t ∈ g n) ⇒
    (martingale m a u ⇔
     filtered_measure_space m a ∧ (∀n. integrable m (u n)) ∧
     ∀i j s.
       i ≤ j ∧ s ∈ g i ⇒ ∫ m (λx. u i x * 𝟙 s x) = ∫ m (λx. u j x * 𝟙 s x))
⊢ ∀cons car cdr m1 m2.
    pair_operation cons car cdr ∧ sigma_finite_measure_space m1 ∧
    sigma_finite_measure_space m2 ⇒
    measure_space (general_prod_measure_space cons m1 m2)
⊢ ∀m1 m2.
    sigma_finite_measure_space m1 ∧ sigma_finite_measure_space m2 ⇒
    measure_space (m1 × m2)
⊢ pair_operation CONS HD TL
⊢ FINITE 𝕌(:β) ∧ FINITE 𝕌(:γ) ⇒ pair_operation FCP_CONCAT FCP_FST FCP_SND
⊢ pair_operation $, FST SND
⊢ ∀m f.
    measure_space m ∧ (∀x. x ∈ m_space m ⇒ 0 ≤ f x) ∧
    f ∈ Borel_measurable (measurable_space m) ∧ ∫⁺ m f ≠ +∞ ⇒
    AE x::m. f x = (Normal ∘ real ∘ f) x
⊢ ∀m f g h.
    measure_space m ∧ (∀x. x ∈ m_space m ⇒ 0 ≤ f x) ∧
    (∀x. x ∈ m_space m ⇒ 0 ≤ g x) ∧ (∀x. x ∈ m_space m ⇒ 0 ≤ h x) ∧
    f ∈ Borel_measurable (measurable_space m) ∧
    g ∈ Borel_measurable (measurable_space m) ∧
    h ∈ Borel_measurable (measurable_space m) ⇒
    ∫⁺ m (λx. f x + g x + h x) = ∫⁺ m f + ∫⁺ m g + ∫⁺ m h
⊢ ∀sp sts mu nu f g.
    (measure_space (sp,sts,mu) ∨ measure_space (sp,sts,nu)) ∧
    (∀s. s ∈ sts ⇒ mu s = nu s) ∧ (∀x. x ∈ sp ⇒ 0 ≤ f x ∨ 0 ≤ g x) ∧
    (∀x. x ∈ sp ⇒ f x = g x) ⇒
    ∫⁺ (sp,sts,mu) f = ∫⁺ (sp,sts,nu) g
⊢ ∀sp sts u v f.
    measure_space (sp,sts,u) ∧ (∀s. s ∈ sts ⇒ u s = v s) ∧
    (∀x. x ∈ sp ⇒ 0 ≤ f x) ⇒
    ∫⁺ (sp,sts,u) f = ∫⁺ (sp,sts,v) f
⊢ ∀m1 m2 f.
    measure_space m1 ∧ measure_space_eq m1 m2 ∧
    (∀x. x ∈ m_space m1 ⇒ 0 ≤ f x) ⇒
    ∫⁺ m1 f = ∫⁺ m2 f
⊢ ∀m f g.
    measure_space m ∧ f ∈ Borel_measurable (measurable_space m) ∧
    g ∈ Borel_measurable (measurable_space m) ∧ (AE x::m. 0 ≤ f x) ∧
    (∀x. 0 ≤ g x) ⇒
    ∫⁺ (density m f⁺) g = ∫⁺ m (λx. f⁺ x * g x)
⊢ ∀m f g.
    measure_space m ∧ (∀x. x ∈ m_space m ⇒ 0 ≤ f x) ∧
    (∀x. x ∈ m_space m ⇒ 0 ≤ g x) ∧
    f ∈ Borel_measurable (measurable_space m) ⇒
    ∫⁺ (density_of m f) g = ∫⁺ (density m f) g
⊢ ∀m f g.
    measure_space m ∧ f ∈ Borel_measurable (measurable_space m) ∧
    g ∈ Borel_measurable (measurable_space m) ∧
    (∀x. x ∈ m_space m ⇒ 0 ≤ f x) ∧ (∀x. x ∈ m_space m ⇒ 0 ≤ g x) ⇒
    ∫⁺ (density_of m f) g = ∫⁺ m (λx. f x * g x)
⊢ ∀m f g.
    measure_space m ∧ f ∈ Borel_measurable (measurable_space m) ∧
    g ∈ Borel_measurable (measurable_space m) ∧
    (∀x. x ∈ m_space m ⇒ 0 ≤ f x) ∧ (∀x. x ∈ m_space m ⇒ 0 ≤ g x) ⇒
    ∫⁺ (density m f) g = ∫⁺ m (λx. f x * g x)
⊢ ∀M B f u.
    measure_space M ∧ sigma_algebra B ∧
    f ∈ measurable (measurable_space M) B ∧ u ∈ Borel_measurable B ∧
    (∀x. x ∈ space B ⇒ 0 ≤ u x) ⇒
    ∫⁺ (space B,subsets B,distr M f) u = ∫⁺ M (u ∘ f)
⊢ ∀M N f u.
    measure_space M ∧ measure_space N ∧
    f ∈ measurable (measurable_space M) (measurable_space N) ∧
    u ∈ Borel_measurable (measurable_space N) ∧
    (∀x. x ∈ m_space N ⇒ 0 ≤ u x) ⇒
    ∫⁺ (distr_of M N f) u = ∫⁺ M (u ∘ f)
⊢ ∀m f.
    measure_space m ∧ f ∈ Borel_measurable (measurable_space m) ∧
    (∀x. x ∈ m_space m ⇒ 0 ≤ f x) ∧ ∫⁺ m f = 0 ⇒
    AE x::m. f x = 0
⊢ ∀m1 m2 f.
    sigma_finite_measure_space m1 ∧ sigma_finite_measure_space m2 ∧
    f ∈ Borel_measurable (measurable_space m1 × measurable_space m2) ∧
    (∀z. z ∈ m_space m1 × m_space m2 ⇒ 0 ≤ f z) ⇒
    ∫⁺ m1 (λx. ∫⁺ m2 (λy. f (x,y))) = ∫⁺ m2 (λy. ∫⁺ m1 (λx. f (x,y)))
⊢ ∀m1 m2.
    m1 × m2 =
    (m_space m1 × m_space m2,
     subsets (measurable_space m1 × measurable_space m2),
     (λs. ∫⁺ m2 (λy. ∫⁺ m1 (λx. 𝟙 s (x,y)))))
⊢ ∀m1 m2. m1 × m2 = general_prod_measure_space $, m1 m2
⊢ ∀A B. prod_sets A B = general_prod $, A B
⊢ ∀A B. A × B = general_sigma $, A B
⊢ ∀X Y E G.
    FINITE 𝕌(:β) ∧ FINITE 𝕌(:γ) ∧ subset_class X E ∧ subset_class Y G ∧
    has_exhausting_sequence (X,E) ∧ has_exhausting_sequence (Y,G) ⇒
    fcp_sigma (X,E) (Y,G) = fcp_sigma (sigma X E) (sigma Y G)
⊢ ∀p m u r.
    measure_space m ∧ 0 < p ∧ u ∈ Borel_measurable (measurable_space m) ⇒
    seminorm p m (λx. Normal r * u x) = Normal (abs r) * seminorm p m u
⊢ ∀m u v p.
    measure_space m ∧ 0 < p ∧
    (u ∈ Borel_measurable (measurable_space m) ∨
     v ∈ Borel_measurable (measurable_space m)) ∧
    (∀x. x ∈ m_space m ⇒ u x = v x) ⇒
    seminorm p m u = seminorm p m v
⊢ ∀m u v p.
    measure_space m ∧ 0 < p ∧ u ∈ Borel_measurable (measurable_space m) ∧
    v ∈ Borel_measurable (measurable_space m) ∧ (AE x::m. u x = v x) ⇒
    seminorm p m u = seminorm p m v
⊢ ∀p m f.
    measure_space m ∧ 0 < p ∧ f ∈ Borel_measurable (measurable_space m) ⇒
    (seminorm p m f = 0 ⇔ AE x::m. f x = 0)
⊢ ∀m f.
    seminorm +∞ m f =
    inf {c | 0 < c ∧ measure m {x | x ∈ m_space m ∧ c ≤ abs (f x)} = 0}
⊢ ∀m f.
    measure_space m ∧ f ∈ Borel_measurable (measurable_space m) ⇒
    AE x::m. abs (f x) ≤ seminorm +∞ m f
⊢ ∀m f.
    measure_space m ∧ f ∈ Borel_measurable (measurable_space m) ⇒
    seminorm +∞ m f = inf {c | 0 < c ∧ AE x::m. abs (f x) < c}
⊢ ∀p m f.
    0 < p ∧ p ≠ +∞ ⇒ seminorm p m f = ∫⁺ m (λx. abs (f x) powr p) powr p⁻¹
⊢ ∀p m f.
    measure_space m ∧ 0 < p ∧ f ∈ lp_space p m ⇒
    seminorm p m f ≠ +∞ ∧ seminorm p m f ≠ −∞
⊢ ∀m f. measure_space m ⇒ seminorm 1 m f = ∫⁺ m (abs ∘ f)
⊢ ∀p m f. 0 < p ⇒ 0 ≤ seminorm p m f
⊢ ∀p m f.
    measure_space m ∧ 0 < p ∧ p ≠ +∞ ⇒
    seminorm p m f powr p = ∫⁺ m (λx. abs (f x) powr p)
⊢ ∀m f. measure_space m ⇒ seminorm 2 m f = sqrt (∫⁺ m (λx. (f x)²))
⊢ ∀p m. measure_space m ∧ 0 < p ⇒ seminorm p m (λx. 0) = 0
⊢ ∀cons A B.
    subset_class (space A) (subsets A) ∧ subset_class (space B) (subsets B) ⇒
    sigma_algebra (general_sigma cons A B)
⊢ ∀a b.
    subset_class (space a) (subsets a) ∧ subset_class (space b) (subsets b) ⇒
    sigma_algebra (fcp_sigma a b)
⊢ ∀X Y A B.
    subset_class X A ∧ subset_class Y B ⇒
    sigma_algebra (fcp_sigma (X,A) (Y,B))
⊢ ∀m a.
    sigma_finite_filtered_measure_space m a ⇔
    (measure_space m ∧ filtration (measurable_space m) a) ∧
    sigma_finite (m_space m,subsets (a 0),measure m)
⊢ ∀m a.
    sigma_finite_filtered_measure_space m a ⇔
    measure_space m ∧ filtration (measurable_space m) a ∧
    ∀n. sigma_finite (m_space m,subsets (a n),measure m)
⊢ ∀m a u.
    sub_martingale m a u ⇔
    sigma_finite_filtered_measure_space m a ∧ (∀n. integrable m (u n)) ∧
    ∀i j s.
      i ≤ j ∧ s ∈ subsets (a i) ⇒
      ∫ m (λx. u i x * 𝟙 s x) ≤ ∫ m (λx. u j x * 𝟙 s x)
⊢ ∀m a u g.
    (∀n. a n = sigma (m_space m) (g n)) ∧
    (∀n. has_exhausting_sequence (m_space m,g n)) ∧
    (∀n s. s ∈ g n ⇒ measure m s < +∞) ∧ (∀n. semiring (m_space m,g n)) ⇒
    (sub_martingale m a u ⇔
     filtered_measure_space m a ∧ (∀n. integrable m (u n)) ∧
     ∀i j s.
       i ≤ j ∧ s ∈ g i ⇒ ∫ m (λx. u i x * 𝟙 s x) ≤ ∫ m (λx. u j x * 𝟙 s x))
⊢ ∀m a u.
    super_martingale m a u ⇔
    sigma_finite_filtered_measure_space m a ∧ (∀n. integrable m (u n)) ∧
    ∀i j s.
      i ≤ j ∧ s ∈ subsets (a i) ⇒
      ∫ m (λx. u j x * 𝟙 s x) ≤ ∫ m (λx. u i x * 𝟙 s x)
⊢ ∀m a u g.
    (∀n. a n = sigma (m_space m) (g n)) ∧
    (∀n. has_exhausting_sequence (m_space m,g n)) ∧
    (∀n s. s ∈ g n ⇒ measure m s < +∞) ∧ (∀n. semiring (m_space m,g n)) ⇒
    (super_martingale m a u ⇔
     filtered_measure_space m a ∧ (∀n. integrable m (u n)) ∧
     ∀i j s.
       i ≤ j ∧ s ∈ g i ⇒ ∫ m (λx. u j x * 𝟙 s x) ≤ ∫ m (λx. u i x * 𝟙 s x))
⊢ ∀cons car cdr X Y A B u v f.
    pair_operation cons car cdr ∧ sigma_finite_measure_space (X,A,u) ∧
    sigma_finite_measure_space (Y,B,v) ∧
    f ∈ Borel_measurable (general_sigma cons (X,A) (Y,B)) ∧
    (∀s. s ∈ general_cross cons X Y ⇒ 0 ≤ f s) ⇒
    (∀y. y ∈ Y ⇒ (λx. f (cons x y)) ∈ Borel_measurable (X,A)) ∧
    (∀x. x ∈ X ⇒ (λy. f (cons x y)) ∈ Borel_measurable (Y,B)) ∧
    (λx. ∫⁺ (Y,B,v) (λy. f (cons x y))) ∈ Borel_measurable (X,A) ∧
    (λy. ∫⁺ (X,A,u) (λx. f (cons x y))) ∈ Borel_measurable (Y,B) ∧
    ∫⁺ (general_prod_measure_space cons (X,A,u) (Y,B,v)) f =
    ∫⁺ (Y,B,v) (λy. ∫⁺ (X,A,u) (λx. f (cons x y))) ∧
    ∫⁺ (general_prod_measure_space cons (X,A,u) (Y,B,v)) f =
    ∫⁺ (X,A,u) (λx. ∫⁺ (Y,B,v) (λy. f (cons x y)))
⊢ ∀X Y E G A B u v m m'.
    FINITE 𝕌(:β) ∧ FINITE 𝕌(:γ) ∧ subset_class X E ∧ subset_class Y G ∧
    sigma_finite (X,E,u) ∧ sigma_finite (Y,G,v) ∧
    (∀s t. s ∈ E ∧ t ∈ E ⇒ s ∩ t ∈ E) ∧ (∀s t. s ∈ G ∧ t ∈ G ⇒ s ∩ t ∈ G) ∧
    A = sigma X E ∧ B = sigma Y G ∧ measure_space (X,subsets A,u) ∧
    measure_space (Y,subsets B,v) ∧
    measure_space (fcp_cross X Y,subsets (fcp_sigma A B),m) ∧
    measure_space (fcp_cross X Y,subsets (fcp_sigma A B),m') ∧
    (∀s t. s ∈ E ∧ t ∈ G ⇒ m (fcp_cross s t) = u s * v t) ∧
    (∀s t. s ∈ E ∧ t ∈ G ⇒ m' (fcp_cross s t) = u s * v t) ⇒
    ∀x. x ∈ subsets (fcp_sigma A B) ⇒ m x = m' x
⊢ ∀X Y A B u v m m'.
    FINITE 𝕌(:β) ∧ FINITE 𝕌(:γ) ∧ sigma_finite_measure_space (X,A,u) ∧
    sigma_finite_measure_space (Y,B,v) ∧
    measure_space (fcp_cross X Y,subsets (fcp_sigma (X,A) (Y,B)),m) ∧
    measure_space (fcp_cross X Y,subsets (fcp_sigma (X,A) (Y,B)),m') ∧
    (∀s t. s ∈ A ∧ t ∈ B ⇒ m (fcp_cross s t) = u s * v t) ∧
    (∀s t. s ∈ A ∧ t ∈ B ⇒ m' (fcp_cross s t) = u s * v t) ⇒
    ∀x. x ∈ subsets (fcp_sigma (X,A) (Y,B)) ⇒ m x = m' x
⊢ ∀cons car cdr X Y E G A B u v m m'.
    pair_operation cons car cdr ∧ subset_class X E ∧ subset_class Y G ∧
    sigma_finite (X,E,u) ∧ sigma_finite (Y,G,v) ∧
    (∀s t. s ∈ E ∧ t ∈ E ⇒ s ∩ t ∈ E) ∧ (∀s t. s ∈ G ∧ t ∈ G ⇒ s ∩ t ∈ G) ∧
    A = sigma X E ∧ B = sigma Y G ∧ measure_space (X,subsets A,u) ∧
    measure_space (Y,subsets B,v) ∧
    measure_space
      (general_cross cons X Y,subsets (general_sigma cons A B),m) ∧
    measure_space
      (general_cross cons X Y,subsets (general_sigma cons A B),m') ∧
    (∀s t. s ∈ E ∧ t ∈ G ⇒ m (general_cross cons s t) = u s * v t) ∧
    (∀s t. s ∈ E ∧ t ∈ G ⇒ m' (general_cross cons s t) = u s * v t) ⇒
    ∀x. x ∈ subsets (general_sigma cons A B) ⇒ m x = m' x
⊢ ∀cons car cdr X Y A B u v m m'.
    pair_operation cons car cdr ∧ sigma_finite_measure_space (X,A,u) ∧
    sigma_finite_measure_space (Y,B,v) ∧
    measure_space
      (general_cross cons X Y,subsets (general_sigma cons (X,A) (Y,B)),m) ∧
    measure_space
      (general_cross cons X Y,subsets (general_sigma cons (X,A) (Y,B)),m') ∧
    (∀s t. s ∈ A ∧ t ∈ B ⇒ m (general_cross cons s t) = u s * v t) ∧
    (∀s t. s ∈ A ∧ t ∈ B ⇒ m' (general_cross cons s t) = u s * v t) ⇒
    ∀x. x ∈ subsets (general_sigma cons (X,A) (Y,B)) ⇒ m x = m' x