Anforderungen  |   Konzepte  |   Entwurf  |   Entwicklung  |   Qualitätssicherung  |   Lebenszyklus  |   Steuerung
 
 
 
 


Impressum fubini_tonelli_scaf.prf

  Sprache: Lisp
 

(fubini_tonelli_scaf
 (product_measure_contraction_TCC1 0
  (product_measure_contraction_TCC1-1 nil 3459570741
   ("" (skosimp)
    (("" (expand "measurable_set?")
      (("" (rewrite "cross_product_is_sigma_times"nil nil)) nil))
    nil)
   ((measurable_set? const-decl "bool" measure_space_def nil)
    (S2 formal-const-decl "sigma_algebra[T2]" fubini_tonelli_scaf nil)
    (S1 formal-const-decl "sigma_algebra[T1]" fubini_tonelli_scaf nil)
    (sigma_algebra nonempty-type-eq-decl nil subset_algebra_def nil)
    (sigma_algebra? const-decl "bool" subset_algebra_def nil)
    (setofsets type-eq-decl nil sets nil)
    (setof type-eq-decl nil defined_types nil)
    (bool nonempty-type-eq-decl nil booleans nil)
    (boolean nonempty-type-decl nil booleans nil)
    (T2 formal-type-decl nil fubini_tonelli_scaf nil)
    (T1 formal-type-decl nil fubini_tonelli_scaf nil)
    (cross_product_is_sigma_times formula-decl nil product_sigma nil))
   nil))
 (product_measure_contraction_TCC2 0
  (product_measure_contraction_TCC2-1 nil 3459570741
   ("" (skosimp)
    (("" (expand "measurable_set?") (("" (propax) nil nil)) nil)) nil)
   ((measurable_set? const-decl "bool" measure_space_def nil)) nil))
 (product_measure_contraction_TCC3 0
  (product_measure_contraction_TCC3-1 nil 3459570741
   ("" (skosimp)
    (("" (expand "measurable_set?") (("" (propax) nil nil)) nil)) nil)
   ((measurable_set? const-decl "bool" measure_space_def nil)) nil))
 (product_measure_contraction 0
  (product_measure_contraction-1 nil 3460776966
   ("" (skosimp)
    (("" (lemma "cross_product_is_sigma_times" ("X" "X!1" "Y" "Y!1"))
      ((""
        (lemma "measurable_intersection"
         ("a" "cross_product(X!1, Y!1)" "b" "E!1"))
        (("1" (expand "contraction" 1 1)
          (("1"
            (name "F"
                  "lambda j: fm_contraction[T2, S2](nu, A_of(nu)(j)) o
                                           x_section(intersection
                                                     (cross_product(X!1, Y!1),
                                                      E!1))")
            (("1" (case "forall j,x: F(j)(x)>=0")
              (("1"
                (name "MU" "lambda i: fm_contraction[T1, S1]
                                                         (mu, A_of(mu)(i))")
                (("1"
                  (case "forall (E:(S1)): x_eq(mu(E),
                            x_sum(LAMBDA i: to_measure(MU(i))(E)))")
                  (("1"
                    (case "forall i,j: integrable?[T1,S1,to_measure(MU(i))](F(j))")
                    (("1"
                      (case "forall x: measurable_set?(x_section(intersection(cross_product(X!1, Y!1), E!1),x))")
                      (("1"
                        (name "EE"
                              "intersection(cross_product(X!1, Y!1),
                                                                    E!1)")
                        (("1" (replace -1)
                          (("1"
                            (case "forall x: x_eq(x_sum(lambda j: F(j)(x)),nu(x_section(EE,x)))")
                            (("1" (hide -6 -8)
                              (("1"
                                (case
                                 "forall x: measurable_set?(x_section(E!1,x))")
                                (("1"
                                  (name
                                   "G"
                                   "lambda j: (fm_contraction[T2, S2]
                                                              (contraction(nu, Y!1),
                                                               A_of(contraction(nu, Y!1))(j))
                                                           o x_section(E!1))")
                                  (("1"
                                    (case "forall j,x: G(j)(x)>=0")
                                    (("1"
                                      (name
                                       "NU"
                                       "lambda i: fm_contraction[T1, S1]
                                                                         (contraction(mu, X!1),
                                                                          A_of
                                                                          (contraction(mu, X!1))(i))")
                                      (("1"
                                        (case
                                         "forall i,j: integrable?[T1,S1,to_measure(NU(i))](G(j))")
                                        (("1"
                                          (hide -2 -4)
                                          (("1"
                                            (case
                                             "FORALL (E: (S1)): x_eq(contraction(mu, X!1)(E), x_sum(LAMBDA i: to_measure(NU(i))(E)))")
                                            (("1"
                                              (case
                                               "FORALL x: x_eq(x_sum(LAMBDA j: G(j)(x)), contraction(nu, Y!1)(x_section(E!1, x)))")
                                              (("1"
                                                (case
                                                 "forall x: X!1(x)=> x_eq(contraction(nu, Y!1)(x_section(E!1, x)), nu(x_section(EE, x)))")
                                                (("1"
                                                  (case
                                                   "x_eq(x_sum(LAMBDA i:
                                                     x_sum(LAMBDA j:
                                                             (TRUE,
                                                              integral
                                                                  [T1, S1,
                                                                   to_measure(MU(i))]
                                                                  (F(j))))),
                                             x_sum(LAMBDA i:
                                                     x_sum(LAMBDA j:
                                                             (TRUE,
                                                              integral
                                                                  [T1, S1,
                                                                   to_measure(NU(i))]
                                                                  (G(j))))))")
                                                  (("1"
                                                    (expand "m_times")
                                                    (("1"
                                                      (expand
                                                       "to_measure"
                                                       1)
                                                      (("1"
                                                        (expand
                                                         "product_measure_approx")
                                                        (("1"
                                                          (expand
                                                           "fm_times")
                                                          (("1"
                                                            (lemma
                                                             "x_sum_eq"
                                                             ("S"
                                                              "LAMBDA i:
                                                        x_sum(LAMBDA j:
                                                                (TRUE,
                                                                 integral[T1, S1, to_measure(MU(i))](F(j))))"
                                                              "T"
                                                              "LAMBDA i:
                                                        x_sum(LAMBDA j:
                                                                (TRUE,
                                                                 integral
                                                                     [T1, S1,
                                                                      to_measure(fm_contraction[T1, S1]
                                                                                 (mu, A_of(mu)(i)))]
                                                                     (fm_contraction[T2, S2](nu, A_of(nu)(j)) o
                                                                       x_section(EE))))"))
                                                            (("1"
                                                              (split
                                                               -1)
                                                              (("1"
                                                                (lemma
                                                                 "x_sum_eq"
                                                                 ("S"
                                                                  "LAMBDA i:
                                                            x_sum(LAMBDA j:
                                                                    (TRUE,
                                                                     integral
                                                                         [T1, S1,
                                                                          to_measure(fm_contraction[T1, S1]
                                                                                     (contraction(mu, X!1),
                                                                                      A_of
                                                                                      (contraction(mu, X!1))(i)))]
                                                                         (fm_contraction[T2, S2]
                                                                              (contraction(nu, Y!1),
                                                                               A_of(contraction(nu, Y!1))(j))
                                                                           o x_section(E!1))))"
                                                                  "T"
                                                                  "LAMBDA i:
                                                            x_sum(LAMBDA j:
                                                                    (TRUE,
                                                                     integral[T1, S1, to_measure(NU(i))](G(j))))"))
                                                                (("1"
                                                                  (split
                                                                   -1)
                                                                  (("1"
                                                                    (hide-all-but
                                                                     (-1
                                                                      -2
                                                                      -3
                                                                      1))
                                                                    (("1"
                                                                      (expand
                                                                       "x_eq")
                                                                      (("1"
                                                                        (flatten)
                                                                        (("1"
                                                                          (assert)
                                                                          (("1"
                                                                            (flatten)
                                                                            (("1"
                                                                              (assert)
                                                                              nil
                                                                              nil))
                                                                            nil))
                                                                          nil))
                                                                        nil))
                                                                      nil))
                                                                    nil)
                                                                   ("2"
                                                                    (hide
                                                                     2
                                                                     -1
                                                                     -2)
                                                                    (("2"
                                                                      (assert)
                                                                      (("2"
                                                                        (skolem
                                                                         +
                                                                         "i!1")
                                                                        (("2"
                                                                          (lemma
                                                                           "x_sum_eq"
                                                                           ("S"
                                                                            "LAMBDA j:
                                                                (TRUE,
                                                                 integral
                                                                     [T1, S1,
                                                                      to_measure(fm_contraction[T1, S1]
                                                                                 (contraction(mu, X!1),
                                                                                  A_of(contraction(mu, X!1))(i!1)))]
                                                                     (fm_contraction[T2, S2]
                                                                          (contraction(nu, Y!1),
                                                                           A_of(contraction(nu, Y!1))(j))
                                                                       o x_section(E!1)))"
                                                                            "T"
                                                                            "LAMBDA j:
                                                                (TRUE, integral[T1, S1, to_measure(NU(i!1))](G(j)))"))
                                                                          (("1"
                                                                            (split)
                                                                            (("1"
                                                                              (propax)
                                                                              nil
                                                                              nil)
                                                                             ("2"
                                                                              (hide
                                                                               2)
                                                                              (("2"
                                                                                (assert)
                                                                                (("2"
                                                                                  (skolem
                                                                                   +
                                                                                   "j!1")
                                                                                  (("2"
                                                                                    (expand
                                                                                     "x_eq"
                                                                                     1)
                                                                                    (("2"
                                                                                      (inst
                                                                                       -4
                                                                                       "i!1"
                                                                                       "j!1")
                                                                                      (("2"
                                                                                        (lemma
                                                                                         "measure_eq_integral[T1,S1]"
                                                                                         ("mu"
                                                                                          "to_measure(fm_contraction[T1, S1]
                                                                           (contraction(mu, X!1),
                                                                            A_of(contraction(mu, X!1))(i!1)))"
                                                                                          "nu"
                                                                                          "to_measure(NU(i!1))"
                                                                                          "f"
                                                                                          "G(j!1)"))
                                                                                        (("2"
                                                                                          (assert)
                                                                                          (("2"
                                                                                            (expand
                                                                                             "G")
                                                                                            (("2"
                                                                                              (assert)
                                                                                              (("2"
                                                                                                (hide-all-but
                                                                                                 (1
                                                                                                  -6
                                                                                                  -8
                                                                                                  -9
                                                                                                  -13))
                                                                                                (("2"
                                                                                                  (skosimp)
                                                                                                  (("2"
                                                                                                    (expand
                                                                                                     "to_measure")
                                                                                                    (("2"
                                                                                                      (expand
                                                                                                       "x_eq")
                                                                                                      (("2"
                                                                                                        (expand
                                                                                                         "NU")
                                                                                                        (("2"
                                                                                                          (propax)
                                                                                                          nil
                                                                                                          nil))
                                                                                                        nil))
                                                                                                      nil))
                                                                                                    nil))
                                                                                                  nil))
                                                                                                nil))
                                                                                              nil))
                                                                                            nil))
                                                                                          nil))
                                                                                        nil))
                                                                                      nil))
                                                                                    nil))
                                                                                  nil))
                                                                                nil))
                                                                              nil))
                                                                            nil)
                                                                           ("2"
                                                                            (hide
                                                                             2)
                                                                            (("2"
                                                                              (skosimp)
                                                                              (("2"
                                                                                (inst
                                                                                 -4
                                                                                 "i!1"
                                                                                 "j!1")
                                                                                (("2"
                                                                                  (inst
                                                                                   -5
                                                                                   "j!1"
                                                                                   "_")
                                                                                  (("2"
                                                                                    (lemma
                                                                                     "integral_nonneg[T1, S1, to_measure[T1, S1](NU(i!1))]"
                                                                                     ("f"
                                                                                      "G(j!1)"))
                                                                                    (("2"
                                                                                      (assert)
                                                                                      nil
                                                                                      nil))
                                                                                    nil))
                                                                                  nil))
                                                                                nil))
                                                                              nil))
                                                                            nil)
                                                                           ("3"
                                                                            (skosimp)
                                                                            (("3"
                                                                              (inst
                                                                               -4
                                                                               "i!1"
                                                                               "j!1")
                                                                              nil
                                                                              nil))
                                                                            nil)
                                                                           ("4"
                                                                            (hide
                                                                             2)
                                                                            (("4"
                                                                              (skosimp)
                                                                              (("4"
                                                                                (inst
                                                                                 -4
                                                                                 "i!1"
                                                                                 "j!1")
                                                                                (("4"
                                                                                  (inst
                                                                                   -5
                                                                                   "j!1"
                                                                                   "_")
                                                                                  (("4"
                                                                                    (lemma
                                                                                     "integral_nonneg[T1, S1, to_measure(NU(i!1))]"
                                                                                     ("f"
                                                                                      "G(j!1)"))
                                                                                    (("1"
                                                                                      (replace
                                                                                       -6)
                                                                                      (("1"
                                                                                        (lemma
                                                                                         "measure_eq_integral[T1,S1]"
                                                                                         ("mu"
                                                                                          "to_measure[T1, S1]
                                                                (fm_contraction[T1, S1]
                                                                     (contraction[T1, S1](mu, X!1),
                                                                      A_of[T1, S1](contraction[T1, S1](mu, X!1))(i!1)))"
                                                                                          "nu"
                                                                                          "to_measure(NU(i!1))"
                                                                                          "f"
                                                                                          "G(j!1)"))
                                                                                        (("1"
                                                                                          (assert)
                                                                                          (("1"
                                                                                            (expand
                                                                                             "G"
                                                                                             -1
                                                                                             1)
                                                                                            (("1"
                                                                                              (hide-all-but
                                                                                               1)
                                                                                              (("1"
                                                                                                (skosimp)
                                                                                                (("1"
                                                                                                  (expand
                                                                                                   "to_measure")
                                                                                                  (("1"
                                                                                                    (expand
                                                                                                     "NU")
                                                                                                    (("1"
                                                                                                      (expand
                                                                                                       "x_eq")
                                                                                                      (("1"
                                                                                                        (propax)
                                                                                                        nil
                                                                                                        nil))
                                                                                                      nil))
                                                                                                    nil))
                                                                                                  nil))
                                                                                                nil))
                                                                                              nil))
                                                                                            nil))
                                                                                          nil)
                                                                                         ("2"
                                                                                          (expand
                                                                                           "measurable_set?")
                                                                                          (("2"
                                                                                            (rewrite
                                                                                             "A_of_def2")
                                                                                            nil
                                                                                            nil))
                                                                                          nil))
                                                                                        nil))
                                                                                      nil)
                                                                                     ("2"
                                                                                      (propax)
                                                                                      nil
                                                                                      nil))
                                                                                    nil))
                                                                                  nil))
                                                                                nil))
                                                                              nil))
                                                                            nil)
                                                                           ("5"
                                                                            (expand
                                                                             "measurable_set?")
                                                                            (("5"
                                                                              (rewrite
                                                                               "A_of_def2")
                                                                              nil
                                                                              nil))
                                                                            nil)
                                                                           ("6"
                                                                            (skosimp)
                                                                            (("6"
                                                                              (inst
                                                                               -4
                                                                               "i!1"
                                                                               "j!1")
                                                                              (("6"
                                                                                (hide
                                                                                 2)
                                                                                (("6"
                                                                                  (lemma
                                                                                   "measure_eq_integrable?[T1,S1]"
                                                                                   ("mu"
                                                                                    "to_measure(NU(i!1))"
                                                                                    "nu"
                                                                                    "to_measure(fm_contraction[T1, S1]
                                                                         (contraction(mu, X!1),
                                                                          A_of(contraction(mu, X!1))(i!1)))"
                                                                                    "f"
                                                                                    "G(j!1)"))
                                                                                  (("1"
                                                                                    (split
                                                                                     -1)
                                                                                    (("1"
                                                                                      (assert)
                                                                                      (("1"
                                                                                        (expand
                                                                                         "G")
                                                                                        (("1"
                                                                                          (propax)
                                                                                          nil
                                                                                          nil))
                                                                                        nil))
                                                                                      nil)
                                                                                     ("2"
                                                                                      (hide-all-but
                                                                                       1)
                                                                                      (("2"
                                                                                        (skosimp)
                                                                                        (("2"
                                                                                          (expand
                                                                                           "to_measure")
                                                                                          (("2"
                                                                                            (expand
                                                                                             "x_eq")
                                                                                            (("2"
                                                                                              (expand
                                                                                               "NU")
                                                                                              (("2"
                                                                                                (propax)
                                                                                                nil
                                                                                                nil))
                                                                                              nil))
                                                                                            nil))
                                                                                          nil))
                                                                                        nil))
                                                                                      nil))
                                                                                    nil)
                                                                                   ("2"
                                                                                    (expand
                                                                                     "measurable_set?")
                                                                                    (("2"
                                                                                      (rewrite
                                                                                       "A_of_def2")
                                                                                      nil
                                                                                      nil))
                                                                                    nil))
                                                                                  nil))
                                                                                nil))
                                                                              nil))
                                                                            nil))
                                                                          nil))
                                                                        nil))
                                                                      nil))
                                                                    nil))
                                                                  nil)
                                                                 ("2"
                                                                  (hide
                                                                   -1
                                                                   -2
                                                                   2)
                                                                  (("2"
                                                                    (skosimp)
                                                                    (("2"
                                                                      (inst
                                                                       -4
                                                                       "i!1"
                                                                       "j!1")
                                                                      (("2"
                                                                        (inst
                                                                         -5
                                                                         "j!1"
                                                                         "_")
                                                                        (("2"
                                                                          (lemma
                                                                           "integral_nonneg[T1, S1, to_measure(NU(i!1))]"
                                                                           ("f"
                                                                            "G(j!1)"))
                                                                          (("1"
                                                                            (replace
                                                                             -6)
                                                                            (("1"
                                                                              (lemma
                                                                               "measure_eq_integral[T1,S1]"
                                                                               ("mu"
                                                                                "to_measure[T1, S1]
                                                            (fm_contraction[T1, S1]
                                                                 (contraction[T1, S1](mu, X!1),
                                                                  A_of[T1, S1](contraction[T1, S1](mu, X!1))(i!1)))"
                                                                                "nu"
                                                                                "to_measure(NU(i!1))"
                                                                                "f"
                                                                                "G(j!1)"))
                                                                              (("1"
                                                                                (split
                                                                                 -1)
                                                                                (("1"
                                                                                  (expand
                                                                                   "G"
                                                                                   -1
                                                                                   1)
                                                                                  (("1"
                                                                                    (assert)
                                                                                    nil
                                                                                    nil))
                                                                                  nil)
                                                                                 ("2"
                                                                                  (hide-all-but
                                                                                   1)
                                                                                  (("2"
                                                                                    (skosimp)
                                                                                    (("2"
                                                                                      (expand
                                                                                       "to_measure")
                                                                                      (("2"
                                                                                        (expand
                                                                                         "x_eq")
                                                                                        (("2"
                                                                                          (expand
                                                                                           "NU")
                                                                                          (("2"
                                                                                            (propax)
                                                                                            nil
                                                                                            nil))
                                                                                          nil))
                                                                                        nil))
                                                                                      nil))
                                                                                    nil))
                                                                                  nil)
                                                                                 ("3"
                                                                                  (flatten)
                                                                                  nil
                                                                                  nil))
                                                                                nil)
                                                                               ("2"
                                                                                (expand
                                                                                 "measurable_set?")
                                                                                (("2"
                                                                                  (rewrite
                                                                                   "A_of_def2")
                                                                                  nil
                                                                                  nil))
                                                                                nil)
                                                                               ("3"
                                                                                (expand
                                                                                 "measurable_set?")
                                                                                (("3"
                                                                                  (propax)
                                                                                  nil
                                                                                  nil))
                                                                                nil))
                                                                              nil))
                                                                            nil)
                                                                           ("2"
                                                                            (propax)
                                                                            nil
                                                                            nil))
                                                                          nil))
                                                                        nil))
                                                                      nil))
                                                                    nil))
                                                                  nil)
                                                                 ("3"
                                                                  (expand
                                                                   "measurable_set?")
                                                                  (("3"
                                                                    (propax)
                                                                    nil
                                                                    nil))
                                                                  nil)
                                                                 ("4"
                                                                  (hide
                                                                   -1
                                                                   -2
                                                                   2)
                                                                  (("4"
                                                                    (skosimp)
                                                                    (("4"
                                                                      (inst
                                                                       -4
                                                                       "i!1"
                                                                       "j!1")
                                                                      (("4"
                                                                        (lemma
                                                                         "measure_eq_integrable?[T1,S1]"
                                                                         ("mu"
                                                                          "to_measure(fm_contraction[T1, S1]
                                                                     (contraction(mu, X!1),
                                                                      A_of(contraction(mu, X!1))(i!1)))"
                                                                          "nu"
                                                                          "to_measure(NU(i!1))"
                                                                          "f"
                                                                          "G(j!1)"))
                                                                        (("1"
                                                                          (assert)
                                                                          (("1"
                                                                            (expand
                                                                             "G")
                                                                            (("1"
                                                                              (assert)
                                                                              (("1"
                                                                                (hide-all-but
                                                                                 1)
                                                                                (("1"
                                                                                  (skosimp)
                                                                                  (("1"
                                                                                    (expand
                                                                                     "to_measure")
                                                                                    (("1"
                                                                                      (expand
                                                                                       "x_eq")
                                                                                      (("1"
                                                                                        (expand
                                                                                         "NU")
                                                                                        (("1"
                                                                                          (propax)
                                                                                          nil
                                                                                          nil))
                                                                                        nil))
                                                                                      nil))
                                                                                    nil))
                                                                                  nil))
                                                                                nil))
                                                                              nil))
                                                                            nil))
                                                                          nil)
                                                                         ("2"
                                                                          (expand
                                                                           "measurable_set?")
                                                                          (("2"
                                                                            (rewrite
                                                                             "A_of_def2")
                                                                            nil
                                                                            nil))
                                                                          nil)
                                                                         ("3"
                                                                          (expand
                                                                           "measurable_set?")
                                                                          (("3"
                                                                            (propax)
                                                                            nil
                                                                            nil))
                                                                          nil))
                                                                        nil))
                                                                      nil))
                                                                    nil))
                                                                  nil)
                                                                 ("5"
                                                                  (expand
                                                                   "measurable_set?")
                                                                  (("5"
                                                                    (propax)
                                                                    nil
                                                                    nil))
                                                                  nil))
                                                                nil)
                                                               ("2"
                                                                (hide
                                                                 2
                                                                 -1)
                                                                (("2"
                                                                  (assert)
                                                                  (("2"
                                                                    (skolem
                                                                     +
                                                                     "i!1")
                                                                    (("2"
                                                                      (lemma
                                                                       "x_sum_eq"
                                                                       ("S"
                                                                        "LAMBDA j:
                                                            (TRUE, integral[T1, S1, to_measure(MU(i!1))](F(j)))"
                                                                        "T"
                                                                        "LAMBDA j:
                                                            (TRUE,
                                                             integral
                                                                 [T1, S1,
                                                                  to_measure(fm_contraction[T1, S1]
                                                                             (mu, A_of(mu)(i!1)))]
                                                                 (fm_contraction[T2, S2](nu, A_of(nu)(j)) o
                                                                   x_section(EE)))"))
                                                                      (("1"
                                                                        (assert)
                                                                        (("1"
                                                                          (skolem
                                                                           +
                                                                           "j!1")
                                                                          (("1"
                                                                            (hide
                                                                             -1
                                                                             2)
                                                                            (("1"
                                                                              (expand
                                                                               "x_eq"
                                                                               1)
                                                                              (("1"
                                                                                (lemma
                                                                                 "measure_eq_integral[T1,S1]"
                                                                                 ("mu"
                                                                                  "to_measure(fm_contraction[T1, S1](mu, A_of(mu)(i!1)))"
                                                                                  "nu"
                                                                                  "to_measure(MU(i!1))"
                                                                                  "f"
                                                                                  "F(j!1)"))
                                                                                (("1"
                                                                                  (inst
                                                                                   -10
                                                                                   "i!1"
                                                                                   "j!1")
                                                                                  (("1"
                                                                                    (assert)
                                                                                    (("1"
                                                                                      (expand
                                                                                       "F"
                                                                                       -1
                                                                                       1)
                                                                                      (("1"
                                                                                        (hide-all-but
                                                                                         1)
                                                                                        (("1"
                                                                                          (skosimp)
                                                                                          (("1"
                                                                                            (expand
                                                                                             "MU")
                                                                                            (("1"
                                                                                              (expand
                                                                                               "to_measure")
                                                                                              (("1"
                                                                                                (expand
                                                                                                 "x_eq")
                                                                                                (("1"
                                                                                                  (propax)
                                                                                                  nil
                                                                                                  nil))
                                                                                                nil))
                                                                                              nil))
                                                                                            nil))
                                                                                          nil))
                                                                                        nil))
                                                                                      nil))
                                                                                    nil))
                                                                                  nil))
                                                                                nil))
                                                                              nil))
                                                                            nil))
                                                                          nil))
                                                                        nil)
                                                                       ("2"
                                                                        (skosimp)
                                                                        (("2"
                                                                          (inst
                                                                           -10
                                                                           "i!1"
                                                                           "j!1")
                                                                          (("2"
                                                                            (inst
                                                                             -12
                                                                             "j!1"
                                                                             "_")
                                                                            (("2"
                                                                              (lemma
                                                                               "integral_nonneg[T1, S1, to_measure(MU(i!1))]"
                                                                               ("f"
                                                                                "F(j!1)"))
                                                                              (("1"
                                                                                (replace
                                                                                 -13)
                                                                                (("1"
                                                                                  (lemma
                                                                                   "measure_eq_integral[T1,S1]"
                                                                                   ("mu"
                                                                                    "to_measure[T1, S1]
                                                            (fm_contraction[T1, S1](mu, A_of[T1, S1](mu)(i!1)))"
                                                                                    "nu"
                                                                                    "to_measure(MU(i!1))"
                                                                                    "f"
                                                                                    "F(j!1)"))
                                                                                  (("1"
                                                                                    (replace
                                                                                     -12)
                                                                                    (("1"
                                                                                      (expand
                                                                                       "F"
                                                                                       -1
                                                                                       1)
                                                                                      (("1"
                                                                                        (assert)
                                                                                        (("1"
                                                                                          (hide-all-but
                                                                                           1)
                                                                                          (("1"
                                                                                            (skosimp)
                                                                                            (("1"
                                                                                              (expand
                                                                                               "MU")
                                                                                              (("1"
                                                                                                (expand
                                                                                                 "to_measure")
                                                                                                (("1"
                                                                                                  (expand
                                                                                                   "x_eq")
                                                                                                  (("1"
                                                                                                    (propax)
                                                                                                    nil
                                                                                                    nil))
                                                                                                  nil))
                                                                                                nil))
                                                                                              nil))
                                                                                            nil))
                                                                                          nil))
                                                                                        nil))
                                                                                      nil))
                                                                                    nil)
                                                                                   ("2"
                                                                                    (expand
                                                                                     "measurable_set?")
                                                                                    (("2"
                                                                                      (rewrite
                                                                                       "A_of_def2")
                                                                                      nil
                                                                                      nil))
                                                                                    nil))
                                                                                  nil))
                                                                                nil)
                                                                               ("2"
                                                                                (propax)
                                                                                nil
                                                                                nil))
                                                                              nil))
                                                                            nil))
                                                                          nil))
                                                                        nil)
                                                                       ("3"
                                                                        (expand
                                                                         "measurable_set?")
                                                                        (("3"
                                                                          (rewrite
                                                                           "A_of_def2")
                                                                          nil
                                                                          nil))
                                                                        nil)
                                                                       ("4"
                                                                        (skosimp)
                                                                        (("4"
                                                                          (inst
                                                                           -10
                                                                           "i!1"
                                                                           "j!1")
                                                                          (("4"
                                                                            (lemma
                                                                             "measure_eq_integrable?[T1,S1]"
                                                                             ("mu"
                                                                              "to_measure(fm_contraction[T1, S1](mu, A_of(mu)(i!1)))"
                                                                              "nu"
                                                                              "to_measure(MU(i!1))"
                                                                              "f"
                                                                              "F(j!1)"))
                                                                            (("1"
                                                                              (expand
                                                                               "F"
                                                                               -1
                                                                               1)
                                                                              (("1"
                                                                                (expand
                                                                                 "EE")
                                                                                (("1"
                                                                                  (assert)
                                                                                  (("1"
                                                                                    (hide-all-but
                                                                                     1)
                                                                                    (("1"
                                                                                      (skosimp)
                                                                                      (("1"
                                                                                        (expand
                                                                                         "MU")
                                                                                        (("1"
                                                                                          (expand
                                                                                           "to_measure")
                                                                                          (("1"
                                                                                            (expand
                                                                                             "x_eq")
                                                                                            (("1"
                                                                                              (propax)
                                                                                              nil
                                                                                              nil))
                                                                                            nil))
                                                                                          nil))
                                                                                        nil))
                                                                                      nil))
                                                                                    nil))
                                                                                  nil))
                                                                                nil))
                                                                              nil)
                                                                             ("2"
                                                                              (expand
                                                                               "measurable_set?")
                                                                              (("2"
                                                                                (rewrite
                                                                                 "A_of_def2")
                                                                                nil
                                                                                nil))
                                                                              nil))
                                                                            nil))
                                                                          nil))
                                                                        nil)
                                                                       ("5"
                                                                        (skosimp)
                                                                        (("5"
                                                                          (inst
                                                                           -10
                                                                           "i!1"
                                                                           "j!1")
                                                                          (("5"
                                                                            (inst
                                                                             -12
                                                                             "j!1"
                                                                             "_")
                                                                            (("5"
                                                                              (lemma
                                                                               "integral_nonneg[T1, S1, to_measure[T1, S1](MU(i!1))]"
                                                                               ("f"
                                                                                "F(j!1)"))
                                                                              (("5"
                                                                                (assert)
                                                                                nil
                                                                                nil))
                                                                              nil))
                                                                            nil))
                                                                          nil))
                                                                        nil)
                                                                       ("6"
                                                                        (skosimp)
                                                                        (("6"
                                                                          (inst
                                                                           -10
                                                                           "i!1"
                                                                           "j!1")
                                                                          nil
                                                                          nil))
                                                                        nil))
                                                                      nil))
                                                                    nil))
                                                                  nil))
                                                                nil))
                                                              nil)
                                                             ("2"
                                                              (skosimp)
                                                              (("2"
                                                                (hide
                                                                 -1
                                                                 2)
                                                                (("2"
                                                                  (inst
                                                                   -10
                                                                   "i!1"
                                                                   "j!1")
                                                                  (("2"
                                                                    (inst
                                                                     -12
                                                                     "j!1"
                                                                     "_")
                                                                    (("2"
                                                                      (lemma
                                                                       "measure_eq_integral[T1,S1]"
                                                                       ("mu"
                                                                        "to_measure[T1, S1]
                                                      (fm_contraction[T1, S1](mu, A_of[T1, S1](mu)(i!1)))"
                                                                        "nu"
                                                                        "to_measure(MU(i!1))"
                                                                        "f"
                                                                        "F(j!1)"))
                                                                      (("1"
                                                                        (lemma
                                                                         "integral_nonneg[T1,S1,to_measure(MU(i!1))]"
                                                                         ("f"
                                                                          "F(j!1)"))
                                                                        (("1"
                                                                          (assert)
                                                                          (("1"
                                                                            (replace
                                                                             -14)
                                                                            (("1"
                                                                              (split
                                                                               -2)
                                                                              (("1"
                                                                                (assert)
                                                                                (("1"
                                                                                  (expand
                                                                                   "F")
                                                                                  (("1"
                                                                                    (assert)
                                                                                    nil
                                                                                    nil))
                                                                                  nil))
                                                                                nil)
                                                                               ("2"
                                                                                (hide-all-but
                                                                                 1)
                                                                                (("2"
                                                                                  (skosimp)
                                                                                  (("2"
                                                                                    (expand
                                                                                     "to_measure")
                                                                                    (("2"
                                                                                      (expand
                                                                                       "MU")
                                                                                      (("2"
                                                                                        (expand
                                                                                         "x_eq")
                                                                                        (("2"
                                                                                          (propax)
                                                                                          nil
                                                                                          nil))
                                                                                        nil))
                                                                                      nil))
                                                                                    nil))
                                                                                  nil))
                                                                                nil))
                                                                              nil))
                                                                            nil))
                                                                          nil)
                                                                         ("2"
                                                                          (propax)
                                                                          nil
                                                                          nil))
                                                                        nil)
                                                                       ("2"
                                                                        (expand
                                                                         "measurable_set?")
                                                                        (("2"
                                                                          (rewrite
                                                                           "A_of_def2")
                                                                          nil
                                                                          nil))
                                                                        nil))
                                                                      nil))
                                                                    nil))
                                                                  nil))
                                                                nil))
                                                              nil)
                                                             ("3"
                                                              (skosimp)
                                                              (("3"
                                                                (hide
                                                                 -1
                                                                 2)
                                                                (("3"
                                                                  (inst
                                                                   -10
                                                                   "i!1"
                                                                   "j!1")
                                                                  (("3"
                                                                    (lemma
                                                                     "measure_eq_integrable?[T1,S1]"
                                                                     ("mu"
                                                                      "to_measure(fm_contraction[T1, S1](mu, A_of(mu)(i!1)))"
                                                                      "nu"
                                                                      "to_measure(MU(i!1))"
                                                                      "f"
                                                                      "F(j!1)"))
                                                                    (("1"
                                                                      (expand
                                                                       "F")
                                                                      (("1"
                                                                        (assert)
                                                                        (("1"
                                                                          (hide-all-but
                                                                           1)
                                                                          (("1"
                                                                            (skosimp)
                                                                            (("1"
                                                                              (expand
                                                                               "MU")
                                                                              (("1"
                                                                                (expand
                                                                                 "to_measure")
                                                                                (("1"
                                                                                  (expand
                                                                                   "x_eq")
                                                                                  (("1"
                                                                                    (propax)
                                                                                    nil
                                                                                    nil))
                                                                                  nil))
                                                                                nil))
                                                                              nil))
                                                                            nil))
                                                                          nil))
                                                                        nil))
                                                                      nil)
                                                                     ("2"
                                                                      (expand
                                                                       "measurable_set?")
                                                                      (("2"
                                                                        (rewrite
                                                                         "A_of_def2")
                                                                        nil
                                                                        nil))
                                                                      nil))
                                                                    nil))
                                                                  nil))
                                                                nil))
                                                              nil)
                                                             ("4"
                                                              (skosimp)
                                                              (("4"
                                                                (inst
                                                                 -10
                                                                 "x1!1")
                                                                (("4"
                                                                  (expand
                                                                   "measurable_set?")
                                                                  (("4"
                                                                    (assert)
                                                                    (("4"
                                                                      (expand
                                                                       "x_section"
                                                                       1)
                                                                      (("4"
                                                                        (propax)
                                                                        nil
                                                                        nil))
                                                                      nil))
                                                                    nil))
                                                                  nil))
                                                                nil))
                                                              nil))
                                                            nil))
                                                          nil))
                                                        nil))
                                                      nil))
                                                    nil)
                                                   ("2"
                                                    (hide 2)
                                                    (("2"
                                                      (case
                                                       "x_eq(x_sum(LAMBDA j:
                                                       x_sum(LAMBDA i:
                                                               (TRUE,
                                                                integral[T1, S1, to_measure(MU(i))](F(j))))),
                                               x_sum(LAMBDA j:
                                                       x_sum(LAMBDA i:
                                                               (TRUE,
                                                                integral[T1, S1, to_measure(NU(i))](G(j))))))")
                                                      (("1"
                                                        (lemma
                                                         "double_x_sum_eq"
                                                         ("U"
                                                          "lambda i,j: (TRUE,
                                                                   integral[T1, S1, to_measure(MU(i))](F(j)))"))
                                                        (("1"
                                                          (lemma
                                                           "double_x_sum_eq"
                                                           ("U"
                                                            "lambda i,j: (TRUE,
                                                                   integral[T1, S1, to_measure(NU(i))](G(j)))"))
                                                          (("1"
                                                            (assert)
                                                            (("1"
                                                              (hide-all-but
                                                               (-1
                                                                -2
                                                                -3
                                                                1))
                                                              (("1"
                                                                (expand
                                                                 "x_eq")
                                                                (("1"
                                                                  (flatten)
                                                                  (("1"
                                                                    (assert)
                                                                    (("1"
                                                                      (flatten)
                                                                      (("1"
                                                                        (assert)
                                                                        nil
                                                                        nil))
                                                                      nil))
                                                                    nil))
                                                                  nil))
                                                                nil))
                                                              nil))
                                                            nil))
                                                          nil))
                                                        nil)
                                                       ("2"
                                                        (hide 2)
                                                        (("2"
                                                          (case
                                                           "forall (E:(S1),i): x_eq(contraction(mu,A_of(mu)(i))(E),to_measure(MU(i))(E))")
                                                          (("1"
                                                            (case
                                                             "forall j: integrable?[T1,S1,mu](F(j)) <=> convergent?(series(lambda i: integral[T1, S1, to_measure(MU(i))](F(j))))")
                                                            (("1"
                                                              (lemma
                                                               "x_sum_eq"
                                                               ("S"
                                                                "LAMBDA j:
                                                              x_sum(LAMBDA i:
                                                                      (TRUE,
                                                                       integral[T1, S1, to_measure(MU(i))](F(j))))"
                                                                "T"
                                                                "lambda j: if integrable?[T1,S1,mu](F(j)) then (TRUE,integral[T1,S1,mu](F(j))) else (FALSE,0) endif"))
                                                              (("1"
                                                                (split
                                                                 -1)
                                                                (("1"
                                                                  (case
                                                                   "x_eq(x_sum(LAMBDA j:
                                                                 IF integrable?[T1, S1, mu](F(j))
                                                                   THEN (TRUE, integral[T1, S1, mu](F(j)))
                                                                 ELSE (FALSE, 0)
                                                                 ENDIF), x_sum(LAMBDA j:
                                                                 x_sum(LAMBDA i:
                                                                         (TRUE,
                                                                          integral[T1, S1, to_measure(NU(i))](G(j))))))")
                                                                  (("1"
                                                                    (hide-all-but
                                                                     (-1
                                                                      -2
                                                                      1))
                                                                    (("1"
                                                                      (expand
                                                                       "x_eq")
                                                                      (("1"
                                                                        (flatten)
                                                                        (("1"
                                                                          (assert)
                                                                          (("1"
                                                                            (flatten)
                                                                            (("1"
                                                                              (assert)
                                                                              nil
                                                                              nil))
                                                                            nil))
                                                                          nil))
                                                                        nil))
                                                                      nil))
                                                                    nil)
                                                                   ("2"
                                                                    (hide
                                                                     -1
                                                                     2)
                                                                    (("2"
                                                                      (hide
                                                                       -1
                                                                       -2
                                                                       -12
                                                                       -13)
                                                                      (("2"
                                                                        (case
                                                                         "measurable_set?[T1, S1](X!1)")
                                                                        (("1"
                                                                          (case
                                                                           "FORALL j:
                                                          integrable?[T1, S1, contraction(mu, X!1)](G(j))=>integral[T1, S1, contraction[T1, S1](mu, X!1)](G(j)) >= 0")
                                                                          (("1"
                                                                            (case
                                                                             "x_eq(x_sum(LAMBDA j:
                                                                       IF integrable?[T1, S1, mu](F(j))
                                                                         THEN (TRUE, integral[T1, S1, mu](F(j)))
                                                                       ELSE (FALSE, 0)
                                                                       ENDIF),
                                                               x_sum(LAMBDA j:IF integrable?[T1, S1, contraction(mu,X!1)](G(j))
                                                                         THEN (TRUE, integral[T1, S1, contraction(mu,X!1)](G(j)))
                                                                       ELSE (FALSE, 0)
                                                                       ENDIF))")
                                                                            (("1"
                                                                              (lemma
                                                                               "x_sum_eq"
                                                                               ("S"
                                                                                "LAMBDA j:
                                                                          IF integrable?[T1, S1, contraction(mu, X!1)](G(j))
                                                                            THEN (TRUE,
                                                                                  integral[T1, S1, contraction(mu, X!1)](G(j)))
                                                                          ELSE (FALSE, 0)
                                                                          ENDIF"
                                                                                "T"
                                                                                "LAMBDA j:
                                                                          x_sum(LAMBDA i:
                                                                                  (TRUE,
                                                                                   integral[T1, S1, to_measure(NU(i))](G(j))))"))
                                                                              (("1"
                                                                                (split
                                                                                 -1)
                                                                                (("1"
                                                                                  (hide-all-but
                                                                                   (-1
                                                                                    -2
                                                                                    1))
                                                                                  (("1"
                                                                                    (expand
                                                                                     "x_eq")
                                                                                    (("1"
                                                                                      (flatten)
                                                                                      (("1"
                                                                                        (assert)
                                                                                        (("1"
                                                                                          (flatten)
                                                                                          (("1"
                                                                                            (assert)
                                                                                            nil
                                                                                            nil))
                                                                                          nil))
                                                                                        nil))
                                                                                      nil))
                                                                                    nil))
                                                                                  nil)
                                                                                 ("2"
                                                                                  (hide
                                                                                   -1
                                                                                   2)
                                                                                  (("2"
                                                                                    (assert)
                                                                                    (("2"
                                                                                      (skolem
                                                                                       +
                                                                                       "j!1")
                                                                                      (("2"
                                                                                        (case
                                                                                         "forall (E:(S1),i): x_eq(contraction(contraction(mu, X!1),A_of(contraction(mu,X!1))(i))(E),to_measure(NU(i))(E))")
                                                                                        (("1"
                                                                                          (case
                                                                                           "forall j: integrable?[T1,S1,contraction(mu, X!1)](G(j)) <=> convergent?(series(lambda i: integral[T1, S1, to_measure(NU(i))](G(j))))")
                                                                                          (("1"
                                                                                            (expand
                                                                                             "x_eq"
                                                                                             1)
                                                                                            (("1"
                                                                                              (case-replace
                                                                                               "integrable?[T1, S1, contraction(mu, X!1)](G(j!1))")
                                                                                              (("1"
                                                                                                (inst
                                                                                                 -
                                                                                                 "j!1")
                                                                                                (("1"
                                                                                                  (assert)
                                                                                                  (("1"
                                                                                                    (expand
                                                                                                     "x_sum"
                                                                                                     1)
                                                                                                    (("1"
                                                                                                      (lemma
                                                                                                       "sfm_integral[T1,S1,contraction(mu, X!1)]"
                                                                                                       ("f"
                                                                                                        "G(j!1)"))
                                                                                                      (("1"
                                                                                                        (case-replace
                                                                                                         "(LAMBDA i:
                                                                                            integral
                                                                                                [T1, S1,
                                                                                                 contraction(contraction(mu, X!1),
                                                                                                             A_of(contraction(mu, X!1))(i))]
                                                                                                (G(j!1)))=(LAMBDA i:
                                                                                           integral[T1, S1, to_measure(NU(i))](G(j!1)))")
                                                                                                        (("1"
                                                                                                          (hide
                                                                                                           -1)
                                                                                                          (("1"
                                                                                                            (name-replace
                                                                                                             "DRL1"
                                                                                                             "(series(LAMBDA (i_1: nat):
                                                                                               integral[T1, S1, to_measure(NU(i_1))]
                                                                                                   (G(j!1))))")
                                                                                                            (("1"
                                                                                                              (name-replace
                                                                                                               "LHS"
                                                                                                               "integral[T1, S1, contraction(mu, X!1)](G(j!1))")
                                                                                                              (("1"
                                                                                                                (hide-all-but
                                                                                                                 (-1
                                                                                                                  1))
                                                                                                                (("1"
                                                                                                                  (assert)
                                                                                                                  (("1"
                                                                                                                    (rewrite
                                                                                                                     "metric_convergence_def")
                                                                                                                    (("1"
                                                                                                                      (lemma
                                                                                                                       "convergence_sequences.limit_def"
                                                                                                                       ("l"
                                                                                                                        "LHS"
                                                                                                                        "v"
                                                                                                                        "DRL1"))
                                                                                                                      (("1"
                                                                                                                        (assert)
                                                                                                                        (("1"
                                                                                                                          (expand
                                                                                                                           "metric_converges_to")
                                                                                                                          (("1"
                                                                                                                            (expand
                                                                                                                             "convergence")
                                                                                                                            (("1"
                                                                                                                              (skosimp)
                                                                                                                              (("1"
                                                                                                                                (lift-if
                                                                                                                                 1)
                                                                                                                                (("1"
                                                                                                                                  (case-replace
                                                                                                                                   "convergence_sequences.convergent?(DRL1)")
                                                                                                                                  (("1"
                                                                                                                                    (hide
                                                                                                                                     -2)
                                                                                                                                    (("1"
                                                                                                                                      (assert)
                                                                                                                                      (("1"
                                                                                                                                        (skosimp)
                                                                                                                                        (("1"
                                                                                                                                          (inst
                                                                                                                                           -
                                                                                                                                           "epsilon!1")
                                                                                                                                          (("1"
                                                                                                                                            (skosimp)
                                                                                                                                            (("1"
                                                                                                                                              (inst
                                                                                                                                               +
                                                                                                                                               "n!1")
                                                                                                                                              (("1"
                                                                                                                                                (skosimp)
                                                                                                                                                (("1"
                                                                                                                                                  (inst
                                                                                                                                                   -
                                                                                                                                                   "i!1")
                                                                                                                                                  (("1"
                                                                                                                                                    (assert)
                                                                                                                                                    (("1"
                                                                                                                                                      (hide-all-but
                                                                                                                                                       (-3
                                                                                                                                                        1))
                                                                                                                                                      (("1"
                                                                                                                                                        (grind)
                                                                                                                                                        nil
                                                                                                                                                        nil))
                                                                                                                                                      nil))
                                                                                                                                                    nil))
                                                                                                                                                  nil))
                                                                                                                                                nil))
                                                                                                                                              nil))
                                                                                                                                            nil))
                                                                                                                                          nil))
                                                                                                                                        nil))
                                                                                                                                      nil))
                                                                                                                                    nil)
                                                                                                                                   ("2"
                                                                                                                                    (replace
                                                                                                                                     1
                                                                                                                                     2)
                                                                                                                                    (("2"
                                                                                                                                      (expand
                                                                                                                                       "convergent?")
                                                                                                                                      (("2"
                                                                                                                                        (inst
                                                                                                                                         +
                                                                                                                                         "LHS")
                                                                                                                                        (("2"
                                                                                                                                          (expand
                                                                                                                                           "convergence")
                                                                                                                                          (("2"
                                                                                                                                            (hide
                                                                                                                                             -1
                                                                                                                                             -2)
                                                                                                                                            (("2"
                                                                                                                                              (skosimp)
                                                                                                                                              (("2"
                                                                                                                                                (inst
                                                                                                                                                 -
                                                                                                                                                 "epsilon!1")
                                                                                                                                                (("2"
                                                                                                                                                  (skosimp)
                                                                                                                                                  (("2"
                                                                                                                                                    (inst
                                                                                                                                                     +
                                                                                                                                                     "n!1")
                                                                                                                                                    (("2"
                                                                                                                                                      (skosimp)
                                                                                                                                                      (("2"
                                                                                                                                                        (inst
                                                                                                                                                         -
                                                                                                                                                         "i!1")
                                                                                                                                                        (("2"
                                                                                                                                                          (grind)
                                                                                                                                                          nil
                                                                                                                                                          nil))
                                                                                                                                                        nil))
                                                                                                                                                      nil))
                                                                                                                                                    nil))
                                                                                                                                                  nil))
                                                                                                                                                nil))
                                                                                                                                              nil))
                                                                                                                                            nil))
                                                                                                                                          nil))
                                                                                                                                        nil))
                                                                                                                                      nil))
                                                                                                                                    nil))
                                                                                                                                  nil))
                                                                                                                                nil))
                                                                                                                              nil))
                                                                                                                            nil))
                                                                                                                          nil))
                                                                                                                        nil)
                                                                                                                       ("2"
                                                                                                                        (replace
                                                                                                                         1)
                                                                                                                        (("2"
                                                                                                                          (expand
                                                                                                                           "convergent?")
                                                                                                                          (("2"
                                                                                                                            (inst
                                                                                                                             +
                                                                                                                             "LHS")
                                                                                                                            (("2"
                                                                                                                              (expand
                                                                                                                               "metric_converges_to")
                                                                                                                              (("2"
                                                                                                                                (expand
                                                                                                                                 "convergence")
                                                                                                                                (("2"
                                                                                                                                  (skosimp)
                                                                                                                                  (("2"
                                                                                                                                    (inst
                                                                                                                                     -
                                                                                                                                     "epsilon!1")
                                                                                                                                    (("2"
                                                                                                                                      (skosimp)
                                                                                                                                      (("2"
                                                                                                                                        (inst
                                                                                                                                         +
                                                                                                                                         "n!1")
                                                                                                                                        (("2"
                                                                                                                                          (skosimp)
                                                                                                                                          (("2"
                                                                                                                                            (inst
                                                                                                                                             -
                                                                                                                                             "i!1")
                                                                                                                                            (("2"
                                                                                                                                              (grind)
                                                                                                                                              nil
                                                                                                                                              nil))
                                                                                                                                            nil))
                                                                                                                                          nil))
                                                                                                                                        nil))
                                                                                                                                      nil))
                                                                                                                                    nil))
                                                                                                                                  nil))
                                                                                                                                nil))
                                                                                                                              nil))
                                                                                                                            nil))
                                                                                                                          nil))
                                                                                                                        nil))
                                                                                                                      nil))
                                                                                                                    nil))
                                                                                                                  nil))
                                                                                                                nil))
                                                                                                              nil)
                                                                                                             ("2"
                                                                                                              (skosimp)
                                                                                                              (("2"
                                                                                                                (inst
                                                                                                                 -10
                                                                                                                 "i!1"
                                                                                                                 "j!1")
                                                                                                                nil
                                                                                                                nil))
                                                                                                              nil))
                                                                                                            nil))
                                                                                                          nil)
                                                                                                         ("2"
                                                                                                          (apply-extensionality
                                                                                                           :hide?
                                                                                                           t)
                                                                                                          (("1"
                                                                                                            (hide
                                                                                                             -1
                                                                                                             2)
                                                                                                            (("1"
                                                                                                              (lemma
                                                                                                               "measure_eq_integral[T1,S1]"
                                                                                                               ("mu"
                                                                                                                "contraction(contraction(mu, X!1),
                                                                                              A_of(contraction(mu, X!1))(x!1))"
                                                                                                                "nu"
                                                                                                                "to_measure(NU(x!1))"
                                                                                                                "f"
                                                                                                                "G(j!1)"))
                                                                                                              (("1"
                                                                                                                (assert)
                                                                                                                (("1"
                                                                                                                  (inst
                                                                                                                   -9
                                                                                                                   "x!1"
                                                                                                                   "j!1")
                                                                                                                  (("1"
                                                                                                                    (replace
                                                                                                                     -9)
                                                                                                                    (("1"
                                                                                                                      (inst
                                                                                                                       -3
                                                                                                                       "_"
                                                                                                                       "x!1")
                                                                                                                      nil
                                                                                                                      nil))
                                                                                                                    nil))
                                                                                                                  nil))
                                                                                                                nil)
                                                                                                               ("2"
                                                                                                                (expand
                                                                                                                 "measurable_set?")
                                                                                                                (("2"
                                                                                                                  (propax)
                                                                                                                  nil
                                                                                                                  nil))
                                                                                                                nil))
                                                                                                              nil))
                                                                                                            nil)
                                                                                                           ("2"
                                                                                                            (skosimp)
                                                                                                            (("2"
                                                                                                              (inst
                                                                                                               -10
                                                                                                               "i!1"
                                                                                                               "j!1")
                                                                                                              nil
                                                                                                              nil))
                                                                                                            nil)
                                                                                                           ("3"
                                                                                                            (expand
                                                                                                             "measurable_set?")
                                                                                                            (("3"
                                                                                                              (propax)
                                                                                                              nil
                                                                                                              nil))
                                                                                                            nil)
                                                                                                           ("4"
                                                                                                            (hide
                                                                                                             -1
                                                                                                             2)
                                                                                                            (("4"
                                                                                                              (skosimp)
                                                                                                              (("4"
                                                                                                                (inst
                                                                                                                 -3
                                                                                                                 "_"
                                                                                                                 "i!1")
                                                                                                                (("4"
                                                                                                                  (inst
                                                                                                                   -9
                                                                                                                   "i!1"
                                                                                                                   "j!1")
                                                                                                                  (("4"
                                                                                                                    (lemma
                                                                                                                     "measure_eq_integrable?[T1,S1]"
                                                                                                                     ("mu"
                                                                                                                      "contraction(contraction(mu, X!1),
                                                                                              A_of(contraction(mu, X!1))(i!1))"
                                                                                                                      "nu"
                                                                                                                      "to_measure(NU(i!1))"
                                                                                                                      "f"
                                                                                                                      "G(j!1)"))
                                                                                                                    (("1"
                                                                                                                      (replace
                                                                                                                       -4)
                                                                                                                      (("1"
                                                                                                                        (replace
                                                                                                                         -1)
                                                                                                                        (("1"
                                                                                                                          (propax)
                                                                                                                          nil
                                                                                                                          nil))
                                                                                                                        nil))
                                                                                                                      nil)
                                                                                                                     ("2"
                                                                                                                      (hide-all-but
                                                                                                                       1)
                                                                                                                      (("2"
                                                                                                                        (typepred
                                                                                                                         "A_of[T1, S1](contraction[T1, S1](mu, X!1))(i!1)")
                                                                                                                        (("2"
                                                                                                                          (expand
                                                                                                                           "measurable_set?")
                                                                                                                          (("2"
                                                                                                                            (propax)
                                                                                                                            nil
                                                                                                                            nil))
                                                                                                                          nil))
                                                                                                                        nil))
                                                                                                                      nil))
                                                                                                                    nil))
                                                                                                                  nil))
                                                                                                                nil))
                                                                                                              nil))
                                                                                                            nil))
                                                                                                          nil)
                                                                                                         ("3"
                                                                                                          (skosimp)
                                                                                                          (("3"
                                                                                                            (inst
                                                                                                             -10
                                                                                                             "i!1"
                                                                                                             "j!1")
                                                                                                            nil
                                                                                                            nil))
                                                                                                          nil)
                                                                                                         ("4"
                                                                                                          (expand
                                                                                                           "measurable_set?")
                                                                                                          (("4"
                                                                                                            (propax)
                                                                                                            nil
                                                                                                            nil))
                                                                                                          nil)
                                                                                                         ("5"
                                                                                                          (skosimp)
                                                                                                          (("5"
                                                                                                            (hide
                                                                                                             2
                                                                                                             -1
                                                                                                             -3)
                                                                                                            (("5"
                                                                                                              (inst
                                                                                                               -2
                                                                                                               "_"
                                                                                                               "i!1")
                                                                                                              (("5"
                                                                                                                (inst
                                                                                                                 -8
                                                                                                                 "i!1"
                                                                                                                 "j!1")
                                                                                                                (("5"
                                                                                                                  (lemma
                                                                                                                   "measure_eq_integrable?[T1,S1]"
                                                                                                                   ("mu"
                                                                                                                    "contraction(contraction(mu, X!1),
                                                                                          A_of(contraction(mu, X!1))(i!1))"
                                                                                                                    "nu"
                                                                                                                    "to_measure(NU(i!1))"
                                                                                                                    "f"
                                                                                                                    "G(j!1)"))
                                                                                                                  (("1"
                                                                                                                    (assert)
                                                                                                                    nil
                                                                                                                    nil)
                                                                                                                   ("2"
                                                                                                                    (expand
                                                                                                                     "measurable_set?")
                                                                                                                    (("2"
                                                                                                                      (propax)
                                                                                                                      nil
                                                                                                                      nil))
                                                                                                                    nil))
                                                                                                                  nil))
                                                                                                                nil))
                                                                                                              nil))
                                                                                                            nil))
                                                                                                          nil))
                                                                                                        nil)
                                                                                                       ("2"
                                                                                                        (hide-all-but
                                                                                                         (-1
                                                                                                          1
                                                                                                          -10))
                                                                                                        (("2"
                                                                                                          (lemma
                                                                                                           "nn_integrable_is_nn_integrable[T1, S1, contraction[T1, S1](mu, X!1)]"
                                                                                                           ("f"
                                                                                                            "G(j!1)"))
                                                                                                          (("2"
                                                                                                            (assert)
                                                                                                            (("2"
                                                                                                              (skosimp)
                                                                                                              (("2"
                                                                                                                (inst
                                                                                                                 -
                                                                                                                 "j!1"
                                                                                                                 "x!1")
                                                                                                                nil
                                                                                                                nil))
                                                                                                              nil))
                                                                                                            nil))
                                                                                                          nil))
                                                                                                        nil))
                                                                                                      nil))
                                                                                                    nil))
                                                                                                  nil))
                                                                                                nil)
                                                                                               ("2"
                                                                                                (replace
                                                                                                 1)
                                                                                                (("2"
                                                                                                  (assert)
                                                                                                  (("2"
                                                                                                    (expand
                                                                                                     "x_sum"
                                                                                                     -3)
                                                                                                    (("2"
                                                                                                      (prop)
                                                                                                      (("2"
                                                                                                        (inst
                                                                                                         -
                                                                                                         "j!1")
                                                                                                        (("2"
                                                                                                          (name-replace
                                                                                                           "DRL1"
                                                                                                           "series(LAMBDA (i_1: nat):
                                                                                        integral[T1, S1, to_measure(NU(i_1))](G(j!1)))")
                                                                                                          (("1"
                                                                                                            (replace
                                                                                                             -2)
                                                                                                            (("1"
                                                                                                              (hide-all-but
                                                                                                               (-1
                                                                                                                1))
                                                                                                              (("1"
                                                                                                                (expand
                                                                                                                 "convergent?")
                                                                                                                (("1"
                                                                                                                  (skosimp)
                                                                                                                  (("1"
                                                                                                                    (inst
                                                                                                                     +
                                                                                                                     "l!1")
                                                                                                                    (("1"
                                                                                                                      (expand
                                                                                                                       "convergence")
                                                                                                                      (("1"
                                                                                                                        (rewrite
                                                                                                                         "metric_convergence_def")
                                                                                                                        (("1"
                                                                                                                          (expand
                                                                                                                           "metric_converges_to")
                                                                                                                          (("1"
                                                                                                                            (skosimp)
                                                                                                                            (("1"
                                                                                                                              (inst
                                                                                                                               -
                                                                                                                               "r!1")
                                                                                                                              (("1"
                                                                                                                                (skosimp)
                                                                                                                                (("1"
                                                                                                                                  (inst
                                                                                                                                   +
                                                                                                                                   "n!1")
                                                                                                                                  (("1"
                                                                                                                                    (skosimp)
                                                                                                                                    (("1"
                                                                                                                                      (inst
                                                                                                                                       -
                                                                                                                                       "i!1")
                                                                                                                                      (("1"
                                                                                                                                        (grind)
                                                                                                                                        nil
                                                                                                                                        nil))
                                                                                                                                      nil))
                                                                                                                                    nil))
                                                                                                                                  nil))
                                                                                                                                nil))
                                                                                                                              nil))
                                                                                                                            nil))
                                                                                                                          nil))
                                                                                                                        nil))
                                                                                                                      nil))
                                                                                                                    nil))
                                                                                                                  nil))
                                                                                                                nil))
                                                                                                              nil))
                                                                                                            nil)
                                                                                                           ("2"
                                                                                                            (skosimp)
                                                                                                            (("2"
                                                                                                              (inst
                                                                                                               -10
                                                                                                               "i!1"
                                                                                                               "j!1")
                                                                                                              nil
                                                                                                              nil))
                                                                                                            nil))
                                                                                                          nil))
                                                                                                        nil))
                                                                                                      nil))
                                                                                                    nil))
                                                                                                  nil))
                                                                                                nil))
                                                                                              nil))
                                                                                            nil)
                                                                                           ("2"
                                                                                            (hide
                                                                                             2)
                                                                                            (("2"
                                                                                              (skosimp)
                                                                                              (("2"
                                                                                                (case
                                                                                                 "nn_measurable?[T1,S1](G(j!2))")
                                                                                                (("1"
                                                                                                  (lemma
                                                                                                   "sfm_integrable[T1, S1, contraction(mu, X!1)]"
                                                                                                   ("h"
                                                                                                    "G(j!2)"))
                                                                                                  (("1"
                                                                                                    (case-replace
                                                                                                     "(LAMBDA i:
                                                                                             integral
                                                                                                 [T1, S1,
                                                                                                  contraction(contraction(mu, X!1),
                                                                                                              A_of
                                                                                                              (contraction(mu, X!1))(i))]
                                                                                                 (G(j!2)))=(LAMBDA i:
                                                                                            integral[T1, S1, to_measure(NU(i))](G(j!2)))")
                                                                                                    (("1"
                                                                                                      (hide
                                                                                                       -1)
                                                                                                      (("1"
                                                                                                        (case-replace
                                                                                                         "(FORALL i:
                                                                            integrable?
                                                                                [T1, S1,
                                                                                 contraction(contraction(mu, X!1),
                                                                                             A_of(contraction(mu, X!1))(i))]
                                                                                (G(j!2)))")
                                                                                                        (("1"
                                                                                                          (assert)
                                                                                                          (("1"
                                                                                                            (replace
                                                                                                             -2
                                                                                                             1
                                                                                                             rl)
                                                                                                            (("1"
                                                                                                              (name-replace
                                                                                                               "UU"
                                                                                                               "(series((LAMBDA i: integral[T1, S1, to_measure(NU(i))](G(j!2)))))")
                                                                                                              (("1"
                                                                                                                (hide-all-but
                                                                                                                 1)
                                                                                                                (("1"
                                                                                                                  (split)
                                                                                                                  (("1"
                                                                                                                    (flatten)
                                                                                                                    nil
                                                                                                                    nil)
                                                                                                                   ("2"
                                                                                                                    (flatten)
                                                                                                                    nil
                                                                                                                    nil))
                                                                                                                  nil))
                                                                                                                nil)
                                                                                                               ("2"
                                                                                                                (inst
                                                                                                                 -10
                                                                                                                 "_"
                                                                                                                 "j!2")
                                                                                                                nil
                                                                                                                nil))
                                                                                                              nil))
                                                                                                            nil))
                                                                                                          nil)
                                                                                                         ("2"
                                                                                                          (skosimp)
                                                                                                          (("2"
                                                                                                            (inst
                                                                                                             -4
                                                                                                             "_"
                                                                                                             "i!1")
                                                                                                            (("2"
                                                                                                              (inst
                                                                                                               -10
                                                                                                               "i!1"
                                                                                                               "j!2")
                                                                                                              (("2"
                                                                                                                (lemma
                                                                                                                 "measure_eq_integrable?[T1,S1]"
                                                                                                                 ("mu"
                                                                                                                  "contraction(contraction(mu, X!1),
                                                                                            A_of(contraction(mu, X!1))(i!1))"
                                                                                                                  "nu"
                                                                                                                  "to_measure(NU(i!1))"
                                                                                                                  "f"
                                                                                                                  "G(j!2)"))
                                                                                                                (("1"
                                                                                                                  (assert)
                                                                                                                  nil
                                                                                                                  nil)
                                                                                                                 ("2"
                                                                                                                  (expand
                                                                                                                   "measurable_set?")
                                                                                                                  (("2"
                                                                                                                    (propax)
                                                                                                                    nil
                                                                                                                    nil))
                                                                                                                  nil))
                                                                                                                nil))
                                                                                                              nil))
                                                                                                            nil))
                                                                                                          nil)
                                                                                                         ("3"
                                                                                                          (expand
                                                                                                           "measurable_set?")
                                                                                                          (("3"
                                                                                                            (propax)
                                                                                                            nil
                                                                                                            nil))
                                                                                                          nil))
                                                                                                        nil))
                                                                                                      nil)
                                                                                                     ("2"
                                                                                                      (hide
                                                                                                       -1
                                                                                                       2)
                                                                                                      (("2"
                                                                                                        (apply-extensionality
                                                                                                         :hide?
                                                                                                         t)
                                                                                                        (("1"
                                                                                                          (lemma
                                                                                                           "measure_eq_integral[T1,S1]"
                                                                                                           ("mu"
                                                                                                            "contraction(contraction(mu, X!1),
                                                                                            A_of(contraction(mu, X!1))(x!1))"
                                                                                                            "nu"
                                                                                                            "to_measure(NU(x!1))"
                                                                                                            "f"
                                                                                                            "G(j!2)"))
                                                                                                          (("1"
                                                                                                            (inst
                                                                                                             -9
                                                                                                             "x!1"
                                                                                                             "j!2")
                                                                                                            (("1"
                                                                                                              (inst
                                                                                                               -3
                                                                                                               "_"
                                                                                                               "x!1")
                                                                                                              (("1"
                                                                                                                (assert)
                                                                                                                nil
                                                                                                                nil))
                                                                                                              nil))
                                                                                                            nil)
                                                                                                           ("2"
                                                                                                            (expand
                                                                                                             "measurable_set?")
                                                                                                            (("2"
                                                                                                              (propax)
                                                                                                              nil
                                                                                                              nil))
                                                                                                            nil))
                                                                                                          nil)
                                                                                                         ("2"
                                                                                                          (skosimp)
                                                                                                          (("2"
                                                                                                            (inst
                                                                                                             -8
                                                                                                             "i!1"
                                                                                                             "j!2")
                                                                                                            nil
                                                                                                            nil))
                                                                                                          nil)
                                                                                                         ("3"
                                                                                                          (expand
                                                                                                           "measurable_set?")
                                                                                                          (("3"
                                                                                                            (propax)
                                                                                                            nil
                                                                                                            nil))
                                                                                                          nil)
                                                                                                         ("4"
                                                                                                          (skosimp)
                                                                                                          (("4"
                                                                                                            (inst
                                                                                                             -8
                                                                                                             "i!1"
                                                                                                             "j!2")
                                                                                                            (("4"
                                                                                                              (inst
                                                                                                               -2
                                                                                                               "_"
                                                                                                               "i!1")
                                                                                                              (("4"
                                                                                                                (lemma
                                                                                                                 "measure_eq_integrable?[T1,S1]"
                                                                                                                 ("mu"
                                                                                                                  "contraction(contraction(mu, X!1),
                                                                                              A_of(contraction(mu, X!1))(i!1))
                                                                                             "
                                                                                                                  "nu"
                                                                                                                  "to_measure(NU(i!1))"
                                                                                                                  "f"
                                                                                                                  "G(j!2)"))
                                                                                                                (("1"
                                                                                                                  (replace
                                                                                                                   -3)
                                                                                                                  (("1"
                                                                                                                    (replace
                                                                                                                     -1)
                                                                                                                    (("1"
                                                                                                                      (propax)
                                                                                                                      nil
                                                                                                                      nil))
                                                                                                                    nil))
                                                                                                                  nil)
                                                                                                                 ("2"
                                                                                                                  (expand
                                                                                                                   "measurable_set?")
                                                                                                                  (("2"
                                                                                                                    (propax)
                                                                                                                    nil
                                                                                                                    nil))
                                                                                                                  nil))
                                                                                                                nil))
                                                                                                              nil))
                                                                                                            nil))
                                                                                                          nil))
                                                                                                        nil))
                                                                                                      nil)
                                                                                                     ("3"
                                                                                                      (skosimp)
                                                                                                      (("3"
                                                                                                        (inst
                                                                                                         -10
                                                                                                         "i!1"
                                                                                                         "j!2")
                                                                                                        nil
                                                                                                        nil))
                                                                                                      nil)
                                                                                                     ("4"
                                                                                                      (expand
                                                                                                       "measurable_set?")
                                                                                                      (("4"
                                                                                                        (propax)
                                                                                                        nil
                                                                                                        nil))
                                                                                                      nil)
                                                                                                     ("5"
                                                                                                      (skosimp)
                                                                                                      (("5"
                                                                                                        (inst
                                                                                                         -
                                                                                                         "_"
                                                                                                         "i!1")
                                                                                                        (("5"
                                                                                                          (inst
                                                                                                           -10
                                                                                                           "i!1"
                                                                                                           "j!2")
                                                                                                          (("5"
                                                                                                            (lemma
                                                                                                             "measure_eq_integrable?[T1,S1]"
                                                                                                             ("mu"
                                                                                                              "contraction(contraction(mu, X!1),
                                                                                          A_of(contraction(mu, X!1))(i!1))"
                                                                                                              "nu"
                                                                                                              "to_measure(NU(i!1))"
                                                                                                              "f"
                                                                                                              "G(j!2)"))
                                                                                                            (("1"
                                                                                                              (assert)
                                                                                                              nil
                                                                                                              nil)
                                                                                                             ("2"
                                                                                                              (expand
                                                                                                               "measurable_set?")
                                                                                                              (("2"
                                                                                                                (propax)
                                                                                                                nil
                                                                                                                nil))
                                                                                                              nil))
                                                                                                            nil))
                                                                                                          nil))
                                                                                                        nil))
                                                                                                      nil))
                                                                                                    nil)
                                                                                                   ("2"
                                                                                                    (propax)
                                                                                                    nil
                                                                                                    nil))
                                                                                                  nil)
                                                                                                 ("2"
                                                                                                  (expand
                                                                                                   "nn_measurable?")
                                                                                                  (("2"
                                                                                                    (split)
                                                                                                    (("1"
                                                                                                      (expand
                                                                                                       "G")
                                                                                                      (("1"
                                                                                                        (hide-all-but
                                                                                                         (1
                                                                                                          -9))
                                                                                                        (("1"
                                                                                                          (lemma
                                                                                                           "x_section_measurable"
                                                                                                           ("nu"
                                                                                                            "fm_contraction[T2, S2]
                                                                                                 (contraction(nu, Y!1),
                                                                                                  A_of(contraction(nu, Y!1))(j!2))"
                                                                                                            "M"
                                                                                                            "E!1"))
                                                                                                          (("1"
                                                                                                            (propax)
                                                                                                            nil
                                                                                                            nil))
                                                                                                          nil))
                                                                                                        nil))
                                                                                                      nil)
                                                                                                     ("2"
                                                                                                      (skosimp)
                                                                                                      (("2"
                                                                                                        (inst
                                                                                                         -8
                                                                                                         "j!2"
                                                                                                         "x!1")
                                                                                                        (("2"
                                                                                                          (assert)
                                                                                                          nil
                                                                                                          nil))
                                                                                                        nil))
                                                                                                      nil))
                                                                                                    nil))
                                                                                                  nil))
                                                                                                nil))
                                                                                              nil))
                                                                                            nil))
                                                                                          nil)
                                                                                         ("2"
                                                                                          (hide-all-but
                                                                                           1)
                                                                                          (("2"
                                                                                            (skosimp)
                                                                                            (("2"
                                                                                              (expand
                                                                                               "NU")
                                                                                              (("2"
                                                                                                (typepred
                                                                                                 "contraction(mu, X!1)")
                                                                                                (("2"
                                                                                                  (name-replace
                                                                                                   "MU1"
                                                                                                   "contraction(mu, X!1)")
                                                                                                  (("2"
                                                                                                    (expand
                                                                                                     "to_measure")
                                                                                                    (("2"
                                                                                                      (expand
                                                                                                       "fm_contraction")
                                                                                                      (("2"
                                                                                                        (expand
                                                                                                         "contraction")
                                                                                                        (("2"
                                                                                                          (expand
                                                                                                           "x_eq")
                                                                                                          (("2"
                                                                                                            (lemma
                                                                                                             "A_of_def2"
                                                                                                             ("mu"
                                                                                                              "MU1"
                                                                                                              "n"
                                                                                                              "i!1"))
                                                                                                            (("2"
                                                                                                              (lemma
                                                                                                               "m_monotone[T1,S1,MU1]"
                                                                                                               ("a"
                                                                                                                "intersection(A_of(MU1)(i!1), E!2)"
                                                                                                                "b"
                                                                                                                "A_of(MU1)(i!1)"))
                                                                                                              (("1"
                                                                                                                (expand
                                                                                                                 "x_le")
                                                                                                                (("1"
                                                                                                                  (assert)
                                                                                                                  (("1"
                                                                                                                    (expand
                                                                                                                     "intersection")
                                                                                                                    (("1"
                                                                                                                      (expand
                                                                                                                       "subset?")
                                                                                                                      (("1"
                                                                                                                        (expand
                                                                                                                         "member")
                                                                                                                        (("1"
                                                                                                                          (skosimp)
                                                                                                                          nil
                                                                                                                          nil))
                                                                                                                        nil))
                                                                                                                      nil))
                                                                                                                    nil))
                                                                                                                  nil))
                                                                                                                nil)
                                                                                                               ("2"
                                                                                                                (expand
                                                                                                                 "measurable_set?")
                                                                                                                (("2"
                                                                                                                  (propax)
                                                                                                                  nil
                                                                                                                  nil))
                                                                                                                nil)
                                                                                                               ("3"
                                                                                                                (expand
                                                                                                                 "measurable_set?")
                                                                                                                (("3"
                                                                                                                  (propax)
                                                                                                                  nil
                                                                                                                  nil))
                                                                                                                nil))
                                                                                                              nil))
                                                                                                            nil))
                                                                                                          nil))
                                                                                                        nil))
                                                                                                      nil))
                                                                                                    nil))
                                                                                                  nil))
                                                                                                nil))
                                                                                              nil))
                                                                                            nil))
                                                                                          nil)
                                                                                         ("3"
                                                                                          (expand
                                                                                           "measurable_set?")
                                                                                          (("3"
                                                                                            (propax)
                                                                                            nil
                                                                                            nil))
                                                                                          nil))
                                                                                        nil))
                                                                                      nil))
                                                                                    nil))
                                                                                  nil))
                                                                                nil))
                                                                              nil)
                                                                             ("2"
                                                                              (hide
                                                                               2)
                                                                              (("2"
                                                                                (case
                                                                                 "forall (l:real): ((forall j: integrable?[T1, S1, mu](F(j)))&convergence(series(LAMBDA j:integral[T1, S1, mu](F(j))),l)) <=> ((forall j: integrable?[T1, S1, contraction(mu, X!1)](G(j)))&convergence(series(LAMBDA j:integral[T1, S1, contraction(mu, X!1)](G(j))),l))")
                                                                                (("1"
                                                                                  (expand
                                                                                   "x_sum"
                                                                                   1)
                                                                                  (("1"
                                                                                    (case-replace
                                                                                     "(FORALL i:
                                                                         IF integrable?[T1, S1, mu](F(i)) THEN TRUE
                                                                         ELSE FALSE
                                                                         ENDIF)
                                                                       AND
                                                                       convergence_sequences.convergent?(series(LAMBDA i:
                                                                                           IF integrable?[T1, S1, mu](F(i))
                                                                                             THEN integral[T1, S1, mu](F(i))
                                                                                           ELSE 0
                                                                                           ENDIF))")
                                                                                    (("1"
                                                                                      (flatten
                                                                                       -1)
                                                                                      (("1"
                                                                                        (case-replace
                                                                                         "FORALL j: integrable?[T1, S1, mu](F(j))")
                                                                                        (("1"
                                                                                          (case-replace
                                                                                           "(LAMBDA i:
                                                                                      IF integrable?[T1, S1, mu](F(i))
                                                                                        THEN integral[T1, S1, mu](F(i))
                                                                                      ELSE 0
                                                                                      ENDIF)=(LAMBDA j: integral[T1, S1, mu](F(j)))")
                                                                                          (("1"
                                                                                            (hide
                                                                                             -1)
                                                                                            (("1"
                                                                                              (lemma
                                                                                               "convergence_sequences.limit_lemma"
                                                                                               ("v"
                                                                                                "series(LAMBDA j: integral[T1, S1, mu](F(j)))"))
                                                                                              (("1"
                                                                                                (inst
                                                                                                 -5
                                                                                                 "convergence_sequences.limit
                                                                                (series(LAMBDA j: integral[T1, S1, mu](F(j))))")
                                                                                                (("1"
                                                                                                  (replace
                                                                                                   -1)
                                                                                                  (("1"
                                                                                                    (case-replace
                                                                                                     "(FORALL i:
                                                                                 IF integrable?[T1, S1, contraction(mu, X!1)](G(i))
                                                                                   THEN TRUE
                                                                                 ELSE FALSE
                                                                                 ENDIF)
                                                                               AND
                                                                               convergence_sequences.convergent?(series(LAMBDA i:
                                                                                                   IF integrable?
                                                                                                      [T1, S1, contraction(mu, X!1)]
                                                                                                      (G(i))
                                                                                                     THEN integral
                                                                                                          [T1, S1, contraction(mu, X!1)]
                                                                                                          (G(i))
                                                                                                   ELSE 0
                                                                                                   ENDIF))")
                                                                                                    (("1"
                                                                                                      (expand
                                                                                                       "x_eq"
                                                                                                       1)
                                                                                                      (("1"
                                                                                                        (case-replace
                                                                                                         "(LAMBDA i:
                                                                                       IF integrable?[T1, S1, contraction(mu, X!1)](G(i))
                                                                                         THEN integral[T1, S1, contraction(mu, X!1)](G(i))
                                                                                       ELSE 0
                                                                                       ENDIF)=(LAMBDA j:
                                                                                                integral[T1, S1, contraction(mu, X!1)]
                                                                                                    (G(j)))")
                                                                                                        (("1"
                                                                                                          (flatten)
                                                                                                          (("1"
                                                                                                            (rewrite
                                                                                                             "convergence_sequences.limit_def"
                                                                                                             -9
                                                                                                             :dir
                                                                                                             rl)
                                                                                                            (("1"
                                                                                                              (assert)
                                                                                                              nil
                                                                                                              nil))
                                                                                                            nil))
                                                                                                          nil)
                                                                                                         ("2"
                                                                                                          (hide
                                                                                                           2)
                                                                                                          (("2"
                                                                                                            (apply-extensionality
                                                                                                             :hide?
                                                                                                             t)
                                                                                                            (("1"
                                                                                                              (flatten)
                                                                                                              (("1"
                                                                                                                (inst
                                                                                                                 -
                                                                                                                 "x!1")
                                                                                                                (("1"
                                                                                                                  (prop)
                                                                                                                  (("1"
                                                                                                                    (assert)
                                                                                                                    nil
                                                                                                                    nil))
                                                                                                                  nil))
                                                                                                                nil))
                                                                                                              nil)
                                                                                                             ("2"
                                                                                                              (skosimp)
                                                                                                              (("2"
                                                                                                                (inst
                                                                                                                 -
                                                                                                                 "j!1")
                                                                                                                (("2"
                                                                                                                  (assert)
                                                                                                                  nil
                                                                                                                  nil))
                                                                                                                nil))
                                                                                                              nil))
                                                                                                            nil))
                                                                                                          nil)
                                                                                                         ("3"
                                                                                                          (skosimp)
                                                                                                          (("3"
                                                                                                            (inst
                                                                                                             -
                                                                                                             "j!1")
                                                                                                            (("3"
                                                                                                              (assert)
                                                                                                              nil
                                                                                                              nil))
                                                                                                            nil))
                                                                                                          nil))
                                                                                                        nil))
                                                                                                      nil)
                                                                                                     ("2"
                                                                                                      (hide
                                                                                                       2)
                                                                                                      (("2"
                                                                                                        (flatten)
                                                                                                        (("2"
                                                                                                          (split)
                                                                                                          (("1"
                                                                                                            (skosimp)
                                                                                                            (("1"
                                                                                                              (inst
                                                                                                               -5
                                                                                                               "i!1")
                                                                                                              (("1"
                                                                                                                (assert)
                                                                                                                nil
                                                                                                                nil))
                                                                                                              nil))
                                                                                                            nil)
                                                                                                           ("2"
                                                                                                            (case-replace
                                                                                                             "(LAMBDA i:
                                                                                              IF integrable?[T1, S1, contraction(mu, X!1)]
                                                                                                     (G(i))
                                                                                                THEN integral[T1, S1, contraction(mu, X!1)]
                                                                                                         (G(i))
                                                                                              ELSE 0
                                                                                              ENDIF)=(LAMBDA j:
                                                                                               integral[T1, S1, contraction(mu, X!1)](G(j)))")
                                                                                                            (("1"
                                                                                                              (expand
                                                                                                               "convergence_sequences.convergent?")
                                                                                                              (("1"
                                                                                                                (inst
                                                                                                                 +
                                                                                                                 "convergence_sequences.limit
                                                                                            (series(LAMBDA j: integral[T1, S1, mu](F(j))))")
                                                                                                                nil
                                                                                                                nil))
                                                                                                              nil)
                                                                                                             ("2"
                                                                                                              (apply-extensionality
                                                                                                               :hide?
                                                                                                               t)
                                                                                                              (("2"
                                                                                                                (inst
                                                                                                                 -5
                                                                                                                 "x!1")
                                                                                                                (("2"
                                                                                                                  (assert)
                                                                                                                  nil
                                                                                                                  nil))
                                                                                                                nil))
                                                                                                              nil))
                                                                                                            nil))
                                                                                                          nil))
                                                                                                        nil))
                                                                                                      nil)
                                                                                                     ("3"
                                                                                                      (expand
                                                                                                       "measurable_set?")
                                                                                                      (("3"
                                                                                                        (propax)
                                                                                                        nil
                                                                                                        nil))
                                                                                                      nil)
                                                                                                     ("4"
                                                                                                      (expand
                                                                                                       "measurable_set?")
                                                                                                      (("4"
                                                                                                        (propax)
                                                                                                        nil
                                                                                                        nil))
                                                                                                      nil))
                                                                                                    nil))
                                                                                                  nil))
                                                                                                nil)
                                                                                               ("2"
                                                                                                (propax)
                                                                                                nil
                                                                                                nil))
                                                                                              nil))
                                                                                            nil)
                                                                                           ("2"
                                                                                            (hide
                                                                                             2)
                                                                                            (("2"
                                                                                              (apply-extensionality
                                                                                               :hide?
                                                                                               t)
                                                                                              (("2"
                                                                                                (inst
                                                                                                 -
                                                                                                 "x!1")
                                                                                                (("2"
                                                                                                  (assert)
                                                                                                  nil
                                                                                                  nil))
                                                                                                nil))
                                                                                              nil))
                                                                                            nil))
                                                                                          nil)
                                                                                         ("2"
                                                                                          (hide
                                                                                           2)
                                                                                          (("2"
                                                                                            (skosimp)
                                                                                            (("2"
                                                                                              (inst
                                                                                               -
                                                                                               "j!1")
                                                                                              (("2"
                                                                                                (assert)
                                                                                                nil
                                                                                                nil))
                                                                                              nil))
                                                                                            nil))
                                                                                          nil))
                                                                                        nil))
                                                                                      nil)
                                                                                     ("2"
                                                                                      (replace
                                                                                       1
                                                                                       2)
                                                                                      (("2"
                                                                                        (expand
                                                                                         "x_eq"
                                                                                         2)
                                                                                        (("2"
                                                                                          (case-replace
                                                                                           "FORALL j: integrable?[T1, S1, contraction(mu, X!1)](G(j))")
                                                                                          (("1"
                                                                                            (case-replace
                                                                                             "(LAMBDA i:
                                                                                          IF integrable?[T1, S1, contraction(mu, X!1)]
                                                                                                 (G(i))
                                                                                            THEN integral[T1, S1, contraction(mu, X!1)]
                                                                                                 (G(i))
                                                                                          ELSE 0
                                                                                          ENDIF)=(LAMBDA j:
                                                                                          integral[T1, S1, contraction(mu, X!1)]
                                                                                              (G(j)))")
                                                                                            (("1"
                                                                                              (case-replace
                                                                                               "convergence_sequences.convergent?(series(LAMBDA j:
                                                                                             integral[T1, S1, contraction(mu, X!1)]
                                                                                                 (G(j))))")
                                                                                              (("1"
                                                                                                (hide
                                                                                                 -5)
                                                                                                (("1"
                                                                                                  (lemma
                                                                                                   "convergence_sequences.limit_lemma"
                                                                                                   ("v"
                                                                                                    "series(LAMBDA j: integral[T1, S1, contraction(mu, X!1)](G(j)))"))
                                                                                                  (("1"
                                                                                                    (inst
                                                                                                     -5
                                                                                                     "convergence_sequences.limit(series(LAMBDA j:
                                                                                                   integral[T1, S1, contraction(mu, X!1)]
                                                                                                       (G(j))))")
                                                                                                    (("1"
                                                                                                      (replace
                                                                                                       -1)
                                                                                                      (("1"
                                                                                                        (hide-all-but
                                                                                                         (-4
                                                                                                          -5
                                                                                                          1))
                                                                                                        (("1"
                                                                                                          (flatten)
                                                                                                          (("1"
                                                                                                            (split)
                                                                                                            (("1"
                                                                                                              (skosimp)
                                                                                                              (("1"
                                                                                                                (inst
                                                                                                                 -2
                                                                                                                 "i!1")
                                                                                                                (("1"
                                                                                                                  (assert)
                                                                                                                  nil
                                                                                                                  nil))
                                                                                                                nil))
                                                                                                              nil)
                                                                                                             ("2"
                                                                                                              (case-replace
                                                                                                               "(LAMBDA i:
                                                                                              IF integrable?[T1, S1, mu](F(i))
                                                                                                THEN integral[T1, S1, mu](F(i))
                                                                                              ELSE 0
                                                                                              ENDIF)=(LAMBDA j: integral[T1, S1, mu](F(j)))")
                                                                                                              (("1"
                                                                                                                (hide
                                                                                                                 -1)
                                                                                                                (("1"
                                                                                                                  (expand
                                                                                                                   "convergence_sequences.convergent?")
                                                                                                                  (("1"
                                                                                                                    (inst
                                                                                                                     +
                                                                                                                     "convergence_sequences.limit
                                                                                            (series(LAMBDA j:
                                                                                                      integral[T1, S1, contraction(mu, X!1)]
                                                                                                          (G(j))))")
                                                                                                                    (("1"
                                                                                                                      (expand
                                                                                                                       "measurable_set?")
                                                                                                                      (("1"
                                                                                                                        (propax)
                                                                                                                        nil
                                                                                                                        nil))
                                                                                                                      nil))
                                                                                                                    nil))
                                                                                                                  nil))
                                                                                                                nil)
                                                                                                               ("2"
                                                                                                                (apply-extensionality
                                                                                                                 :hide?
                                                                                                                 t)
                                                                                                                (("2"
                                                                                                                  (inst
                                                                                                                   -2
                                                                                                                   "x!1")
                                                                                                                  (("2"
                                                                                                                    (assert)
                                                                                                                    nil
                                                                                                                    nil))
                                                                                                                  nil))
                                                                                                                nil))
                                                                                                              nil))
                                                                                                            nil))
                                                                                                          nil))
                                                                                                        nil))
                                                                                                      nil))
                                                                                                    nil)
                                                                                                   ("2"
                                                                                                    (propax)
                                                                                                    nil
                                                                                                    nil)
                                                                                                   ("3"
                                                                                                    (propax)
                                                                                                    nil
                                                                                                    nil))
                                                                                                  nil))
                                                                                                nil)
                                                                                               ("2"
                                                                                                (replace
                                                                                                 1
                                                                                                 -4)
                                                                                                (("2"
                                                                                                  (propax)
                                                                                                  nil
                                                                                                  nil))
                                                                                                nil))
                                                                                              nil)
                                                                                             ("2"
                                                                                              (apply-extensionality
                                                                                               1
                                                                                               :hide?
                                                                                               t)
                                                                                              (("2"
                                                                                                (inst
                                                                                                 -1
                                                                                                 "x!1")
                                                                                                (("2"
                                                                                                  (assert)
                                                                                                  nil
                                                                                                  nil))
                                                                                                nil))
                                                                                              nil))
                                                                                            nil)
                                                                                           ("2"
                                                                                            (hide-all-but
                                                                                             (-2
                                                                                              1))
                                                                                            (("2"
                                                                                              (prop)
                                                                                              (("2"
                                                                                                (skosimp)
                                                                                                (("2"
                                                                                                  (inst
                                                                                                   -
                                                                                                   "j!1")
                                                                                                  (("2"
                                                                                                    (assert)
                                                                                                    nil
                                                                                                    nil))
                                                                                                  nil))
                                                                                                nil))
                                                                                              nil))
                                                                                            nil))
                                                                                          nil))
                                                                                        nil))
                                                                                      nil))
                                                                                    nil))
                                                                                  nil)
                                                                                 ("2"
                                                                                  (hide
                                                                                   2)
                                                                                  (("2"
                                                                                    (skosimp)
                                                                                    (("2"
                                                                                      (split
                                                                                       1)
                                                                                      (("1"
                                                                                        (flatten)
                                                                                        (("1"
                                                                                          (name
                                                                                           "FF"
                                                                                           "lambda j: lambda x: series(lambda i: F(i)(x))(j)")
                                                                                          (("1"
                                                                                            (case
                                                                                             "forall j: integrable?[T1, S1, mu](FF(j))")
                                                                                            (("1"
                                                                                              (case
                                                                                               "forall (n:nat): series(LAMBDA j: integral[T1, S1, mu](F(j)))(n) = (integral[T1, S1, mu] o FF)(n)")
                                                                                              (("1"
                                                                                                (lemma
                                                                                                 "extensionality_postulate"
                                                                                                 ("f"
                                                                                                  "series(LAMBDA j: integral[T1, S1, mu](F(j)))"
                                                                                                  "g"
                                                                                                  "integral[T1, S1, mu] o FF"))
                                                                                                (("1"
                                                                                                  (replace
                                                                                                   -2
                                                                                                   -1)
                                                                                                  (("1"
                                                                                                    (assert)
                                                                                                    (("1"
                                                                                                      (replace
                                                                                                       -1)
                                                                                                      (("1"
                                                                                                        (hide
                                                                                                         -1
                                                                                                         -2
                                                                                                         -4)
                                                                                                        (("1"
                                                                                                          (lemma
                                                                                                           "monotone_convergence[T1, S1, mu]"
                                                                                                           ("F"
                                                                                                            "FF"))
                                                                                                          (("1"
                                                                                                            (case-replace
                                                                                                             "ae_increasing?(FF)")
                                                                                                            (("1"
                                                                                                              (case-replace
                                                                                                               "real_fun_preds.bounded?(integral[T1,S1,mu] o FF)")
                                                                                                              (("1"
                                                                                                                (assert)
                                                                                                                (("1"
                                                                                                                  (flatten)
                                                                                                                  (("1"
                                                                                                                    (skosimp)
                                                                                                                    (("1"
                                                                                                                      (inst
                                                                                                                       -
                                                                                                                       "f!1")
                                                                                                                      (("1"
                                                                                                                        (assert)
                                                                                                                        (("1"
                                                                                                                          (typepred
                                                                                                                           "f!1")
                                                                                                                          (("1"
                                                                                                                            (case
                                                                                                                             "forall x: x_eq(x_limit(LAMBDA j: (TRUE,FF(j)(x))), nu(x_section(EE, x)))")
                                                                                                                            (("1"
                                                                                                                              (case
                                                                                                                               "ae?(lambda x: x_eq((TRUE,plus(f!1)(x)),nu(x_section(EE, x))))")
                                                                                                                              (("1"
                                                                                                                                (hide
                                                                                                                                 -2)
                                                                                                                                (("1"
                                                                                                                                  (case-replace
                                                                                                                                   "FORALL j: integrable?[T1, S1, contraction(mu, X!1)](G(j))")
                                                                                                                                  (("1"
                                                                                                                                    (name
                                                                                                                                     "GG"
                                                                                                                                     "lambda j: lambda x: series(LAMBDA i: G(i)(x))(j)")
                                                                                                                                    (("1"
                                                                                                                                      (hide
                                                                                                                                       -1)
                                                                                                                                      (("1"
                                                                                                                                        (case
                                                                                                                                         "FORALL j: integrable?[T1, S1, contraction(mu, X!1)](GG(j))")
                                                                                                                                        (("1"
                                                                                                                                          (case
                                                                                                                                           "forall j,x: GG(j)(x) >= 0")
                                                                                                                                          (("1"
                                                                                                                                            (case
                                                                                                                                             "forall j: series(LAMBDA i:
                                                                                                       integral[T1, S1, contraction(mu, X!1)](G(i)))(j)=(integral[T1, S1, contraction(mu, X!1)] o GG)(j)")
                                                                                                                                            (("1"
                                                                                                                                              (case-replace
                                                                                                                                               "series(LAMBDA j:
                                                                                                         integral[T1, S1, contraction(mu, X!1)](G(j)))=integral[T1, S1, contraction(mu, X!1)] o GG")
                                                                                                                                              (("1"
                                                                                                                                                (case-replace
                                                                                                                                                 "l!1=integral[T1,S1,mu](f!1)")
                                                                                                                                                (("1"
                                                                                                                                                  (hide
                                                                                                                                                   -1)
                                                                                                                                                  (("1"
                                                                                                                                                    (case
                                                                                                                                                     "ae_nonneg?(f!1)")
                                                                                                                                                    (("1"
                                                                                                                                                      (case
                                                                                                                                                       "ae_eq?(f!1,*[T1](phi(X!1),f!1))")
                                                                                                                                                      (("1"
                                                                                                                                                        (hide
                                                                                                                                                         -4
                                                                                                                                                         -3)
                                                                                                                                                        (("1"
                                                                                                                                                          (name
                                                                                                                                                           "HH"
                                                                                                                                                           "lambda j: *[T1](phi(X!1),GG(j))")
                                                                                                                                                          (("1"
                                                                                                                                                            (case
                                                                                                                                                             "forall j: integrable?[T1, S1, mu](HH(j))")
                                                                                                                                                            (("1"
                                                                                                                                                              (case
                                                                                                                                                               "FORALL j, x: HH(j)(x) >= 0")
                                                                                                                                                              (("1"
                                                                                                                                                                (hide
                                                                                                                                                                 -3
                                                                                                                                                                 -6)
                                                                                                                                                                (("1"
                                                                                                                                                                  (case
                                                                                                                                                                   "forall j: (integral[T1, S1, contraction(mu, X!1)] o GG)(j) = (integral[T1,S1,mu] o HH)(j)")
                                                                                                                                                                  (("1"
                                                                                                                                                                    (case-replace
                                                                                                                                                                     "integral[T1, S1, contraction(mu, X!1)] o GG=integral[T1, S1, mu] o HH")
                                                                                                                                                                    (("1"
                                                                                                                                                                      (hide
                                                                                                                                                                       -1
                                                                                                                                                                       -2)
                                                                                                                                                                      (("1"
                                                                                                                                                                        (lemma
                                                                                                                                                                         "monotone_convergence[T1, S1, mu]"
                                                                                                                                                                         ("F"
                                                                                                                                                                          "HH"))
                                                                                                                                                                        (("1"
                                                                                                                                                                          (case-replace
                                                                                                                                                                           "ae_increasing?(HH)")
                                                                                                                                                                          (("1"
                                                                                                                                                                            (flatten)
                                                                                                                                                                            (("1"
                                                                                                                                                                              (hide
                                                                                                                                                                               -2
                                                                                                                                                                               -3)
                                                                                                                                                                              (("1"
                                                                                                                                                                                (lemma
                                                                                                                                                                                 "indefinite_integrable[T1, S1, mu]"
                                                                                                                                                                                 ("f"
                                                                                                                                                                                  "f!1"
                                                                                                                                                                                  "E"
                                                                                                                                                                                  "X!1"))
                                                                                                                                                                                (("1"
                                                                                                                                                                                  (inst
                                                                                                                                                                                   -3
                                                                                                                                                                                   "*[T1](phi(X!1), f!1)")
                                                                                                                                                                                  (("1"
                                                                                                                                                                                    (split
                                                                                                                                                                                     -3)
                                                                                                                                                                                    (("1"
                                                                                                                                                                                      (expand
                                                                                                                                                                                       "converges_upto?")
                                                                                                                                                                                      (("1"
                                                                                                                                                                                        (flatten)
                                                                                                                                                                                        (("1"
                                                                                                                                                                                          (name-replace
                                                                                                                                                                                           "SS"
                                                                                                                                                                                           "integral[T1, S1, mu] o HH")
                                                                                                                                                                                          (("1"
                                                                                                                                                                                            (lemma
                                                                                                                                                                                             "integral_ae_eq[T1,S1,mu]"
                                                                                                                                                                                             ("f"
                                                                                                                                                                                              "f!1"
                                                                                                                                                                                              "h"
                                                                                                                                                                                              "*[T1](phi(X!1), f!1)"))
                                                                                                                                                                                            (("1"
                                                                                                                                                                                              (assert)
                                                                                                                                                                                              (("1"
                                                                                                                                                                                                (replace
                                                                                                                                                                                                 -1
                                                                                                                                                                                                 *
                                                                                                                                                                                                 rl)
                                                                                                                                                                                                (("1"
                                                                                                                                                                                                  (name-replace
                                                                                                                                                                                                   "LIMIT"
                                                                                                                                                                                                   "integral[T1, S1, mu](f!1)")
                                                                                                                                                                                                  (("1"
                                                                                                                                                                                                    (hide-all-but
                                                                                                                                                                                                     (-2
                                                                                                                                                                                                      1))
                                                                                                                                                                                                    (("1"
                                                                                                                                                                                                      (expand
                                                                                                                                                                                                       "convergence")
                                                                                                                                                                                                      (("1"
                                                                                                                                                                                                        (rewrite
                                                                                                                                                                                                         "metric_convergence_def")
                                                                                                                                                                                                        (("1"
                                                                                                                                                                                                          (expand
                                                                                                                                                                                                           "metric_converges_to")
                                                                                                                                                                                                          (("1"
                                                                                                                                                                                                            (skosimp)
                                                                                                                                                                                                            (("1"
                                                                                                                                                                                                              (inst
                                                                                                                                                                                                               -
                                                                                                                                                                                                               "epsilon!1")
                                                                                                                                                                                                              (("1"
                                                                                                                                                                                                                (skosimp)
                                                                                                                                                                                                                (("1"
                                                                                                                                                                                                                  (inst
                                                                                                                                                                                                                   +
                                                                                                                                                                                                                   "n!1")
                                                                                                                                                                                                                  (("1"
                                                                                                                                                                                                                    (skosimp)
                                                                                                                                                                                                                    (("1"
                                                                                                                                                                                                                      (inst
                                                                                                                                                                                                                       -
                                                                                                                                                                                                                       "i!1")
                                                                                                                                                                                                                      (("1"
                                                                                                                                                                                                                        (grind)
                                                                                                                                                                                                                        nil
                                                                                                                                                                                                                        nil))
                                                                                                                                                                                                                      nil))
                                                                                                                                                                                                                    nil))
                                                                                                                                                                                                                  nil))
                                                                                                                                                                                                                nil))
                                                                                                                                                                                                              nil))
                                                                                                                                                                                                            nil))
                                                                                                                                                                                                          nil))
                                                                                                                                                                                                        nil))
                                                                                                                                                                                                      nil))
                                                                                                                                                                                                    nil))
                                                                                                                                                                                                  nil))
                                                                                                                                                                                                nil))
                                                                                                                                                                                              nil))
                                                                                                                                                                                            nil))
                                                                                                                                                                                          nil))
                                                                                                                                                                                        nil))
                                                                                                                                                                                      nil)
                                                                                                                                                                                     ("2"
                                                                                                                                                                                      (hide
                                                                                                                                                                                       2)
                                                                                                                                                                                      (("2"
                                                                                                                                                                                        (hide-all-but
                                                                                                                                                                                         (-6
                                                                                                                                                                                          -9
                                                                                                                                                                                          -20
                                                                                                                                                                                          -21
                                                                                                                                                                                          1))
                                                                                                                                                                                        (("2"
                                                                                                                                                                                          (expand
                                                                                                                                                                                           "HH")
                                                                                                                                                                                          (("2"
                                                                                                                                                                                            (expand
                                                                                                                                                                                             "ae_convergence?")
                                                                                                                                                                                            (("2"
                                                                                                                                                                                              (expand
                                                                                                                                                                                               "ae_convergence_in?")
                                                                                                                                                                                              (("2"
                                                                                                                                                                                                (expand
                                                                                                                                                                                                 "ae_nonneg?")
                                                                                                                                                                                                (("2"
                                                                                                                                                                                                  (expand
                                                                                                                                                                                                   "pointwise_ae?")
                                                                                                                                                                                                  (("2"
                                                                                                                                                                                                    (expand
                                                                                                                                                                                                     "ae?")
                                                                                                                                                                                                    (("2"
                                                                                                                                                                                                      (expand
                                                                                                                                                                                                       "fullset")
                                                                                                                                                                                                      (("2"
                                                                                                                                                                                                        (expand
                                                                                                                                                                                                         "ae_in?")
                                                                                                                                                                                                        (("2"
                                                                                                                                                                                                          (skosimp*)
                                                                                                                                                                                                          (("2"
                                                                                                                                                                                                            (inst
                                                                                                                                                                                                             +
                                                                                                                                                                                                             "union(E!2,E!3)")
                                                                                                                                                                                                            (("2"
                                                                                                                                                                                                              (skosimp)
                                                                                                                                                                                                              (("2"
                                                                                                                                                                                                                (expand
                                                                                                                                                                                                                 "union")
                                                                                                                                                                                                                (("2"
                                                                                                                                                                                                                  (inst
                                                                                                                                                                                                                   -
                                                                                                                                                                                                                   "x!1")
                                                                                                                                                                                                                  (("2"
                                                                                                                                                                                                                    (inst
                                                                                                                                                                                                                     -
                                                                                                                                                                                                                     "x!1")
                                                                                                                                                                                                                    (("2"
                                                                                                                                                                                                                      (assert)
                                                                                                                                                                                                                      (("2"
                                                                                                                                                                                                                        (flatten)
                                                                                                                                                                                                                        (("2"
                                                                                                                                                                                                                          (assert)
                                                                                                                                                                                                                          (("2"
                                                                                                                                                                                                                            (expand
                                                                                                                                                                                                                             "plus")
                                                                                                                                                                                                                            (("2"
                                                                                                                                                                                                                              (expand
                                                                                                                                                                                                                               "max")
                                                                                                                                                                                                                              (("2"
                                                                                                                                                                                                                                (expand
                                                                                                                                                                                                                                 "*")
                                                                                                                                                                                                                                (("2"
                                                                                                                                                                                                                                  (expand
                                                                                                                                                                                                                                   "phi")
                                                                                                                                                                                                                                  (("2"
                                                                                                                                                                                                                                    (expand
                                                                                                                                                                                                                                     "member")
                                                                                                                                                                                                                                    (("2"
                                                                                                                                                                                                                                      (rewrite
                                                                                                                                                                                                                                       "metric_convergence_def")
                                                                                                                                                                                                                                      (("2"
                                                                                                                                                                                                                                        (expand
                                                                                                                                                                                                                                         "x_eq"
                                                                                                                                                                                                                                         -2)
                                                                                                                                                                                                                                        (("2"
                                                                                                                                                                                                                                          (flatten)
                                                                                                                                                                                                                                          (("2"
                                                                                                                                                                                                                                            (inst
                                                                                                                                                                                                                                             -
                                                                                                                                                                                                                                             "x!1")
                                                                                                                                                                                                                                            (("2"
                                                                                                                                                                                                                                              (inst
                                                                                                                                                                                                                                               -
                                                                                                                                                                                                                                               "x!1")
                                                                                                                                                                                                                                              (("2"
                                                                                                                                                                                                                                                (case-replace
                                                                                                                                                                                                                                                 "X!1(x!1)")
                                                                                                                                                                                                                                                (("1"
                                                                                                                                                                                                                                                  (expand
                                                                                                                                                                                                                                                   "x_eq")
                                                                                                                                                                                                                                                  (("1"
                                                                                                                                                                                                                                                    (flatten)
                                                                                                                                                                                                                                                    (("1"
                                                                                                                                                                                                                                                      (assert)
                                                                                                                                                                                                                                                      (("1"
                                                                                                                                                                                                                                                        (lemma
                                                                                                                                                                                                                                                         "x_limit_to_sum"
                                                                                                                                                                                                                                                         ("S"
                                                                                                                                                                                                                                                          "LAMBDA j: (TRUE,GG(j)(x!1))"
                                                                                                                                                                                                                                                          "T"
                                                                                                                                                                                                                                                          "LAMBDA j: (TRUE,G(j)(x!1))"))
                                                                                                                                                                                                                                                        (("1"
                                                                                                                                                                                                                                                          (split
                                                                                                                                                                                                                                                           -1)
                                                                                                                                                                                                                                                          (("1"
                                                                                                                                                                                                                                                            (expand
                                                                                                                                                                                                                                                             "x_eq")
                                                                                                                                                                                                                                                            (("1"
                                                                                                                                                                                                                                                              (flatten)
                                                                                                                                                                                                                                                              (("1"
                                                                                                                                                                                                                                                                (assert)
                                                                                                                                                                                                                                                                (("1"
                                                                                                                                                                                                                                                                  (expand
                                                                                                                                                                                                                                                                   "x_sum")
                                                                                                                                                                                                                                                                  (("1"
                                                                                                                                                                                                                                                                    (case-replace
                                                                                                                                                                                                                                                                     "convergence_sequences.convergent?(series(LAMBDA j: G(j)(x!1)))")
                                                                                                                                                                                                                                                                    (("1"
                                                                                                                                                                                                                                                                      (replace
                                                                                                                                                                                                                                                                       -10)
                                                                                                                                                                                                                                                                      (("1"
                                                                                                                                                                                                                                                                        (replace
                                                                                                                                                                                                                                                                         -7
                                                                                                                                                                                                                                                                         *
                                                                                                                                                                                                                                                                         rl)
                                                                                                                                                                                                                                                                        (("1"
                                                                                                                                                                                                                                                                          (replace
                                                                                                                                                                                                                                                                           -9)
                                                                                                                                                                                                                                                                          (("1"
                                                                                                                                                                                                                                                                            (expand
                                                                                                                                                                                                                                                                             "x_limit")
                                                                                                                                                                                                                                                                            (("1"
                                                                                                                                                                                                                                                                              (case-replace
                                                                                                                                                                                                                                                                               "convergence_sequences.convergent?(LAMBDA i: GG(i)(x!1))")
                                                                                                                                                                                                                                                                              (("1"
                                                                                                                                                                                                                                                                                (case
                                                                                                                                                                                                                                                                                 "convergence(LAMBDA j: GG(j)(x!1),f!1(x!1))")
                                                                                                                                                                                                                                                                                (("1"
                                                                                                                                                                                                                                                                                  (hide-all-but
                                                                                                                                                                                                                                                                                   (-1
                                                                                                                                                                                                                                                                                    3))
                                                                                                                                                                                                                                                                                  (("1"
                                                                                                                                                                                                                                                                                    (expand
                                                                                                                                                                                                                                                                                     "metric_converges_to")
                                                                                                                                                                                                                                                                                    (("1"
                                                                                                                                                                                                                                                                                      (expand
                                                                                                                                                                                                                                                                                       "convergence")
                                                                                                                                                                                                                                                                                      (("1"
                                                                                                                                                                                                                                                                                        (skosimp)
                                                                                                                                                                                                                                                                                        (("1"
                                                                                                                                                                                                                                                                                          (inst
                                                                                                                                                                                                                                                                                           -
                                                                                                                                                                                                                                                                                           "r!1")
                                                                                                                                                                                                                                                                                          (("1"
                                                                                                                                                                                                                                                                                            (skosimp)
                                                                                                                                                                                                                                                                                            (("1"
                                                                                                                                                                                                                                                                                              (inst
                                                                                                                                                                                                                                                                                               +
                                                                                                                                                                                                                                                                                               "n!1")
                                                                                                                                                                                                                                                                                              (("1"
                                                                                                                                                                                                                                                                                                (skosimp)
                                                                                                                                                                                                                                                                                                (("1"
                                                                                                                                                                                                                                                                                                  (inst
                                                                                                                                                                                                                                                                                                   -
                                                                                                                                                                                                                                                                                                   "i!1")
                                                                                                                                                                                                                                                                                                  (("1"
                                                                                                                                                                                                                                                                                                    (grind)
                                                                                                                                                                                                                                                                                                    nil
                                                                                                                                                                                                                                                                                                    nil))
                                                                                                                                                                                                                                                                                                  nil))
                                                                                                                                                                                                                                                                                                nil))
                                                                                                                                                                                                                                                                                              nil))
                                                                                                                                                                                                                                                                                            nil))
                                                                                                                                                                                                                                                                                          nil))
                                                                                                                                                                                                                                                                                        nil))
                                                                                                                                                                                                                                                                                      nil))
                                                                                                                                                                                                                                                                                    nil))
                                                                                                                                                                                                                                                                                  nil)
                                                                                                                                                                                                                                                                                 ("2"
                                                                                                                                                                                                                                                                                  (lemma
                                                                                                                                                                                                                                                                                   "convergence_sequences.limit_def"
                                                                                                                                                                                                                                                                                   ("v"
                                                                                                                                                                                                                                                                                    "LAMBDA i: GG(i)(x!1)"
                                                                                                                                                                                                                                                                                    "l"
                                                                                                                                                                                                                                                                                    "f!1(x!1)"))
                                                                                                                                                                                                                                                                                  (("1"
                                                                                                                                                                                                                                                                                    (assert)
                                                                                                                                                                                                                                                                                    nil
                                                                                                                                                                                                                                                                                    nil)
                                                                                                                                                                                                                                                                                   ("2"
                                                                                                                                                                                                                                                                                    (propax)
                                                                                                                                                                                                                                                                                    nil
                                                                                                                                                                                                                                                                                    nil))
                                                                                                                                                                                                                                                                                  nil))
                                                                                                                                                                                                                                                                                nil)
                                                                                                                                                                                                                                                                               ("2"
                                                                                                                                                                                                                                                                                (assert)
                                                                                                                                                                                                                                                                                nil
                                                                                                                                                                                                                                                                                nil))
                                                                                                                                                                                                                                                                              nil))
                                                                                                                                                                                                                                                                            nil))
                                                                                                                                                                                                                                                                          nil))
                                                                                                                                                                                                                                                                        nil))
                                                                                                                                                                                                                                                                      nil)
                                                                                                                                                                                                                                                                     ("2"
                                                                                                                                                                                                                                                                      (assert)
                                                                                                                                                                                                                                                                      nil
                                                                                                                                                                                                                                                                      nil))
                                                                                                                                                                                                                                                                    nil))
                                                                                                                                                                                                                                                                  nil))
                                                                                                                                                                                                                                                                nil))
                                                                                                                                                                                                                                                              nil))
                                                                                                                                                                                                                                                            nil)
                                                                                                                                                                                                                                                           ("2"
                                                                                                                                                                                                                                                            (hide-all-but
                                                                                                                                                                                                                                                             1)
                                                                                                                                                                                                                                                            (("2"
                                                                                                                                                                                                                                                              (skosimp)
                                                                                                                                                                                                                                                              (("2"
                                                                                                                                                                                                                                                                (expand
                                                                                                                                                                                                                                                                 "GG")
                                                                                                                                                                                                                                                                (("2"
                                                                                                                                                                                                                                                                  (expand
                                                                                                                                                                                                                                                                   "series")
                                                                                                                                                                                                                                                                  (("2"
                                                                                                                                                                                                                                                                    (expand
                                                                                                                                                                                                                                                                     "x_sigma")
                                                                                                                                                                                                                                                                    (("2"
                                                                                                                                                                                                                                                                      (expand
                                                                                                                                                                                                                                                                       "x_eq")
                                                                                                                                                                                                                                                                      (("2"
                                                                                                                                                                                                                                                                        (propax)
                                                                                                                                                                                                                                                                        nil
                                                                                                                                                                                                                                                                        nil))
                                                                                                                                                                                                                                                                      nil))
                                                                                                                                                                                                                                                                    nil))
                                                                                                                                                                                                                                                                  nil))
                                                                                                                                                                                                                                                                nil))
                                                                                                                                                                                                                                                              nil))
                                                                                                                                                                                                                                                            nil))
                                                                                                                                                                                                                                                          nil)
                                                                                                                                                                                                                                                         ("2"
                                                                                                                                                                                                                                                          (hide-all-but
                                                                                                                                                                                                                                                           1)
                                                                                                                                                                                                                                                          (("2"
                                                                                                                                                                                                                                                            (expand
                                                                                                                                                                                                                                                             "GG")
                                                                                                                                                                                                                                                            (("2"
                                                                                                                                                                                                                                                              (expand
                                                                                                                                                                                                                                                               "series")
                                                                                                                                                                                                                                                              (("2"
                                                                                                                                                                                                                                                                (induct
                                                                                                                                                                                                                                                                 "j")
                                                                                                                                                                                                                                                                (("1"
                                                                                                                                                                                                                                                                  (expand
                                                                                                                                                                                                                                                                   "sigma")
                                                                                                                                                                                                                                                                  (("1"
                                                                                                                                                                                                                                                                    (assert)
                                                                                                                                                                                                                                                                    nil
                                                                                                                                                                                                                                                                    nil))
                                                                                                                                                                                                                                                                  nil)
                                                                                                                                                                                                                                                                 ("2"
                                                                                                                                                                                                                                                                  (skosimp)
                                                                                                                                                                                                                                                                  (("2"
                                                                                                                                                                                                                                                                    (expand
                                                                                                                                                                                                                                                                     "sigma"
                                                                                                                                                                                                                                                                     1)
                                                                                                                                                                                                                                                                    (("2"
                                                                                                                                                                                                                                                                      (assert)
                                                                                                                                                                                                                                                                      nil
                                                                                                                                                                                                                                                                      nil))
                                                                                                                                                                                                                                                                    nil))
                                                                                                                                                                                                                                                                  nil))
                                                                                                                                                                                                                                                                nil))
                                                                                                                                                                                                                                                              nil))
                                                                                                                                                                                                                                                            nil))
                                                                                                                                                                                                                                                          nil))
                                                                                                                                                                                                                                                        nil))
                                                                                                                                                                                                                                                      nil))
                                                                                                                                                                                                                                                    nil))
                                                                                                                                                                                                                                                  nil)
                                                                                                                                                                                                                                                 ("2"
                                                                                                                                                                                                                                                  (assert)
                                                                                                                                                                                                                                                  (("2"
                                                                                                                                                                                                                                                    (hide-all-but
                                                                                                                                                                                                                                                     4)
                                                                                                                                                                                                                                                    (("2"
                                                                                                                                                                                                                                                      (expand
                                                                                                                                                                                                                                                       "metric_converges_to")
                                                                                                                                                                                                                                                      (("2"
                                                                                                                                                                                                                                                        (skosimp)
                                                                                                                                                                                                                                                        (("2"
                                                                                                                                                                                                                                                          (inst
                                                                                                                                                                                                                                                           +
                                                                                                                                                                                                                                                           "0")
                                                                                                                                                                                                                                                          (("2"
                                                                                                                                                                                                                                                            (skosimp)
                                                                                                                                                                                                                                                            (("2"
                                                                                                                                                                                                                                                              (grind)
                                                                                                                                                                                                                                                              nil
                                                                                                                                                                                                                                                              nil))
                                                                                                                                                                                                                                                            nil))
                                                                                                                                                                                                                                                          nil))
                                                                                                                                                                                                                                                        nil))
                                                                                                                                                                                                                                                      nil))
                                                                                                                                                                                                                                                    nil))
                                                                                                                                                                                                                                                  nil))
                                                                                                                                                                                                                                                nil))
                                                                                                                                                                                                                                              nil))
                                                                                                                                                                                                                                            nil))
                                                                                                                                                                                                                                          nil))
                                                                                                                                                                                                                                        nil))
                                                                                                                                                                                                                                      nil))
                                                                                                                                                                                                                                    nil))
                                                                                                                                                                                                                                  nil))
                                                                                                                                                                                                                                nil))
                                                                                                                                                                                                                              nil))
                                                                                                                                                                                                                            nil))
                                                                                                                                                                                                                          nil))
                                                                                                                                                                                                                        nil))
                                                                                                                                                                                                                      nil))
                                                                                                                                                                                                                    nil))
                                                                                                                                                                                                                  nil))
                                                                                                                                                                                                                nil))
                                                                                                                                                                                                              nil))
                                                                                                                                                                                                            nil))
                                                                                                                                                                                                          nil))
                                                                                                                                                                                                        nil))
                                                                                                                                                                                                      nil))
                                                                                                                                                                                                    nil))
                                                                                                                                                                                                  nil))
                                                                                                                                                                                                nil))
                                                                                                                                                                                              nil))
                                                                                                                                                                                            nil))
                                                                                                                                                                                          nil))
                                                                                                                                                                                        nil))
                                                                                                                                                                                      nil))
                                                                                                                                                                                    nil))
                                                                                                                                                                                  nil))
                                                                                                                                                                                nil))
                                                                                                                                                                              nil))
                                                                                                                                                                            nil)
                                                                                                                                                                           ("2"
                                                                                                                                                                            (hide-all-but
                                                                                                                                                                             (1
                                                                                                                                                                              -23))
                                                                                                                                                                            (("2"
                                                                                                                                                                              (expand
                                                                                                                                                                               "ae_increasing?")
                                                                                                                                                                              (("2"
                                                                                                                                                                                (expand
                                                                                                                                                                                 "HH")
                                                                                                                                                                                (("2"
                                                                                                                                                                                  (expand
                                                                                                                                                                                   "*")
                                                                                                                                                                                  (("2"
                                                                                                                                                                                    (expand
                                                                                                                                                                                     "phi")
                                                                                                                                                                                    (("2"
                                                                                                                                                                                      (expand
                                                                                                                                                                                       "member")
                                                                                                                                                                                      (("2"
                                                                                                                                                                                        (inst
                                                                                                                                                                                         +
                                                                                                                                                                                         "emptyset")
                                                                                                                                                                                        (("2"
                                                                                                                                                                                          (skosimp)
                                                                                                                                                                                          (("2"
                                                                                                                                                                                            (hide
                                                                                                                                                                                             1)
                                                                                                                                                                                            (("2"
                                                                                                                                                                                              (skosimp)
                                                                                                                                                                                              (("2"
                                                                                                                                                                                                (lift-if
                                                                                                                                                                                                 1)
                                                                                                                                                                                                (("2"
                                                                                                                                                                                                  (assert)
                                                                                                                                                                                                  (("2"
                                                                                                                                                                                                    (prop)
                                                                                                                                                                                                    (("2"
                                                                                                                                                                                                      (expand
                                                                                                                                                                                                       "GG")
                                                                                                                                                                                                      (("2"
                                                                                                                                                                                                        (expand
                                                                                                                                                                                                         "series")
                                                                                                                                                                                                        (("2"
                                                                                                                                                                                                          (inst
                                                                                                                                                                                                           -
                                                                                                                                                                                                           "_"
                                                                                                                                                                                                           "x!1")
                                                                                                                                                                                                          (("2"
                                                                                                                                                                                                            (lemma
                                                                                                                                                                                                             "sigma_split"
                                                                                                                                                                                                             ("low"
                                                                                                                                                                                                              "0"
                                                                                                                                                                                                              "high"
                                                                                                                                                                                                              "j!1"
                                                                                                                                                                                                              "z"
                                                                                                                                                                                                              "i!1"
                                                                                                                                                                                                              "F"
                                                                                                                                                                                                              "LAMBDA i: G(i)(x!1)"))
                                                                                                                                                                                                            (("2"
                                                                                                                                                                                                              (assert)
                                                                                                                                                                                                              (("2"
                                                                                                                                                                                                                (replace
                                                                                                                                                                                                                 -1)
                                                                                                                                                                                                                (("2"
                                                                                                                                                                                                                  (assert)
                                                                                                                                                                                                                  nil
                                                                                                                                                                                                                  nil))
                                                                                                                                                                                                                nil))
                                                                                                                                                                                                              nil))
                                                                                                                                                                                                            nil))
                                                                                                                                                                                                          nil))
                                                                                                                                                                                                        nil))
                                                                                                                                                                                                      nil))
                                                                                                                                                                                                    nil))
                                                                                                                                                                                                  nil))
                                                                                                                                                                                                nil))
                                                                                                                                                                                              nil))
                                                                                                                                                                                            nil))
                                                                                                                                                                                          nil))
                                                                                                                                                                                        nil))
                                                                                                                                                                                      nil))
                                                                                                                                                                                    nil))
                                                                                                                                                                                  nil))
                                                                                                                                                                                nil))
                                                                                                                                                                              nil))
                                                                                                                                                                            nil))
                                                                                                                                                                          nil))
                                                                                                                                                                        nil))
                                                                                                                                                                      nil)
                                                                                                                                                                     ("2"
                                                                                                                                                                      (apply-extensionality
                                                                                                                                                                       1
                                                                                                                                                                       :hide?
                                                                                                                                                                       t)
                                                                                                                                                                      nil
                                                                                                                                                                      nil))
                                                                                                                                                                    nil)
                                                                                                                                                                   ("2"
                                                                                                                                                                    (hide
                                                                                                                                                                     2)
                                                                                                                                                                    (("2"
                                                                                                                                                                      (skosimp)
                                                                                                                                                                      (("2"
                                                                                                                                                                        (expand
                                                                                                                                                                         "o")
                                                                                                                                                                        (("2"
                                                                                                                                                                          (expand
                                                                                                                                                                           "HH")
                                                                                                                                                                          (("2"
                                                                                                                                                                            (inst
                                                                                                                                                                             -5
                                                                                                                                                                             "j!1")
                                                                                                                                                                            (("2"
                                                                                                                                                                              (lemma
                                                                                                                                                                               "contraction_integral[T1,S1]"
                                                                                                                                                                               ("A"
                                                                                                                                                                                "X!1"
                                                                                                                                                                                "f"
                                                                                                                                                                                "GG(j!1)"
                                                                                                                                                                                "mu"
                                                                                                                                                                                "mu"))
                                                                                                                                                                              (("2"
                                                                                                                                                                                (propax)
                                                                                                                                                                                nil
                                                                                                                                                                                nil))
                                                                                                                                                                              nil))
                                                                                                                                                                            nil))
                                                                                                                                                                          nil))
                                                                                                                                                                        nil))
                                                                                                                                                                      nil))
                                                                                                                                                                    nil)
                                                                                                                                                                   ("3"
                                                                                                                                                                    (propax)
                                                                                                                                                                    nil
                                                                                                                                                                    nil))
                                                                                                                                                                  nil))
                                                                                                                                                                nil)
                                                                                                                                                               ("2"
                                                                                                                                                                (expand
                                                                                                                                                                 "HH")
                                                                                                                                                                (("2"
                                                                                                                                                                  (expand
                                                                                                                                                                   "*")
                                                                                                                                                                  (("2"
                                                                                                                                                                    (hide-all-but
                                                                                                                                                                     (-5
                                                                                                                                                                      1))
                                                                                                                                                                    (("2"
                                                                                                                                                                      (skosimp)
                                                                                                                                                                      (("2"
                                                                                                                                                                        (inst
                                                                                                                                                                         -
                                                                                                                                                                         "j!1"
                                                                                                                                                                         "x!1")
                                                                                                                                                                        (("2"
                                                                                                                                                                          (expand
                                                                                                                                                                           "phi")
                                                                                                                                                                          (("2"
                                                                                                                                                                            (lift-if
                                                                                                                                                                             1)
                                                                                                                                                                            (("2"
                                                                                                                                                                              (assert)
                                                                                                                                                                              nil
                                                                                                                                                                              nil))
                                                                                                                                                                            nil))
                                                                                                                                                                          nil))
                                                                                                                                                                        nil))
                                                                                                                                                                      nil))
                                                                                                                                                                    nil))
                                                                                                                                                                  nil))
                                                                                                                                                                nil))
                                                                                                                                                              nil)
                                                                                                                                                             ("2"
                                                                                                                                                              (hide-all-but
                                                                                                                                                               (1
                                                                                                                                                                -5))
                                                                                                                                                              (("2"
                                                                                                                                                                (skosimp)
                                                                                                                                                                (("2"
                                                                                                                                                                  (inst
                                                                                                                                                                   -
                                                                                                                                                                   "j!1")
                                                                                                                                                                  (("2"
                                                                                                                                                                    (lemma
                                                                                                                                                                     "contraction_integrable[T1,S1]"
                                                                                                                                                                     ("mu"
                                                                                                                                                                      "mu"
                                                                                                                                                                      "A"
                                                                                                                                                                      "X!1"
                                                                                                                                                                      "f"
                                                                                                                                                                      "GG(j!1)"))
                                                                                                                                                                    (("1"
                                                                                                                                                                      (expand
                                                                                                                                                                       "HH")
                                                                                                                                                                      (("1"
                                                                                                                                                                        (assert)
                                                                                                                                                                        nil
                                                                                                                                                                        nil))
                                                                                                                                                                      nil)
                                                                                                                                                                     ("2"
                                                                                                                                                                      (lemma
                                                                                                                                                                       "integrable_is_measurable[T1, S1, contraction(mu, X!1)]")
                                                                                                                                                                      (("2"
                                                                                                                                                                        (inst
                                                                                                                                                                         -
                                                                                                                                                                         "GG(j!1)")
                                                                                                                                                                        nil
                                                                                                                                                                        nil))
                                                                                                                                                                      nil))
                                                                                                                                                                    nil))
                                                                                                                                                                  nil))
                                                                                                                                                                nil))
                                                                                                                                                              nil))
                                                                                                                                                            nil))
                                                                                                                                                          nil))
                                                                                                                                                        nil)
                                                                                                                                                       ("2"
                                                                                                                                                        (hide-all-but
                                                                                                                                                         (1
                                                                                                                                                          -7
                                                                                                                                                          -1))
                                                                                                                                                        (("2"
                                                                                                                                                          (expand
                                                                                                                                                           "ae_nonneg?")
                                                                                                                                                          (("2"
                                                                                                                                                            (expand
                                                                                                                                                             "ae_eq?")
                                                                                                                                                            (("2"
                                                                                                                                                              (expand
                                                                                                                                                               "restrict")
                                                                                                                                                              (("2"
                                                                                                                                                                (expand
                                                                                                                                                                 "pointwise_ae?")
                                                                                                                                                                (("2"
                                                                                                                                                                  (expand
                                                                                                                                                                   "ae?")
                                                                                                                                                                  (("2"
                                                                                                                                                                    (expand
                                                                                                                                                                     "fullset")
                                                                                                                                                                    (("2"
                                                                                                                                                                      (expand
                                                                                                                                                                       "ae_in?")
                                                                                                                                                                      (("2"
                                                                                                                                                                        (skosimp*)
                                                                                                                                                                        (("2"
                                                                                                                                                                          (inst
                                                                                                                                                                           +
                                                                                                                                                                           "union(E!2,E!3)")
                                                                                                                                                                          (("2"
                                                                                                                                                                            (skosimp)
                                                                                                                                                                            (("2"
                                                                                                                                                                              (inst
                                                                                                                                                                               -
                                                                                                                                                                               "x!1")
                                                                                                                                                                              (("2"
                                                                                                                                                                                (inst
                                                                                                                                                                                 -
                                                                                                                                                                                 "x!1")
                                                                                                                                                                                (("2"
                                                                                                                                                                                  (expand
                                                                                                                                                                                   "union")
                                                                                                                                                                                  (("2"
                                                                                                                                                                                    (expand
                                                                                                                                                                                     "member")
                                                                                                                                                                                    (("2"
                                                                                                                                                                                      (flatten)
                                                                                                                                                                                      (("2"
                                                                                                                                                                                        (assert)
                                                                                                                                                                                        (("2"
                                                                                                                                                                                          (expand
                                                                                                                                                                                           "plus")
                                                                                                                                                                                          (("2"
                                                                                                                                                                                            (expand
                                                                                                                                                                                             "max")
                                                                                                                                                                                            (("2"
                                                                                                                                                                                              (expand
                                                                                                                                                                                               "x_eq")
                                                                                                                                                                                              (("2"
                                                                                                                                                                                                (flatten)
                                                                                                                                                                                                (("2"
                                                                                                                                                                                                  (expand
                                                                                                                                                                                                   "*")
                                                                                                                                                                                                  (("2"
                                                                                                                                                                                                    (expand
                                                                                                                                                                                                     "phi")
                                                                                                                                                                                                    (("2"
                                                                                                                                                                                                      (expand
                                                                                                                                                                                                       "member")
                                                                                                                                                                                                      (("2"
                                                                                                                                                                                                        (lift-if
                                                                                                                                                                                                         3)
                                                                                                                                                                                                        (("2"
                                                                                                                                                                                                          (assert)
                                                                                                                                                                                                          (("2"
                                                                                                                                                                                                            (prop)
                                                                                                                                                                                                            (("2"
                                                                                                                                                                                                              (expand
                                                                                                                                                                                                               "EE")
                                                                                                                                                                                                              (("2"
                                                                                                                                                                                                                (expand
                                                                                                                                                                                                                 "cross_product")
                                                                                                                                                                                                                (("2"
                                                                                                                                                                                                                  (expand
                                                                                                                                                                                                                   "intersection")
                                                                                                                                                                                                                  (("2"
                                                                                                                                                                                                                    (expand
                                                                                                                                                                                                                     "x_section")
                                                                                                                                                                                                                    (("2"
                                                                                                                                                                                                                      (expand
                                                                                                                                                                                                                       "member")
                                                                                                                                                                                                                      (("2"
                                                                                                                                                                                                                        (assert)
                                                                                                                                                                                                                        (("2"
                                                                                                                                                                                                                          (typepred
                                                                                                                                                                                                                           "nu")
                                                                                                                                                                                                                          (("2"
                                                                                                                                                                                                                            (expand
                                                                                                                                                                                                                             "sigma_finite_measure?")
                                                                                                                                                                                                                            (("2"
                                                                                                                                                                                                                              (expand
                                                                                                                                                                                                                               "measure?")
                                                                                                                                                                                                                              (("2"
                                                                                                                                                                                                                                (flatten)
                                                                                                                                                                                                                                (("2"
                                                                                                                                                                                                                                  (expand
                                                                                                                                                                                                                                   "measure_empty?")
                                                                                                                                                                                                                                  (("2"
                                                                                                                                                                                                                                    (expand
                                                                                                                                                                                                                                     "emptyset")
                                                                                                                                                                                                                                    (("2"
                                                                                                                                                                                                                                      (assert)
                                                                                                                                                                                                                                      (("2"
                                                                                                                                                                                                                                        (replace
                                                                                                                                                                                                                                         -1)
                                                                                                                                                                                                                                        (("2"
                                                                                                                                                                                                                                          (assert)
                                                                                                                                                                                                                                          nil
                                                                                                                                                                                                                                          nil))
                                                                                                                                                                                                                                        nil))
                                                                                                                                                                                                                                      nil))
                                                                                                                                                                                                                                    nil))
                                                                                                                                                                                                                                  nil))
                                                                                                                                                                                                                                nil))
                                                                                                                                                                                                                              nil))
                                                                                                                                                                                                                            nil))
                                                                                                                                                                                                                          nil))
                                                                                                                                                                                                                        nil))
                                                                                                                                                                                                                      nil))
                                                                                                                                                                                                                    nil))
                                                                                                                                                                                                                  nil))
                                                                                                                                                                                                                nil))
                                                                                                                                                                                                              nil))
                                                                                                                                                                                                            nil))
                                                                                                                                                                                                          nil))
                                                                                                                                                                                                        nil))
                                                                                                                                                                                                      nil))
                                                                                                                                                                                                    nil))
                                                                                                                                                                                                  nil))
                                                                                                                                                                                                nil))
                                                                                                                                                                                              nil))
                                                                                                                                                                                            nil))
                                                                                                                                                                                          nil))
                                                                                                                                                                                        nil))
                                                                                                                                                                                      nil))
                                                                                                                                                                                    nil))
                                                                                                                                                                                  nil))
                                                                                                                                                                                nil))
                                                                                                                                                                              nil))
                                                                                                                                                                            nil))
                                                                                                                                                                          nil))
                                                                                                                                                                        nil))
                                                                                                                                                                      nil))
                                                                                                                                                                    nil))
                                                                                                                                                                  nil))
                                                                                                                                                                nil))
                                                                                                                                                              nil))
                                                                                                                                                            nil))
                                                                                                                                                          nil))
                                                                                                                                                        nil))
                                                                                                                                                      nil)
                                                                                                                                                     ("2"
                                                                                                                                                      (hide-all-but
                                                                                                                                                       (1
                                                                                                                                                        -9
                                                                                                                                                        -10
                                                                                                                                                        -26))
                                                                                                                                                      (("2"
                                                                                                                                                        (expand
                                                                                                                                                         "ae_increasing?")
                                                                                                                                                        (("2"
                                                                                                                                                          (expand
                                                                                                                                                           "ae_convergence?")
                                                                                                                                                          (("2"
                                                                                                                                                            (expand
                                                                                                                                                             "ae_convergence_in?")
                                                                                                                                                            (("2"
                                                                                                                                                              (expand
                                                                                                                                                               "ae_nonneg?")
                                                                                                                                                              (("2"
                                                                                                                                                                (expand
                                                                                                                                                                 "pointwise_ae?")
                                                                                                                                                                (("2"
                                                                                                                                                                  (expand
                                                                                                                                                                   "ae?")
                                                                                                                                                                  (("2"
                                                                                                                                                                    (expand
                                                                                                                                                                     "fullset")
                                                                                                                                                                    (("2"
                                                                                                                                                                      (expand
                                                                                                                                                                       "ae_in?")
                                                                                                                                                                      (("2"
                                                                                                                                                                        (skosimp*)
                                                                                                                                                                        (("2"
                                                                                                                                                                          (inst
                                                                                                                                                                           +
                                                                                                                                                                           "union(E!2,E!3)")
                                                                                                                                                                          (("2"
                                                                                                                                                                            (skosimp)
                                                                                                                                                                            (("2"
                                                                                                                                                                              (inst
                                                                                                                                                                               -
                                                                                                                                                                               "x!1")
                                                                                                                                                                              (("2"
                                                                                                                                                                                (inst
                                                                                                                                                                                 -
                                                                                                                                                                                 "x!1")
                                                                                                                                                                                (("2"
                                                                                                                                                                                  (expand
                                                                                                                                                                                   "union")
                                                                                                                                                                                  (("2"
                                                                                                                                                                                    (expand
                                                                                                                                                                                     "member")
                                                                                                                                                                                    (("2"
                                                                                                                                                                                      (flatten)
                                                                                                                                                                                      (("2"
                                                                                                                                                                                        (assert)
                                                                                                                                                                                        (("2"
                                                                                                                                                                                          (rewrite
                                                                                                                                                                                           "metric_convergence_def")
                                                                                                                                                                                          (("2"
                                                                                                                                                                                            (expand
                                                                                                                                                                                             "metric_converges_to")
                                                                                                                                                                                            (("2"
                                                                                                                                                                                              (inst
                                                                                                                                                                                               -3
                                                                                                                                                                                               "0"
                                                                                                                                                                                               "x!1")
                                                                                                                                                                                              (("2"
                                                                                                                                                                                                (inst
                                                                                                                                                                                                 -
                                                                                                                                                                                                 "F(0)(x!1)-f!1(x!1)")
                                                                                                                                                                                                (("1"
                                                                                                                                                                                                  (skosimp)
                                                                                                                                                                                                  (("1"
                                                                                                                                                                                                    (inst
                                                                                                                                                                                                     -
                                                                                                                                                                                                     "0"
                                                                                                                                                                                                     "n!1")
                                                                                                                                                                                                    (("1"
                                                                                                                                                                                                      (inst
                                                                                                                                                                                                       -
                                                                                                                                                                                                       "n!1")
                                                                                                                                                                                                      (("1"
                                                                                                                                                                                                        (expand
                                                                                                                                                                                                         "FF"
                                                                                                                                                                                                         -1
                                                                                                                                                                                                         1)
                                                                                                                                                                                                        (("1"
                                                                                                                                                                                                          (expand
                                                                                                                                                                                                           "series")
                                                                                                                                                                                                          (("1"
                                                                                                                                                                                                            (expand
                                                                                                                                                                                                             "sigma")
                                                                                                                                                                                                            (("1"
                                                                                                                                                                                                              (assert)
                                                                                                                                                                                                              (("1"
                                                                                                                                                                                                                (expand
                                                                                                                                                                                                                 "ball")
                                                                                                                                                                                                                (("1"
                                                                                                                                                                                                                  (assert)
                                                                                                                                                                                                                  nil
                                                                                                                                                                                                                  nil))
                                                                                                                                                                                                                nil))
                                                                                                                                                                                                              nil))
                                                                                                                                                                                                            nil))
                                                                                                                                                                                                          nil))
                                                                                                                                                                                                        nil))
                                                                                                                                                                                                      nil))
                                                                                                                                                                                                    nil))
                                                                                                                                                                                                  nil)
                                                                                                                                                                                                 ("2"
                                                                                                                                                                                                  (assert)
                                                                                                                                                                                                  nil
                                                                                                                                                                                                  nil))
                                                                                                                                                                                                nil))
                                                                                                                                                                                              nil))
                                                                                                                                                                                            nil))
                                                                                                                                                                                          nil))
                                                                                                                                                                                        nil))
                                                                                                                                                                                      nil))
                                                                                                                                                                                    nil))
                                                                                                                                                                                  nil))
                                                                                                                                                                                nil))
                                                                                                                                                                              nil))
                                                                                                                                                                            nil))
                                                                                                                                                                          nil))
                                                                                                                                                                        nil))
                                                                                                                                                                      nil))
                                                                                                                                                                    nil))
                                                                                                                                                                  nil))
                                                                                                                                                                nil))
                                                                                                                                                              nil))
                                                                                                                                                            nil))
                                                                                                                                                          nil))
                                                                                                                                                        nil))
                                                                                                                                                      nil))
                                                                                                                                                    nil))
                                                                                                                                                  nil)
                                                                                                                                                 ("2"
                                                                                                                                                  (expand
                                                                                                                                                   "converges_upto?")
                                                                                                                                                  (("2"
                                                                                                                                                    (flatten)
                                                                                                                                                    (("2"
                                                                                                                                                      (name-replace
                                                                                                                                                       "SS"
                                                                                                                                                       "integral[T1, S1, mu] o FF")
                                                                                                                                                      (("2"
                                                                                                                                                        (name-replace
                                                                                                                                                         "RHS"
                                                                                                                                                         "integral[T1, S1, mu](f!1)")
                                                                                                                                                        (("2"
                                                                                                                                                          (hide-all-but
                                                                                                                                                           (1
                                                                                                                                                            -11
                                                                                                                                                            -15))
                                                                                                                                                          (("2"
                                                                                                                                                            (lemma
                                                                                                                                                             "convergence_sequences.unique_limit"
                                                                                                                                                             ("u"
                                                                                                                                                              "SS"
                                                                                                                                                              "l1"
                                                                                                                                                              "l!1"
                                                                                                                                                              "l2"
                                                                                                                                                              "RHS"))
                                                                                                                                                            (("2"
                                                                                                                                                              (assert)
                                                                                                                                                              (("2"
                                                                                                                                                                (hide
                                                                                                                                                                 -2
                                                                                                                                                                 2)
                                                                                                                                                                (("2"
                                                                                                                                                                  (expand
                                                                                                                                                                   "convergence")
                                                                                                                                                                  (("2"
                                                                                                                                                                    (rewrite
                                                                                                                                                                     "metric_convergence_def")
                                                                                                                                                                    (("2"
                                                                                                                                                                      (expand
                                                                                                                                                                       "metric_converges_to")
                                                                                                                                                                      (("2"
                                                                                                                                                                        (skosimp)
                                                                                                                                                                        (("2"
                                                                                                                                                                          (inst
                                                                                                                                                                           -
                                                                                                                                                                           "epsilon!1")
                                                                                                                                                                          (("2"
                                                                                                                                                                            (skosimp)
                                                                                                                                                                            (("2"
                                                                                                                                                                              (inst
                                                                                                                                                                               +
                                                                                                                                                                               "n!1")
                                                                                                                                                                              (("2"
                                                                                                                                                                                (skosimp)
                                                                                                                                                                                (("2"
                                                                                                                                                                                  (inst
                                                                                                                                                                                   -
                                                                                                                                                                                   "i!1")
--> --------------------

--> maximum size reached

--> --------------------

Messung V0.5 in Prozent
C=100 H=96 G=97

¤ Dauer der Verarbeitung: 0.464 Sekunden  (vorverarbeitet am  2026-04-28) ¤

*© Formatika GbR, Deutschland






Wurzel

Suchen

Beweissystem der NASA

Beweissystem Isabelle

NIST Cobol Testsuite

Cephes Mathematical Library

Wiener Entwicklungsmethode

Haftungshinweis

Die Informationen auf dieser Webseite wurden nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit, noch Qualität der bereit gestellten Informationen zugesichert.

Bemerkung:

Die farbliche Syntaxdarstellung und die Messung sind noch experimentell.






                                                                                                                                                                                                                                                                                                                                                                                                     


Neuigkeiten

     Aktuelles
     Motto des Tages

Software

     Produkte
     Quellcodebibliothek

Aktivitäten

     Artikel über Sicherheit
     Anleitung zur Aktivierung von SSL

Muße

     Gedichte
     Musik
     Bilder

Jenseits des Üblichen ....

Besucherstatistik

Besucherstatistik

Monitoring

Montastic status badge