Users' Mathboxes Mathbox for Glauco Siliprandi < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  itgcoscmulx Structured version   Visualization version   GIF version

Theorem itgcoscmulx 40185
Description: Exercise: the integral of 𝑥 ↦ cos𝑎𝑥 on an open interval. (Contributed by Glauco Siliprandi, 11-Dec-2019.)
Hypotheses
Ref Expression
itgcoscmulx.a (𝜑𝐴 ∈ ℂ)
itgcoscmulx.b (𝜑𝐵 ∈ ℝ)
itgcoscmulx.c (𝜑𝐶 ∈ ℝ)
itgcoscmulx.blec (𝜑𝐵𝐶)
itgcoscmulx.an0 (𝜑𝐴 ≠ 0)
Assertion
Ref Expression
itgcoscmulx (𝜑 → ∫(𝐵(,)𝐶)(cos‘(𝐴 · 𝑥)) d𝑥 = (((sin‘(𝐴 · 𝐶)) − (sin‘(𝐴 · 𝐵))) / 𝐴))
Distinct variable groups:   𝑥,𝐴   𝑥,𝐵   𝑥,𝐶   𝜑,𝑥

Proof of Theorem itgcoscmulx
Dummy variable 𝑦 is distinct from all other variables.
StepHypRef Expression
1 itgcoscmulx.b . . . . . . . . . . 11 (𝜑𝐵 ∈ ℝ)
2 itgcoscmulx.c . . . . . . . . . . 11 (𝜑𝐶 ∈ ℝ)
31, 2iccssred 39727 . . . . . . . . . 10 (𝜑 → (𝐵[,]𝐶) ⊆ ℝ)
43resmptd 5452 . . . . . . . . 9 (𝜑 → ((𝑦 ∈ ℝ ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴)) ↾ (𝐵[,]𝐶)) = (𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴)))
54eqcomd 2628 . . . . . . . 8 (𝜑 → (𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴)) = ((𝑦 ∈ ℝ ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴)) ↾ (𝐵[,]𝐶)))
65oveq2d 6666 . . . . . . 7 (𝜑 → (ℝ D (𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴))) = (ℝ D ((𝑦 ∈ ℝ ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴)) ↾ (𝐵[,]𝐶))))
7 ax-resscn 9993 . . . . . . . . 9 ℝ ⊆ ℂ
87a1i 11 . . . . . . . 8 (𝜑 → ℝ ⊆ ℂ)
98sselda 3603 . . . . . . . . . 10 ((𝜑𝑦 ∈ ℝ) → 𝑦 ∈ ℂ)
10 itgcoscmulx.a . . . . . . . . . . . . . 14 (𝜑𝐴 ∈ ℂ)
1110adantr 481 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ℂ) → 𝐴 ∈ ℂ)
12 simpr 477 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ℂ) → 𝑦 ∈ ℂ)
1311, 12mulcld 10060 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ℂ) → (𝐴 · 𝑦) ∈ ℂ)
1413sincld 14860 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ℂ) → (sin‘(𝐴 · 𝑦)) ∈ ℂ)
15 itgcoscmulx.an0 . . . . . . . . . . . 12 (𝜑𝐴 ≠ 0)
1615adantr 481 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ℂ) → 𝐴 ≠ 0)
1714, 11, 16divcld 10801 . . . . . . . . . 10 ((𝜑𝑦 ∈ ℂ) → ((sin‘(𝐴 · 𝑦)) / 𝐴) ∈ ℂ)
189, 17syldan 487 . . . . . . . . 9 ((𝜑𝑦 ∈ ℝ) → ((sin‘(𝐴 · 𝑦)) / 𝐴) ∈ ℂ)
19 eqid 2622 . . . . . . . . 9 (𝑦 ∈ ℝ ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴)) = (𝑦 ∈ ℝ ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴))
2018, 19fmptd 6385 . . . . . . . 8 (𝜑 → (𝑦 ∈ ℝ ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴)):ℝ⟶ℂ)
21 ssid 3624 . . . . . . . . 9 ℝ ⊆ ℝ
2221a1i 11 . . . . . . . 8 (𝜑 → ℝ ⊆ ℝ)
23 eqid 2622 . . . . . . . . 9 (TopOpen‘ℂfld) = (TopOpen‘ℂfld)
2423tgioo2 22606 . . . . . . . . 9 (topGen‘ran (,)) = ((TopOpen‘ℂfld) ↾t ℝ)
2523, 24dvres 23675 . . . . . . . 8 (((ℝ ⊆ ℂ ∧ (𝑦 ∈ ℝ ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴)):ℝ⟶ℂ) ∧ (ℝ ⊆ ℝ ∧ (𝐵[,]𝐶) ⊆ ℝ)) → (ℝ D ((𝑦 ∈ ℝ ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴)) ↾ (𝐵[,]𝐶))) = ((ℝ D (𝑦 ∈ ℝ ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴))) ↾ ((int‘(topGen‘ran (,)))‘(𝐵[,]𝐶))))
268, 20, 22, 3, 25syl22anc 1327 . . . . . . 7 (𝜑 → (ℝ D ((𝑦 ∈ ℝ ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴)) ↾ (𝐵[,]𝐶))) = ((ℝ D (𝑦 ∈ ℝ ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴))) ↾ ((int‘(topGen‘ran (,)))‘(𝐵[,]𝐶))))
27 reelprrecn 10028 . . . . . . . . . . 11 ℝ ∈ {ℝ, ℂ}
2827a1i 11 . . . . . . . . . 10 (𝜑 → ℝ ∈ {ℝ, ℂ})
299, 14syldan 487 . . . . . . . . . 10 ((𝜑𝑦 ∈ ℝ) → (sin‘(𝐴 · 𝑦)) ∈ ℂ)
3010adantr 481 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ℝ) → 𝐴 ∈ ℂ)
3130, 9mulcld 10060 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ℝ) → (𝐴 · 𝑦) ∈ ℂ)
3231coscld 14861 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ℝ) → (cos‘(𝐴 · 𝑦)) ∈ ℂ)
3330, 32mulcld 10060 . . . . . . . . . 10 ((𝜑𝑦 ∈ ℝ) → (𝐴 · (cos‘(𝐴 · 𝑦))) ∈ ℂ)
348resmptd 5452 . . . . . . . . . . . . 13 (𝜑 → ((𝑦 ∈ ℂ ↦ (sin‘(𝐴 · 𝑦))) ↾ ℝ) = (𝑦 ∈ ℝ ↦ (sin‘(𝐴 · 𝑦))))
3534eqcomd 2628 . . . . . . . . . . . 12 (𝜑 → (𝑦 ∈ ℝ ↦ (sin‘(𝐴 · 𝑦))) = ((𝑦 ∈ ℂ ↦ (sin‘(𝐴 · 𝑦))) ↾ ℝ))
3635oveq2d 6666 . . . . . . . . . . 11 (𝜑 → (ℝ D (𝑦 ∈ ℝ ↦ (sin‘(𝐴 · 𝑦)))) = (ℝ D ((𝑦 ∈ ℂ ↦ (sin‘(𝐴 · 𝑦))) ↾ ℝ)))
37 eqid 2622 . . . . . . . . . . . . . 14 (𝑦 ∈ ℂ ↦ (sin‘(𝐴 · 𝑦))) = (𝑦 ∈ ℂ ↦ (sin‘(𝐴 · 𝑦)))
3814, 37fmptd 6385 . . . . . . . . . . . . 13 (𝜑 → (𝑦 ∈ ℂ ↦ (sin‘(𝐴 · 𝑦))):ℂ⟶ℂ)
39 ssid 3624 . . . . . . . . . . . . . 14 ℂ ⊆ ℂ
4039a1i 11 . . . . . . . . . . . . 13 (𝜑 → ℂ ⊆ ℂ)
41 dvsinax 40127 . . . . . . . . . . . . . . . . 17 (𝐴 ∈ ℂ → (ℂ D (𝑦 ∈ ℂ ↦ (sin‘(𝐴 · 𝑦)))) = (𝑦 ∈ ℂ ↦ (𝐴 · (cos‘(𝐴 · 𝑦)))))
4210, 41syl 17 . . . . . . . . . . . . . . . 16 (𝜑 → (ℂ D (𝑦 ∈ ℂ ↦ (sin‘(𝐴 · 𝑦)))) = (𝑦 ∈ ℂ ↦ (𝐴 · (cos‘(𝐴 · 𝑦)))))
4342dmeqd 5326 . . . . . . . . . . . . . . 15 (𝜑 → dom (ℂ D (𝑦 ∈ ℂ ↦ (sin‘(𝐴 · 𝑦)))) = dom (𝑦 ∈ ℂ ↦ (𝐴 · (cos‘(𝐴 · 𝑦)))))
4413coscld 14861 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ ℂ) → (cos‘(𝐴 · 𝑦)) ∈ ℂ)
4511, 44mulcld 10060 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ ℂ) → (𝐴 · (cos‘(𝐴 · 𝑦))) ∈ ℂ)
4645ralrimiva 2966 . . . . . . . . . . . . . . . 16 (𝜑 → ∀𝑦 ∈ ℂ (𝐴 · (cos‘(𝐴 · 𝑦))) ∈ ℂ)
47 dmmptg 5632 . . . . . . . . . . . . . . . 16 (∀𝑦 ∈ ℂ (𝐴 · (cos‘(𝐴 · 𝑦))) ∈ ℂ → dom (𝑦 ∈ ℂ ↦ (𝐴 · (cos‘(𝐴 · 𝑦)))) = ℂ)
4846, 47syl 17 . . . . . . . . . . . . . . 15 (𝜑 → dom (𝑦 ∈ ℂ ↦ (𝐴 · (cos‘(𝐴 · 𝑦)))) = ℂ)
4943, 48eqtr2d 2657 . . . . . . . . . . . . . 14 (𝜑 → ℂ = dom (ℂ D (𝑦 ∈ ℂ ↦ (sin‘(𝐴 · 𝑦)))))
507, 49syl5sseq 3653 . . . . . . . . . . . . 13 (𝜑 → ℝ ⊆ dom (ℂ D (𝑦 ∈ ℂ ↦ (sin‘(𝐴 · 𝑦)))))
51 dvres3 23677 . . . . . . . . . . . . 13 (((ℝ ∈ {ℝ, ℂ} ∧ (𝑦 ∈ ℂ ↦ (sin‘(𝐴 · 𝑦))):ℂ⟶ℂ) ∧ (ℂ ⊆ ℂ ∧ ℝ ⊆ dom (ℂ D (𝑦 ∈ ℂ ↦ (sin‘(𝐴 · 𝑦)))))) → (ℝ D ((𝑦 ∈ ℂ ↦ (sin‘(𝐴 · 𝑦))) ↾ ℝ)) = ((ℂ D (𝑦 ∈ ℂ ↦ (sin‘(𝐴 · 𝑦)))) ↾ ℝ))
5228, 38, 40, 50, 51syl22anc 1327 . . . . . . . . . . . 12 (𝜑 → (ℝ D ((𝑦 ∈ ℂ ↦ (sin‘(𝐴 · 𝑦))) ↾ ℝ)) = ((ℂ D (𝑦 ∈ ℂ ↦ (sin‘(𝐴 · 𝑦)))) ↾ ℝ))
5342reseq1d 5395 . . . . . . . . . . . 12 (𝜑 → ((ℂ D (𝑦 ∈ ℂ ↦ (sin‘(𝐴 · 𝑦)))) ↾ ℝ) = ((𝑦 ∈ ℂ ↦ (𝐴 · (cos‘(𝐴 · 𝑦)))) ↾ ℝ))
548resmptd 5452 . . . . . . . . . . . 12 (𝜑 → ((𝑦 ∈ ℂ ↦ (𝐴 · (cos‘(𝐴 · 𝑦)))) ↾ ℝ) = (𝑦 ∈ ℝ ↦ (𝐴 · (cos‘(𝐴 · 𝑦)))))
5552, 53, 543eqtrd 2660 . . . . . . . . . . 11 (𝜑 → (ℝ D ((𝑦 ∈ ℂ ↦ (sin‘(𝐴 · 𝑦))) ↾ ℝ)) = (𝑦 ∈ ℝ ↦ (𝐴 · (cos‘(𝐴 · 𝑦)))))
5636, 55eqtrd 2656 . . . . . . . . . 10 (𝜑 → (ℝ D (𝑦 ∈ ℝ ↦ (sin‘(𝐴 · 𝑦)))) = (𝑦 ∈ ℝ ↦ (𝐴 · (cos‘(𝐴 · 𝑦)))))
5728, 29, 33, 56, 10, 15dvmptdivc 23728 . . . . . . . . 9 (𝜑 → (ℝ D (𝑦 ∈ ℝ ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴))) = (𝑦 ∈ ℝ ↦ ((𝐴 · (cos‘(𝐴 · 𝑦))) / 𝐴)))
58 iccntr 22624 . . . . . . . . . 10 ((𝐵 ∈ ℝ ∧ 𝐶 ∈ ℝ) → ((int‘(topGen‘ran (,)))‘(𝐵[,]𝐶)) = (𝐵(,)𝐶))
591, 2, 58syl2anc 693 . . . . . . . . 9 (𝜑 → ((int‘(topGen‘ran (,)))‘(𝐵[,]𝐶)) = (𝐵(,)𝐶))
6057, 59reseq12d 5397 . . . . . . . 8 (𝜑 → ((ℝ D (𝑦 ∈ ℝ ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴))) ↾ ((int‘(topGen‘ran (,)))‘(𝐵[,]𝐶))) = ((𝑦 ∈ ℝ ↦ ((𝐴 · (cos‘(𝐴 · 𝑦))) / 𝐴)) ↾ (𝐵(,)𝐶)))
61 ioossre 12235 . . . . . . . . 9 (𝐵(,)𝐶) ⊆ ℝ
62 resmpt 5449 . . . . . . . . 9 ((𝐵(,)𝐶) ⊆ ℝ → ((𝑦 ∈ ℝ ↦ ((𝐴 · (cos‘(𝐴 · 𝑦))) / 𝐴)) ↾ (𝐵(,)𝐶)) = (𝑦 ∈ (𝐵(,)𝐶) ↦ ((𝐴 · (cos‘(𝐴 · 𝑦))) / 𝐴)))
6361, 62mp1i 13 . . . . . . . 8 (𝜑 → ((𝑦 ∈ ℝ ↦ ((𝐴 · (cos‘(𝐴 · 𝑦))) / 𝐴)) ↾ (𝐵(,)𝐶)) = (𝑦 ∈ (𝐵(,)𝐶) ↦ ((𝐴 · (cos‘(𝐴 · 𝑦))) / 𝐴)))
64 elioore 12205 . . . . . . . . . . . 12 (𝑦 ∈ (𝐵(,)𝐶) → 𝑦 ∈ ℝ)
6564recnd 10068 . . . . . . . . . . 11 (𝑦 ∈ (𝐵(,)𝐶) → 𝑦 ∈ ℂ)
6665, 44sylan2 491 . . . . . . . . . 10 ((𝜑𝑦 ∈ (𝐵(,)𝐶)) → (cos‘(𝐴 · 𝑦)) ∈ ℂ)
6710adantr 481 . . . . . . . . . 10 ((𝜑𝑦 ∈ (𝐵(,)𝐶)) → 𝐴 ∈ ℂ)
6815adantr 481 . . . . . . . . . 10 ((𝜑𝑦 ∈ (𝐵(,)𝐶)) → 𝐴 ≠ 0)
6966, 67, 68divcan3d 10806 . . . . . . . . 9 ((𝜑𝑦 ∈ (𝐵(,)𝐶)) → ((𝐴 · (cos‘(𝐴 · 𝑦))) / 𝐴) = (cos‘(𝐴 · 𝑦)))
7069mpteq2dva 4744 . . . . . . . 8 (𝜑 → (𝑦 ∈ (𝐵(,)𝐶) ↦ ((𝐴 · (cos‘(𝐴 · 𝑦))) / 𝐴)) = (𝑦 ∈ (𝐵(,)𝐶) ↦ (cos‘(𝐴 · 𝑦))))
7160, 63, 703eqtrd 2660 . . . . . . 7 (𝜑 → ((ℝ D (𝑦 ∈ ℝ ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴))) ↾ ((int‘(topGen‘ran (,)))‘(𝐵[,]𝐶))) = (𝑦 ∈ (𝐵(,)𝐶) ↦ (cos‘(𝐴 · 𝑦))))
726, 26, 713eqtrd 2660 . . . . . 6 (𝜑 → (ℝ D (𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴))) = (𝑦 ∈ (𝐵(,)𝐶) ↦ (cos‘(𝐴 · 𝑦))))
7372adantr 481 . . . . 5 ((𝜑𝑥 ∈ (𝐵(,)𝐶)) → (ℝ D (𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴))) = (𝑦 ∈ (𝐵(,)𝐶) ↦ (cos‘(𝐴 · 𝑦))))
74 oveq2 6658 . . . . . . 7 (𝑦 = 𝑥 → (𝐴 · 𝑦) = (𝐴 · 𝑥))
7574fveq2d 6195 . . . . . 6 (𝑦 = 𝑥 → (cos‘(𝐴 · 𝑦)) = (cos‘(𝐴 · 𝑥)))
7675adantl 482 . . . . 5 (((𝜑𝑥 ∈ (𝐵(,)𝐶)) ∧ 𝑦 = 𝑥) → (cos‘(𝐴 · 𝑦)) = (cos‘(𝐴 · 𝑥)))
77 simpr 477 . . . . 5 ((𝜑𝑥 ∈ (𝐵(,)𝐶)) → 𝑥 ∈ (𝐵(,)𝐶))
7810adantr 481 . . . . . . 7 ((𝜑𝑥 ∈ (𝐵(,)𝐶)) → 𝐴 ∈ ℂ)
7961, 8syl5ss 3614 . . . . . . . 8 (𝜑 → (𝐵(,)𝐶) ⊆ ℂ)
8079sselda 3603 . . . . . . 7 ((𝜑𝑥 ∈ (𝐵(,)𝐶)) → 𝑥 ∈ ℂ)
8178, 80mulcld 10060 . . . . . 6 ((𝜑𝑥 ∈ (𝐵(,)𝐶)) → (𝐴 · 𝑥) ∈ ℂ)
8281coscld 14861 . . . . 5 ((𝜑𝑥 ∈ (𝐵(,)𝐶)) → (cos‘(𝐴 · 𝑥)) ∈ ℂ)
8373, 76, 77, 82fvmptd 6288 . . . 4 ((𝜑𝑥 ∈ (𝐵(,)𝐶)) → ((ℝ D (𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴)))‘𝑥) = (cos‘(𝐴 · 𝑥)))
8483eqcomd 2628 . . 3 ((𝜑𝑥 ∈ (𝐵(,)𝐶)) → (cos‘(𝐴 · 𝑥)) = ((ℝ D (𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴)))‘𝑥))
8584itgeq2dv 23548 . 2 (𝜑 → ∫(𝐵(,)𝐶)(cos‘(𝐴 · 𝑥)) d𝑥 = ∫(𝐵(,)𝐶)((ℝ D (𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴)))‘𝑥) d𝑥)
86 eqidd 2623 . . . . 5 (𝜑 → (𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴)) = (𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴)))
87 oveq2 6658 . . . . . . . 8 (𝑦 = 𝐶 → (𝐴 · 𝑦) = (𝐴 · 𝐶))
8887fveq2d 6195 . . . . . . 7 (𝑦 = 𝐶 → (sin‘(𝐴 · 𝑦)) = (sin‘(𝐴 · 𝐶)))
8988oveq1d 6665 . . . . . 6 (𝑦 = 𝐶 → ((sin‘(𝐴 · 𝑦)) / 𝐴) = ((sin‘(𝐴 · 𝐶)) / 𝐴))
9089adantl 482 . . . . 5 ((𝜑𝑦 = 𝐶) → ((sin‘(𝐴 · 𝑦)) / 𝐴) = ((sin‘(𝐴 · 𝐶)) / 𝐴))
911rexrd 10089 . . . . . 6 (𝜑𝐵 ∈ ℝ*)
922rexrd 10089 . . . . . 6 (𝜑𝐶 ∈ ℝ*)
93 itgcoscmulx.blec . . . . . 6 (𝜑𝐵𝐶)
94 ubicc2 12289 . . . . . 6 ((𝐵 ∈ ℝ*𝐶 ∈ ℝ*𝐵𝐶) → 𝐶 ∈ (𝐵[,]𝐶))
9591, 92, 93, 94syl3anc 1326 . . . . 5 (𝜑𝐶 ∈ (𝐵[,]𝐶))
962recnd 10068 . . . . . . . 8 (𝜑𝐶 ∈ ℂ)
9710, 96mulcld 10060 . . . . . . 7 (𝜑 → (𝐴 · 𝐶) ∈ ℂ)
9897sincld 14860 . . . . . 6 (𝜑 → (sin‘(𝐴 · 𝐶)) ∈ ℂ)
9998, 10, 15divcld 10801 . . . . 5 (𝜑 → ((sin‘(𝐴 · 𝐶)) / 𝐴) ∈ ℂ)
10086, 90, 95, 99fvmptd 6288 . . . 4 (𝜑 → ((𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴))‘𝐶) = ((sin‘(𝐴 · 𝐶)) / 𝐴))
101 oveq2 6658 . . . . . . . 8 (𝑦 = 𝐵 → (𝐴 · 𝑦) = (𝐴 · 𝐵))
102101fveq2d 6195 . . . . . . 7 (𝑦 = 𝐵 → (sin‘(𝐴 · 𝑦)) = (sin‘(𝐴 · 𝐵)))
103102oveq1d 6665 . . . . . 6 (𝑦 = 𝐵 → ((sin‘(𝐴 · 𝑦)) / 𝐴) = ((sin‘(𝐴 · 𝐵)) / 𝐴))
104103adantl 482 . . . . 5 ((𝜑𝑦 = 𝐵) → ((sin‘(𝐴 · 𝑦)) / 𝐴) = ((sin‘(𝐴 · 𝐵)) / 𝐴))
105 lbicc2 12288 . . . . . 6 ((𝐵 ∈ ℝ*𝐶 ∈ ℝ*𝐵𝐶) → 𝐵 ∈ (𝐵[,]𝐶))
10691, 92, 93, 105syl3anc 1326 . . . . 5 (𝜑𝐵 ∈ (𝐵[,]𝐶))
1071recnd 10068 . . . . . . . 8 (𝜑𝐵 ∈ ℂ)
10810, 107mulcld 10060 . . . . . . 7 (𝜑 → (𝐴 · 𝐵) ∈ ℂ)
109108sincld 14860 . . . . . 6 (𝜑 → (sin‘(𝐴 · 𝐵)) ∈ ℂ)
110109, 10, 15divcld 10801 . . . . 5 (𝜑 → ((sin‘(𝐴 · 𝐵)) / 𝐴) ∈ ℂ)
11186, 104, 106, 110fvmptd 6288 . . . 4 (𝜑 → ((𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴))‘𝐵) = ((sin‘(𝐴 · 𝐵)) / 𝐴))
112100, 111oveq12d 6668 . . 3 (𝜑 → (((𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴))‘𝐶) − ((𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴))‘𝐵)) = (((sin‘(𝐴 · 𝐶)) / 𝐴) − ((sin‘(𝐴 · 𝐵)) / 𝐴)))
113 coscn 24199 . . . . . . 7 cos ∈ (ℂ–cn→ℂ)
114113a1i 11 . . . . . 6 (𝜑 → cos ∈ (ℂ–cn→ℂ))
11579, 10, 40constcncfg 40084 . . . . . . 7 (𝜑 → (𝑦 ∈ (𝐵(,)𝐶) ↦ 𝐴) ∈ ((𝐵(,)𝐶)–cn→ℂ))
11679, 40idcncfg 40085 . . . . . . 7 (𝜑 → (𝑦 ∈ (𝐵(,)𝐶) ↦ 𝑦) ∈ ((𝐵(,)𝐶)–cn→ℂ))
117115, 116mulcncf 23215 . . . . . 6 (𝜑 → (𝑦 ∈ (𝐵(,)𝐶) ↦ (𝐴 · 𝑦)) ∈ ((𝐵(,)𝐶)–cn→ℂ))
118114, 117cncfmpt1f 22716 . . . . 5 (𝜑 → (𝑦 ∈ (𝐵(,)𝐶) ↦ (cos‘(𝐴 · 𝑦))) ∈ ((𝐵(,)𝐶)–cn→ℂ))
11972, 118eqeltrd 2701 . . . 4 (𝜑 → (ℝ D (𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴))) ∈ ((𝐵(,)𝐶)–cn→ℂ))
120 ioossicc 12259 . . . . . . 7 (𝐵(,)𝐶) ⊆ (𝐵[,]𝐶)
121120a1i 11 . . . . . 6 (𝜑 → (𝐵(,)𝐶) ⊆ (𝐵[,]𝐶))
122 ioombl 23333 . . . . . . 7 (𝐵(,)𝐶) ∈ dom vol
123122a1i 11 . . . . . 6 (𝜑 → (𝐵(,)𝐶) ∈ dom vol)
12410adantr 481 . . . . . . . 8 ((𝜑𝑦 ∈ (𝐵[,]𝐶)) → 𝐴 ∈ ℂ)
1253, 7syl6ss 3615 . . . . . . . . 9 (𝜑 → (𝐵[,]𝐶) ⊆ ℂ)
126125sselda 3603 . . . . . . . 8 ((𝜑𝑦 ∈ (𝐵[,]𝐶)) → 𝑦 ∈ ℂ)
127124, 126mulcld 10060 . . . . . . 7 ((𝜑𝑦 ∈ (𝐵[,]𝐶)) → (𝐴 · 𝑦) ∈ ℂ)
128127coscld 14861 . . . . . 6 ((𝜑𝑦 ∈ (𝐵[,]𝐶)) → (cos‘(𝐴 · 𝑦)) ∈ ℂ)
129125, 10, 40constcncfg 40084 . . . . . . . . 9 (𝜑 → (𝑦 ∈ (𝐵[,]𝐶) ↦ 𝐴) ∈ ((𝐵[,]𝐶)–cn→ℂ))
130125, 40idcncfg 40085 . . . . . . . . 9 (𝜑 → (𝑦 ∈ (𝐵[,]𝐶) ↦ 𝑦) ∈ ((𝐵[,]𝐶)–cn→ℂ))
131129, 130mulcncf 23215 . . . . . . . 8 (𝜑 → (𝑦 ∈ (𝐵[,]𝐶) ↦ (𝐴 · 𝑦)) ∈ ((𝐵[,]𝐶)–cn→ℂ))
132114, 131cncfmpt1f 22716 . . . . . . 7 (𝜑 → (𝑦 ∈ (𝐵[,]𝐶) ↦ (cos‘(𝐴 · 𝑦))) ∈ ((𝐵[,]𝐶)–cn→ℂ))
133 cniccibl 23607 . . . . . . 7 ((𝐵 ∈ ℝ ∧ 𝐶 ∈ ℝ ∧ (𝑦 ∈ (𝐵[,]𝐶) ↦ (cos‘(𝐴 · 𝑦))) ∈ ((𝐵[,]𝐶)–cn→ℂ)) → (𝑦 ∈ (𝐵[,]𝐶) ↦ (cos‘(𝐴 · 𝑦))) ∈ 𝐿1)
1341, 2, 132, 133syl3anc 1326 . . . . . 6 (𝜑 → (𝑦 ∈ (𝐵[,]𝐶) ↦ (cos‘(𝐴 · 𝑦))) ∈ 𝐿1)
135121, 123, 128, 134iblss 23571 . . . . 5 (𝜑 → (𝑦 ∈ (𝐵(,)𝐶) ↦ (cos‘(𝐴 · 𝑦))) ∈ 𝐿1)
13672, 135eqeltrd 2701 . . . 4 (𝜑 → (ℝ D (𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴))) ∈ 𝐿1)
137 sincn 24198 . . . . . . 7 sin ∈ (ℂ–cn→ℂ)
138137a1i 11 . . . . . 6 (𝜑 → sin ∈ (ℂ–cn→ℂ))
139138, 131cncfmpt1f 22716 . . . . 5 (𝜑 → (𝑦 ∈ (𝐵[,]𝐶) ↦ (sin‘(𝐴 · 𝑦))) ∈ ((𝐵[,]𝐶)–cn→ℂ))
140 neneq 2800 . . . . . . . 8 (𝐴 ≠ 0 → ¬ 𝐴 = 0)
141 elsni 4194 . . . . . . . . 9 (𝐴 ∈ {0} → 𝐴 = 0)
142141con3i 150 . . . . . . . 8 𝐴 = 0 → ¬ 𝐴 ∈ {0})
14315, 140, 1423syl 18 . . . . . . 7 (𝜑 → ¬ 𝐴 ∈ {0})
14410, 143eldifd 3585 . . . . . 6 (𝜑𝐴 ∈ (ℂ ∖ {0}))
145 difssd 3738 . . . . . 6 (𝜑 → (ℂ ∖ {0}) ⊆ ℂ)
146125, 144, 145constcncfg 40084 . . . . 5 (𝜑 → (𝑦 ∈ (𝐵[,]𝐶) ↦ 𝐴) ∈ ((𝐵[,]𝐶)–cn→(ℂ ∖ {0})))
147139, 146divcncf 23216 . . . 4 (𝜑 → (𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴)) ∈ ((𝐵[,]𝐶)–cn→ℂ))
1481, 2, 93, 119, 136, 147ftc2 23807 . . 3 (𝜑 → ∫(𝐵(,)𝐶)((ℝ D (𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴)))‘𝑥) d𝑥 = (((𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴))‘𝐶) − ((𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴))‘𝐵)))
14998, 109, 10, 15divsubdird 10840 . . 3 (𝜑 → (((sin‘(𝐴 · 𝐶)) − (sin‘(𝐴 · 𝐵))) / 𝐴) = (((sin‘(𝐴 · 𝐶)) / 𝐴) − ((sin‘(𝐴 · 𝐵)) / 𝐴)))
150112, 148, 1493eqtr4d 2666 . 2 (𝜑 → ∫(𝐵(,)𝐶)((ℝ D (𝑦 ∈ (𝐵[,]𝐶) ↦ ((sin‘(𝐴 · 𝑦)) / 𝐴)))‘𝑥) d𝑥 = (((sin‘(𝐴 · 𝐶)) − (sin‘(𝐴 · 𝐵))) / 𝐴))
15185, 150eqtrd 2656 1 (𝜑 → ∫(𝐵(,)𝐶)(cos‘(𝐴 · 𝑥)) d𝑥 = (((sin‘(𝐴 · 𝐶)) − (sin‘(𝐴 · 𝐵))) / 𝐴))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 384   = wceq 1483  wcel 1990  wne 2794  wral 2912  cdif 3571  wss 3574  {csn 4177  {cpr 4179   class class class wbr 4653  cmpt 4729  dom cdm 5114  ran crn 5115  cres 5116  wf 5884  cfv 5888  (class class class)co 6650  cc 9934  cr 9935  0cc0 9936   · cmul 9941  *cxr 10073  cle 10075  cmin 10266   / cdiv 10684  (,)cioo 12175  [,]cicc 12178  sincsin 14794  cosccos 14795  TopOpenctopn 16082  topGenctg 16098  fldccnfld 19746  intcnt 20821  cnccncf 22679  volcvol 23232  𝐿1cibl 23386  citg 23387   D cdv 23627
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-8 1992  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602  ax-rep 4771  ax-sep 4781  ax-nul 4789  ax-pow 4843  ax-pr 4906  ax-un 6949  ax-inf2 8538  ax-cc 9257  ax-cnex 9992  ax-resscn 9993  ax-1cn 9994  ax-icn 9995  ax-addcl 9996  ax-addrcl 9997  ax-mulcl 9998  ax-mulrcl 9999  ax-mulcom 10000  ax-addass 10001  ax-mulass 10002  ax-distr 10003  ax-i2m1 10004  ax-1ne0 10005  ax-1rid 10006  ax-rnegex 10007  ax-rrecex 10008  ax-cnre 10009  ax-pre-lttri 10010  ax-pre-lttrn 10011  ax-pre-ltadd 10012  ax-pre-mulgt0 10013  ax-pre-sup 10014  ax-addf 10015  ax-mulf 10016
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1038  df-3an 1039  df-tru 1486  df-fal 1489  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-mo 2475  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ne 2795  df-nel 2898  df-ral 2917  df-rex 2918  df-reu 2919  df-rmo 2920  df-rab 2921  df-v 3202  df-sbc 3436  df-csb 3534  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-pss 3590  df-nul 3916  df-if 4087  df-pw 4160  df-sn 4178  df-pr 4180  df-tp 4182  df-op 4184  df-uni 4437  df-int 4476  df-iun 4522  df-iin 4523  df-disj 4621  df-br 4654  df-opab 4713  df-mpt 4730  df-tr 4753  df-id 5024  df-eprel 5029  df-po 5035  df-so 5036  df-fr 5073  df-se 5074  df-we 5075  df-xp 5120  df-rel 5121  df-cnv 5122  df-co 5123  df-dm 5124  df-rn 5125  df-res 5126  df-ima 5127  df-pred 5680  df-ord 5726  df-on 5727  df-lim 5728  df-suc 5729  df-iota 5851  df-fun 5890  df-fn 5891  df-f 5892  df-f1 5893  df-fo 5894  df-f1o 5895  df-fv 5896  df-isom 5897  df-riota 6611  df-ov 6653  df-oprab 6654  df-mpt2 6655  df-of 6897  df-ofr 6898  df-om 7066  df-1st 7168  df-2nd 7169  df-supp 7296  df-wrecs 7407  df-recs 7468  df-rdg 7506  df-1o 7560  df-2o 7561  df-oadd 7564  df-omul 7565  df-er 7742  df-map 7859  df-pm 7860  df-ixp 7909  df-en 7956  df-dom 7957  df-sdom 7958  df-fin 7959  df-fsupp 8276  df-fi 8317  df-sup 8348  df-inf 8349  df-oi 8415  df-card 8765  df-acn 8768  df-cda 8990  df-pnf 10076  df-mnf 10077  df-xr 10078  df-ltxr 10079  df-le 10080  df-sub 10268  df-neg 10269  df-div 10685  df-nn 11021  df-2 11079  df-3 11080  df-4 11081  df-5 11082  df-6 11083  df-7 11084  df-8 11085  df-9 11086  df-n0 11293  df-z 11378  df-dec 11494  df-uz 11688  df-q 11789  df-rp 11833  df-xneg 11946  df-xadd 11947  df-xmul 11948  df-ioo 12179  df-ioc 12180  df-ico 12181  df-icc 12182  df-fz 12327  df-fzo 12466  df-fl 12593  df-mod 12669  df-seq 12802  df-exp 12861  df-fac 13061  df-bc 13090  df-hash 13118  df-shft 13807  df-cj 13839  df-re 13840  df-im 13841  df-sqrt 13975  df-abs 13976  df-limsup 14202  df-clim 14219  df-rlim 14220  df-sum 14417  df-ef 14798  df-sin 14800  df-cos 14801  df-struct 15859  df-ndx 15860  df-slot 15861  df-base 15863  df-sets 15864  df-ress 15865  df-plusg 15954  df-mulr 15955  df-starv 15956  df-sca 15957  df-vsca 15958  df-ip 15959  df-tset 15960  df-ple 15961  df-ds 15964  df-unif 15965  df-hom 15966  df-cco 15967  df-rest 16083  df-topn 16084  df-0g 16102  df-gsum 16103  df-topgen 16104  df-pt 16105  df-prds 16108  df-xrs 16162  df-qtop 16167  df-imas 16168  df-xps 16170  df-mre 16246  df-mrc 16247  df-acs 16249  df-mgm 17242  df-sgrp 17284  df-mnd 17295  df-submnd 17336  df-mulg 17541  df-cntz 17750  df-cmn 18195  df-psmet 19738  df-xmet 19739  df-met 19740  df-bl 19741  df-mopn 19742  df-fbas 19743  df-fg 19744  df-cnfld 19747  df-top 20699  df-topon 20716  df-topsp 20737  df-bases 20750  df-cld 20823  df-ntr 20824  df-cls 20825  df-nei 20902  df-lp 20940  df-perf 20941  df-cn 21031  df-cnp 21032  df-haus 21119  df-cmp 21190  df-tx 21365  df-hmeo 21558  df-fil 21650  df-fm 21742  df-flim 21743  df-flf 21744  df-xms 22125  df-ms 22126  df-tms 22127  df-cncf 22681  df-ovol 23233  df-vol 23234  df-mbf 23388  df-itg1 23389  df-itg2 23390  df-ibl 23391  df-itg 23392  df-0p 23437  df-limc 23630  df-dv 23631
This theorem is referenced by:  sqwvfoura  40445
  Copyright terms: Public domain W3C validator