equal
deleted
inserted
replaced
333 *) |
333 *) |
334 |
334 |
335 lemma interval_integral_zero [simp]: |
335 lemma interval_integral_zero [simp]: |
336 fixes a b :: ereal |
336 fixes a b :: ereal |
337 shows"LBINT x=a..b. 0 = 0" |
337 shows"LBINT x=a..b. 0 = 0" |
338 using assms unfolding interval_lebesgue_integral_def einterval_eq |
338 unfolding interval_lebesgue_integral_def einterval_eq |
339 by simp |
339 by simp |
340 |
340 |
341 lemma interval_integral_const [intro, simp]: |
341 lemma interval_integral_const [intro, simp]: |
342 fixes a b c :: real |
342 fixes a b c :: real |
343 shows "interval_lebesgue_integrable lborel a b (\<lambda>x. c)" and "LBINT x=a..b. c = c * (b - a)" |
343 shows "interval_lebesgue_integrable lborel a b (\<lambda>x. c)" and "LBINT x=a..b. c = c * (b - a)" |
344 using assms unfolding interval_lebesgue_integral_def interval_lebesgue_integrable_def einterval_eq |
344 unfolding interval_lebesgue_integral_def interval_lebesgue_integrable_def einterval_eq |
345 by (auto simp add: less_imp_le field_simps measure_def) |
345 by (auto simp add: less_imp_le field_simps measure_def) |
346 |
346 |
347 lemma interval_integral_cong_AE: |
347 lemma interval_integral_cong_AE: |
348 assumes [measurable]: "f \<in> borel_measurable borel" "g \<in> borel_measurable borel" |
348 assumes [measurable]: "f \<in> borel_measurable borel" "g \<in> borel_measurable borel" |
349 assumes "AE x \<in> einterval (min a b) (max a b) in lborel. f x = g x" |
349 assumes "AE x \<in> einterval (min a b) (max a b) in lborel. f x = g x" |