Theorem i1fmulc 25753

Description: A nonnegative constant times a simple function gives another simple function. (Contributed by Mario Carneiro, 25-Jun-2014.)

Hypotheses

Ref	Expression
i1fmulc.2	⊢ (𝜑 → 𝐹 ∈ dom ∫1)
i1fmulc.3	⊢ (𝜑 → 𝐴 ∈ ℝ)

Assertion

Ref	Expression
i1fmulc	⊢ (𝜑 → ((ℝ × {𝐴}) ∘f · 𝐹) ∈ dom ∫1)

Proof of Theorem i1fmulc

Dummy variables 𝑤 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		reex 11158	. . . . 5 ⊢ ℝ ∈ V
2	1	a1i 11	. . . 4 ⊢ ((𝜑 ∧ 𝐴 = 0) → ℝ ∈ V)
3		i1fmulc.2	. . . . . 6 ⊢ (𝜑 → 𝐹 ∈ dom ∫1)
4		i1ff 25726	. . . . . 6 ⊢ (𝐹 ∈ dom ∫1 → 𝐹:ℝ⟶ℝ)
5	3, 4	syl 17	. . . . 5 ⊢ (𝜑 → 𝐹:ℝ⟶ℝ)
6	5	adantr 484	. . . 4 ⊢ ((𝜑 ∧ 𝐴 = 0) → 𝐹:ℝ⟶ℝ)
7		i1fmulc.3	. . . . 5 ⊢ (𝜑 → 𝐴 ∈ ℝ)
8	7	adantr 484	. . . 4 ⊢ ((𝜑 ∧ 𝐴 = 0) → 𝐴 ∈ ℝ)
9		0red 11178	. . . 4 ⊢ ((𝜑 ∧ 𝐴 = 0) → 0 ∈ ℝ)
10		simplr 778	. . . . . 6 ⊢ (((𝜑 ∧ 𝐴 = 0) ∧ 𝑥 ∈ ℝ) → 𝐴 = 0)
11	10	oveq1d 7406	. . . . 5 ⊢ (((𝜑 ∧ 𝐴 = 0) ∧ 𝑥 ∈ ℝ) → (𝐴 · 𝑥) = (0 · 𝑥))
12		mul02lem2 11354	. . . . . 6 ⊢ (𝑥 ∈ ℝ → (0 · 𝑥) = 0)
13	12	adantl 485	. . . . 5 ⊢ (((𝜑 ∧ 𝐴 = 0) ∧ 𝑥 ∈ ℝ) → (0 · 𝑥) = 0)
14	11, 13	eqtrd 2796	. . . 4 ⊢ (((𝜑 ∧ 𝐴 = 0) ∧ 𝑥 ∈ ℝ) → (𝐴 · 𝑥) = 0)
15	2, 6, 8, 9, 14	caofid2 7691	. . 3 ⊢ ((𝜑 ∧ 𝐴 = 0) → ((ℝ × {𝐴}) ∘f · 𝐹) = (ℝ × {0}))
16		i1f0 25737	. . 3 ⊢ (ℝ × {0}) ∈ dom ∫1
17	15, 16	eqeltrdi 2869	. 2 ⊢ ((𝜑 ∧ 𝐴 = 0) → ((ℝ × {𝐴}) ∘f · 𝐹) ∈ dom ∫1)
18		remulcl 11152	. . . . . 6 ⊢ ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (𝑥 · 𝑦) ∈ ℝ)
19	18	adantl 485	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) → (𝑥 · 𝑦) ∈ ℝ)
20		fconst6g 6748	. . . . . 6 ⊢ (𝐴 ∈ ℝ → (ℝ × {𝐴}):ℝ⟶ℝ)
21	7, 20	syl 17	. . . . 5 ⊢ (𝜑 → (ℝ × {𝐴}):ℝ⟶ℝ)
22	1	a1i 11	. . . . 5 ⊢ (𝜑 → ℝ ∈ V)
23		inidm 4176	. . . . 5 ⊢ (ℝ ∩ ℝ) = ℝ
24	19, 21, 5, 22, 22, 23	off 7673	. . . 4 ⊢ (𝜑 → ((ℝ × {𝐴}) ∘f · 𝐹):ℝ⟶ℝ)
25	24	adantr 484	. . 3 ⊢ ((𝜑 ∧ 𝐴 ≠ 0) → ((ℝ × {𝐴}) ∘f · 𝐹):ℝ⟶ℝ)
26		i1frn 25727	. . . . . . 7 ⊢ (𝐹 ∈ dom ∫1 → ran 𝐹 ∈ Fin)
27	3, 26	syl 17	. . . . . 6 ⊢ (𝜑 → ran 𝐹 ∈ Fin)
28		ovex 7424	. . . . . . . 8 ⊢ (𝐴 · 𝑦) ∈ V
29		eqid 2761	. . . . . . . 8 ⊢ (𝑦 ∈ ran 𝐹 ↦ (𝐴 · 𝑦)) = (𝑦 ∈ ran 𝐹 ↦ (𝐴 · 𝑦))
30	28, 29	fnmpti 6659	. . . . . . 7 ⊢ (𝑦 ∈ ran 𝐹 ↦ (𝐴 · 𝑦)) Fn ran 𝐹
31		dffn4 6779	. . . . . . 7 ⊢ ((𝑦 ∈ ran 𝐹 ↦ (𝐴 · 𝑦)) Fn ran 𝐹 ↔ (𝑦 ∈ ran 𝐹 ↦ (𝐴 · 𝑦)):ran 𝐹–onto→ran (𝑦 ∈ ran 𝐹 ↦ (𝐴 · 𝑦)))
32	30, 31	mpbi 232	. . . . . 6 ⊢ (𝑦 ∈ ran 𝐹 ↦ (𝐴 · 𝑦)):ran 𝐹–onto→ran (𝑦 ∈ ran 𝐹 ↦ (𝐴 · 𝑦))
33		fofi 9251	. . . . . 6 ⊢ ((ran 𝐹 ∈ Fin ∧ (𝑦 ∈ ran 𝐹 ↦ (𝐴 · 𝑦)):ran 𝐹–onto→ran (𝑦 ∈ ran 𝐹 ↦ (𝐴 · 𝑦))) → ran (𝑦 ∈ ran 𝐹 ↦ (𝐴 · 𝑦)) ∈ Fin)
34	27, 32, 33	sylancl 595	. . . . 5 ⊢ (𝜑 → ran (𝑦 ∈ ran 𝐹 ↦ (𝐴 · 𝑦)) ∈ Fin)
35		id 22	. . . . . . . . . . 11 ⊢ (𝑤 ∈ ran 𝐹 → 𝑤 ∈ ran 𝐹)
36		elsni 4596	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ {𝐴} → 𝑥 = 𝐴)
37	36	oveq1d 7406	. . . . . . . . . . 11 ⊢ (𝑥 ∈ {𝐴} → (𝑥 · 𝑤) = (𝐴 · 𝑤))
38		oveq2 7399	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑤 → (𝐴 · 𝑦) = (𝐴 · 𝑤))
39	38	rspceeqv 3603	. . . . . . . . . . 11 ⊢ ((𝑤 ∈ ran 𝐹 ∧ (𝑥 · 𝑤) = (𝐴 · 𝑤)) → ∃𝑦 ∈ ran 𝐹(𝑥 · 𝑤) = (𝐴 · 𝑦))
40	35, 37, 39	syl2anr 606	. . . . . . . . . 10 ⊢ ((𝑥 ∈ {𝐴} ∧ 𝑤 ∈ ran 𝐹) → ∃𝑦 ∈ ran 𝐹(𝑥 · 𝑤) = (𝐴 · 𝑦))
41		ovex 7424	. . . . . . . . . . 11 ⊢ (𝑥 · 𝑤) ∈ V
42		eqeq1 2765	. . . . . . . . . . . 12 ⊢ (𝑧 = (𝑥 · 𝑤) → (𝑧 = (𝐴 · 𝑦) ↔ (𝑥 · 𝑤) = (𝐴 · 𝑦)))
43	42	rexbidv 3185	. . . . . . . . . . 11 ⊢ (𝑧 = (𝑥 · 𝑤) → (∃𝑦 ∈ ran 𝐹 𝑧 = (𝐴 · 𝑦) ↔ ∃𝑦 ∈ ran 𝐹(𝑥 · 𝑤) = (𝐴 · 𝑦)))
44	41, 43	elab 3637	. . . . . . . . . 10 ⊢ ((𝑥 · 𝑤) ∈ {𝑧 ∣ ∃𝑦 ∈ ran 𝐹 𝑧 = (𝐴 · 𝑦)} ↔ ∃𝑦 ∈ ran 𝐹(𝑥 · 𝑤) = (𝐴 · 𝑦))
45	40, 44	sylibr 236	. . . . . . . . 9 ⊢ ((𝑥 ∈ {𝐴} ∧ 𝑤 ∈ ran 𝐹) → (𝑥 · 𝑤) ∈ {𝑧 ∣ ∃𝑦 ∈ ran 𝐹 𝑧 = (𝐴 · 𝑦)})
46	45	adantl 485	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ {𝐴} ∧ 𝑤 ∈ ran 𝐹)) → (𝑥 · 𝑤) ∈ {𝑧 ∣ ∃𝑦 ∈ ran 𝐹 𝑧 = (𝐴 · 𝑦)})
47		fconstg 6746	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ → (ℝ × {𝐴}):ℝ⟶{𝐴})
48	7, 47	syl 17	. . . . . . . 8 ⊢ (𝜑 → (ℝ × {𝐴}):ℝ⟶{𝐴})
49	5	ffnd 6687	. . . . . . . . 9 ⊢ (𝜑 → 𝐹 Fn ℝ)
50		dffn3 6699	. . . . . . . . 9 ⊢ (𝐹 Fn ℝ ↔ 𝐹:ℝ⟶ran 𝐹)
51	49, 50	sylib 220	. . . . . . . 8 ⊢ (𝜑 → 𝐹:ℝ⟶ran 𝐹)
52	46, 48, 51, 22, 22, 23	off 7673	. . . . . . 7 ⊢ (𝜑 → ((ℝ × {𝐴}) ∘f · 𝐹):ℝ⟶{𝑧 ∣ ∃𝑦 ∈ ran 𝐹 𝑧 = (𝐴 · 𝑦)})
53	52	frnd 6695	. . . . . 6 ⊢ (𝜑 → ran ((ℝ × {𝐴}) ∘f · 𝐹) ⊆ {𝑧 ∣ ∃𝑦 ∈ ran 𝐹 𝑧 = (𝐴 · 𝑦)})
54	29	rnmpt 5929	. . . . . 6 ⊢ ran (𝑦 ∈ ran 𝐹 ↦ (𝐴 · 𝑦)) = {𝑧 ∣ ∃𝑦 ∈ ran 𝐹 𝑧 = (𝐴 · 𝑦)}
55	53, 54	sseqtrrdi 3975	. . . . 5 ⊢ (𝜑 → ran ((ℝ × {𝐴}) ∘f · 𝐹) ⊆ ran (𝑦 ∈ ran 𝐹 ↦ (𝐴 · 𝑦)))
56	34, 55	ssfid 9207	. . . 4 ⊢ (𝜑 → ran ((ℝ × {𝐴}) ∘f · 𝐹) ∈ Fin)
57	56	adantr 484	. . 3 ⊢ ((𝜑 ∧ 𝐴 ≠ 0) → ran ((ℝ × {𝐴}) ∘f · 𝐹) ∈ Fin)
58	24	frnd 6695	. . . . . . . 8 ⊢ (𝜑 → ran ((ℝ × {𝐴}) ∘f · 𝐹) ⊆ ℝ)
59	58	ssdifssd 4098	. . . . . . 7 ⊢ (𝜑 → (ran ((ℝ × {𝐴}) ∘f · 𝐹) ∖ {0}) ⊆ ℝ)
60	59	adantr 484	. . . . . 6 ⊢ ((𝜑 ∧ 𝐴 ≠ 0) → (ran ((ℝ × {𝐴}) ∘f · 𝐹) ∖ {0}) ⊆ ℝ)
61	60	sselda 3934	. . . . 5 ⊢ (((𝜑 ∧ 𝐴 ≠ 0) ∧ 𝑦 ∈ (ran ((ℝ × {𝐴}) ∘f · 𝐹) ∖ {0})) → 𝑦 ∈ ℝ)
62	3, 7	i1fmulclem 25752	. . . . 5 ⊢ (((𝜑 ∧ 𝐴 ≠ 0) ∧ 𝑦 ∈ ℝ) → (◡((ℝ × {𝐴}) ∘f · 𝐹) “ {𝑦}) = (◡𝐹 “ {(𝑦 / 𝐴)}))
63	61, 62	syldan 600	. . . 4 ⊢ (((𝜑 ∧ 𝐴 ≠ 0) ∧ 𝑦 ∈ (ran ((ℝ × {𝐴}) ∘f · 𝐹) ∖ {0})) → (◡((ℝ × {𝐴}) ∘f · 𝐹) “ {𝑦}) = (◡𝐹 “ {(𝑦 / 𝐴)}))
64		i1fima 25728	. . . . . 6 ⊢ (𝐹 ∈ dom ∫1 → (◡𝐹 “ {(𝑦 / 𝐴)}) ∈ dom vol)
65	3, 64	syl 17	. . . . 5 ⊢ (𝜑 → (◡𝐹 “ {(𝑦 / 𝐴)}) ∈ dom vol)
66	65	ad2antrr 736	. . . 4 ⊢ (((𝜑 ∧ 𝐴 ≠ 0) ∧ 𝑦 ∈ (ran ((ℝ × {𝐴}) ∘f · 𝐹) ∖ {0})) → (◡𝐹 “ {(𝑦 / 𝐴)}) ∈ dom vol)
67	63, 66	eqeltrd 2861	. . 3 ⊢ (((𝜑 ∧ 𝐴 ≠ 0) ∧ 𝑦 ∈ (ran ((ℝ × {𝐴}) ∘f · 𝐹) ∖ {0})) → (◡((ℝ × {𝐴}) ∘f · 𝐹) “ {𝑦}) ∈ dom vol)
68	63	fveq2d 6866	. . . 4 ⊢ (((𝜑 ∧ 𝐴 ≠ 0) ∧ 𝑦 ∈ (ran ((ℝ × {𝐴}) ∘f · 𝐹) ∖ {0})) → (vol‘(◡((ℝ × {𝐴}) ∘f · 𝐹) “ {𝑦})) = (vol‘(◡𝐹 “ {(𝑦 / 𝐴)})))
69	3	ad2antrr 736	. . . . 5 ⊢ (((𝜑 ∧ 𝐴 ≠ 0) ∧ 𝑦 ∈ (ran ((ℝ × {𝐴}) ∘f · 𝐹) ∖ {0})) → 𝐹 ∈ dom ∫1)
70	7	ad2antrr 736	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐴 ≠ 0) ∧ 𝑦 ∈ (ran ((ℝ × {𝐴}) ∘f · 𝐹) ∖ {0})) → 𝐴 ∈ ℝ)
71		simplr 778	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐴 ≠ 0) ∧ 𝑦 ∈ (ran ((ℝ × {𝐴}) ∘f · 𝐹) ∖ {0})) → 𝐴 ≠ 0)
72	61, 70, 71	redivcld 12013	. . . . . 6 ⊢ (((𝜑 ∧ 𝐴 ≠ 0) ∧ 𝑦 ∈ (ran ((ℝ × {𝐴}) ∘f · 𝐹) ∖ {0})) → (𝑦 / 𝐴) ∈ ℝ)
73	61	recnd 11204	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐴 ≠ 0) ∧ 𝑦 ∈ (ran ((ℝ × {𝐴}) ∘f · 𝐹) ∖ {0})) → 𝑦 ∈ ℂ)
74	70	recnd 11204	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐴 ≠ 0) ∧ 𝑦 ∈ (ran ((ℝ × {𝐴}) ∘f · 𝐹) ∖ {0})) → 𝐴 ∈ ℂ)
75		eldifsni 4747	. . . . . . . 8 ⊢ (𝑦 ∈ (ran ((ℝ × {𝐴}) ∘f · 𝐹) ∖ {0}) → 𝑦 ≠ 0)
76	75	adantl 485	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐴 ≠ 0) ∧ 𝑦 ∈ (ran ((ℝ × {𝐴}) ∘f · 𝐹) ∖ {0})) → 𝑦 ≠ 0)
77	73, 74, 76, 71	divne0d 11977	. . . . . 6 ⊢ (((𝜑 ∧ 𝐴 ≠ 0) ∧ 𝑦 ∈ (ran ((ℝ × {𝐴}) ∘f · 𝐹) ∖ {0})) → (𝑦 / 𝐴) ≠ 0)
78		eldifsn 4743	. . . . . 6 ⊢ ((𝑦 / 𝐴) ∈ (ℝ ∖ {0}) ↔ ((𝑦 / 𝐴) ∈ ℝ ∧ (𝑦 / 𝐴) ≠ 0))
79	72, 77, 78	sylanbrc 592	. . . . 5 ⊢ (((𝜑 ∧ 𝐴 ≠ 0) ∧ 𝑦 ∈ (ran ((ℝ × {𝐴}) ∘f · 𝐹) ∖ {0})) → (𝑦 / 𝐴) ∈ (ℝ ∖ {0}))
80		i1fima2sn 25730	. . . . 5 ⊢ ((𝐹 ∈ dom ∫1 ∧ (𝑦 / 𝐴) ∈ (ℝ ∖ {0})) → (vol‘(◡𝐹 “ {(𝑦 / 𝐴)})) ∈ ℝ)
81	69, 79, 80	syl2anc 593	. . . 4 ⊢ (((𝜑 ∧ 𝐴 ≠ 0) ∧ 𝑦 ∈ (ran ((ℝ × {𝐴}) ∘f · 𝐹) ∖ {0})) → (vol‘(◡𝐹 “ {(𝑦 / 𝐴)})) ∈ ℝ)
82	68, 81	eqeltrd 2861	. . 3 ⊢ (((𝜑 ∧ 𝐴 ≠ 0) ∧ 𝑦 ∈ (ran ((ℝ × {𝐴}) ∘f · 𝐹) ∖ {0})) → (vol‘(◡((ℝ × {𝐴}) ∘f · 𝐹) “ {𝑦})) ∈ ℝ)
83	25, 57, 67, 82	i1fd 25731	. 2 ⊢ ((𝜑 ∧ 𝐴 ≠ 0) → ((ℝ × {𝐴}) ∘f · 𝐹) ∈ dom ∫1)
84	17, 83	pm2.61dane 3043	1 ⊢ (𝜑 → ((ℝ × {𝐴}) ∘f · 𝐹) ∈ dom ∫1)

Syntax hints:   → wi 4   ∧ wa 399   = wceq 1559   ∈ wcel 2141  {cab 2739   ≠ wne 2956  ∃wrex 3085  Vcvv 3453   ∖ cdif 3899   ⊆ wss 3902  {csn 4579   ↦ cmpt 5178   × cxp 5641  ^◡ccnv 5642  dom cdm 5643  ran crn 5644   “ cima 5646   Fn wfn 6511  ⟶wf 6512  –onto→wfo 6514  ‘cfv 6516  (class class class)co 7391   ∘_f cof 7653  Fincfn 8921  ℝcr 11066  0cc0 11067   · cmul 11072   / cdiv 11838  volcvol 25513  ∫₁citg1 25665

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1814  ax-4 1828  ax-5 1929  ax-6 1986  ax-7 2027  ax-8 2143  ax-9 2151  ax-10 2174  ax-11 2190  ax-12 2211  ax-ext 2733  ax-rep 5224  ax-sep 5243  ax-nul 5253  ax-pow 5319  ax-pr 5387  ax-un 7713  ax-inf2 9590  ax-cnex 11123  ax-resscn 11124  ax-1cn 11125  ax-icn 11126  ax-addcl 11127  ax-addrcl 11128  ax-mulcl 11129  ax-mulrcl 11130  ax-mulcom 11131  ax-addass 11132  ax-mulass 11133  ax-distr 11134  ax-i2m1 11135  ax-1ne0 11136  ax-1rid 11137  ax-rnegex 11138  ax-rrecex 11139  ax-cnre 11140  ax-pre-lttri 11141  ax-pre-lttrn 11142  ax-pre-ltadd 11143  ax-pre-mulgt0 11144  ax-pre-sup 11145

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1098  df-3an 1099  df-tru 1562  df-fal 1572  df-ex 1799  df-nf 1803  df-sb 2090  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3061  df-ral 3076  df-rex 3086  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3455  df-sbc 3743  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-nul 4284  df-if 4478  df-pw 4554  df-sn 4580  df-pr 4582  df-op 4586  df-uni 4863  df-int 4903  df-iun 4948  df-br 5098  df-opab 5160  df-mpt 5179  df-tr 5205  df-id 5538  df-eprel 5543  df-po 5551  df-so 5552  df-fr 5596  df-se 5597  df-we 5598  df-xp 5649  df-rel 5650  df-cnv 5651  df-co 5652  df-dm 5653  df-rn 5654  df-res 5655  df-ima 5656  df-pred 6283  df-ord 6344  df-on 6345  df-lim 6346  df-suc 6347  df-iota 6472  df-fun 6518  df-fn 6519  df-f 6520  df-f1 6521  df-fo 6522  df-f1o 6523  df-fv 6524  df-isom 6525  df-riota 7348  df-ov 7394  df-oprab 7395  df-mpo 7396  df-of 7655  df-om 7842  df-1st 7965  df-2nd 7966  df-frecs 8256  df-wrecs 8287  df-recs 8336  df-rdg 8375  df-1o 8431  df-2o 8432  df-er 8672  df-map 8804  df-pm 8805  df-en 8922  df-dom 8923  df-sdom 8924  df-fin 8925  df-sup 9382  df-inf 9383  df-oi 9452  df-dju 9853  df-card 9891  df-pnf 11212  df-mnf 11213  df-xr 11214  df-ltxr 11215  df-le 11216  df-sub 11410  df-neg 11411  df-div 11839  df-nn 12205  df-2 12274  df-3 12275  df-n0 12476  df-z 12563  df-uz 12834  df-q 12944  df-rp 12988  df-xadd 13109  df-ioo 13347  df-ico 13349  df-icc 13350  df-fz 13507  df-fzo 13654  df-fl 13796  df-seq 14009  df-exp 14069  df-hash 14338  df-cj 15117  df-re 15118  df-im 15119  df-sqrt 15253  df-abs 15254  df-clim 15506  df-sum 15705  df-xmet 21405  df-met 21406  df-ovol 25514  df-vol 25515  df-mbf 25669  df-itg1 25670

This theorem is referenced by:  itg1mulc  25754  i1fsub  25758  itg1sub  25759  itg2const  25790  itg2mulclem  25796  itg2monolem1  25800  i1fibl  25858  itgitg1  25859  itg2addnclem  38131  ftc1anclem5  38157