3.195 \(\int \frac{\cos (\frac{1}{2} b^2 \pi x^2) \text{FresnelC}(b x)}{x^7} \, dx\)

Optimal. Leaf size=240 \[ \frac{1}{48} \pi ^3 b^6 \text{Unintegrable}\left (\frac{\text{FresnelC}(b x) \sin \left (\frac{1}{2} \pi b^2 x^2\right )}{x},x\right )+\frac{\pi b^2 \text{FresnelC}(b x) \sin \left (\frac{1}{2} \pi b^2 x^2\right )}{24 x^4}+\frac{\pi ^2 b^4 \text{FresnelC}(b x) \cos \left (\frac{1}{2} \pi b^2 x^2\right )}{48 x^2}-\frac{\text{FresnelC}(b x) \cos \left (\frac{1}{2} \pi b^2 x^2\right )}{6 x^6}+\frac{1}{45} \sqrt{2} \pi ^3 b^6 S\left (\sqrt{2} b x\right )+\frac{7 \pi ^3 b^6 S\left (\sqrt{2} b x\right )}{144 \sqrt{2}}+\frac{13 \pi b^3 \sin \left (\pi b^2 x^2\right )}{720 x^3}+\frac{67 \pi ^2 b^5 \cos \left (\pi b^2 x^2\right )}{1440 x}-\frac{b \cos \left (\pi b^2 x^2\right )}{60 x^5}+\frac{\pi ^2 b^5}{96 x}-\frac{b}{60 x^5} \]

[Out]

-b/(60*x^5) + (b^5*Pi^2)/(96*x) - (b*Cos[b^2*Pi*x^2])/(60*x^5) + (67*b^5*Pi^2*Cos[b^2*Pi*x^2])/(1440*x) - (Cos
[(b^2*Pi*x^2)/2]*FresnelC[b*x])/(6*x^6) + (b^4*Pi^2*Cos[(b^2*Pi*x^2)/2]*FresnelC[b*x])/(48*x^2) + (7*b^6*Pi^3*
FresnelS[Sqrt[2]*b*x])/(144*Sqrt[2]) + (Sqrt[2]*b^6*Pi^3*FresnelS[Sqrt[2]*b*x])/45 + (b^2*Pi*FresnelC[b*x]*Sin
[(b^2*Pi*x^2)/2])/(24*x^4) + (13*b^3*Pi*Sin[b^2*Pi*x^2])/(720*x^3) + (b^6*Pi^3*Unintegrable[(FresnelC[b*x]*Sin
[(b^2*Pi*x^2)/2])/x, x])/48

________________________________________________________________________________________

Rubi [A]  time = 0.20372, antiderivative size = 0, normalized size of antiderivative = 0., number of steps used = 0, number of rules used = 0, integrand size = 0, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0., Rules used = {} \[ \int \frac{\cos \left (\frac{1}{2} b^2 \pi x^2\right ) \text{FresnelC}(b x)}{x^7} \, dx \]

Verification is Not applicable to the result.

[In]

Int[(Cos[(b^2*Pi*x^2)/2]*FresnelC[b*x])/x^7,x]

[Out]

-b/(60*x^5) + (b^5*Pi^2)/(96*x) - (b*Cos[b^2*Pi*x^2])/(60*x^5) + (67*b^5*Pi^2*Cos[b^2*Pi*x^2])/(1440*x) - (Cos
[(b^2*Pi*x^2)/2]*FresnelC[b*x])/(6*x^6) + (b^4*Pi^2*Cos[(b^2*Pi*x^2)/2]*FresnelC[b*x])/(48*x^2) + (7*b^6*Pi^3*
FresnelS[Sqrt[2]*b*x])/(144*Sqrt[2]) + (Sqrt[2]*b^6*Pi^3*FresnelS[Sqrt[2]*b*x])/45 + (b^2*Pi*FresnelC[b*x]*Sin
[(b^2*Pi*x^2)/2])/(24*x^4) + (13*b^3*Pi*Sin[b^2*Pi*x^2])/(720*x^3) + (b^6*Pi^3*Defer[Int][(FresnelC[b*x]*Sin[(
b^2*Pi*x^2)/2])/x, x])/48

Rubi steps

\begin{align*} \int \frac{\cos \left (\frac{1}{2} b^2 \pi x^2\right ) C(b x)}{x^7} \, dx &=-\frac{b}{60 x^5}-\frac{\cos \left (\frac{1}{2} b^2 \pi x^2\right ) C(b x)}{6 x^6}+\frac{1}{12} b \int \frac{\cos \left (b^2 \pi x^2\right )}{x^6} \, dx-\frac{1}{6} \left (b^2 \pi \right ) \int \frac{C(b x) \sin \left (\frac{1}{2} b^2 \pi x^2\right )}{x^5} \, dx\\ &=-\frac{b}{60 x^5}-\frac{b \cos \left (b^2 \pi x^2\right )}{60 x^5}-\frac{\cos \left (\frac{1}{2} b^2 \pi x^2\right ) C(b x)}{6 x^6}+\frac{b^2 \pi C(b x) \sin \left (\frac{1}{2} b^2 \pi x^2\right )}{24 x^4}-\frac{1}{48} \left (b^3 \pi \right ) \int \frac{\sin \left (b^2 \pi x^2\right )}{x^4} \, dx-\frac{1}{30} \left (b^3 \pi \right ) \int \frac{\sin \left (b^2 \pi x^2\right )}{x^4} \, dx-\frac{1}{24} \left (b^4 \pi ^2\right ) \int \frac{\cos \left (\frac{1}{2} b^2 \pi x^2\right ) C(b x)}{x^3} \, dx\\ &=-\frac{b}{60 x^5}+\frac{b^5 \pi ^2}{96 x}-\frac{b \cos \left (b^2 \pi x^2\right )}{60 x^5}-\frac{\cos \left (\frac{1}{2} b^2 \pi x^2\right ) C(b x)}{6 x^6}+\frac{b^4 \pi ^2 \cos \left (\frac{1}{2} b^2 \pi x^2\right ) C(b x)}{48 x^2}+\frac{b^2 \pi C(b x) \sin \left (\frac{1}{2} b^2 \pi x^2\right )}{24 x^4}+\frac{13 b^3 \pi \sin \left (b^2 \pi x^2\right )}{720 x^3}-\frac{1}{96} \left (b^5 \pi ^2\right ) \int \frac{\cos \left (b^2 \pi x^2\right )}{x^2} \, dx-\frac{1}{72} \left (b^5 \pi ^2\right ) \int \frac{\cos \left (b^2 \pi x^2\right )}{x^2} \, dx-\frac{1}{45} \left (b^5 \pi ^2\right ) \int \frac{\cos \left (b^2 \pi x^2\right )}{x^2} \, dx+\frac{1}{48} \left (b^6 \pi ^3\right ) \int \frac{C(b x) \sin \left (\frac{1}{2} b^2 \pi x^2\right )}{x} \, dx\\ &=-\frac{b}{60 x^5}+\frac{b^5 \pi ^2}{96 x}-\frac{b \cos \left (b^2 \pi x^2\right )}{60 x^5}+\frac{67 b^5 \pi ^2 \cos \left (b^2 \pi x^2\right )}{1440 x}-\frac{\cos \left (\frac{1}{2} b^2 \pi x^2\right ) C(b x)}{6 x^6}+\frac{b^4 \pi ^2 \cos \left (\frac{1}{2} b^2 \pi x^2\right ) C(b x)}{48 x^2}+\frac{b^2 \pi C(b x) \sin \left (\frac{1}{2} b^2 \pi x^2\right )}{24 x^4}+\frac{13 b^3 \pi \sin \left (b^2 \pi x^2\right )}{720 x^3}+\frac{1}{48} \left (b^6 \pi ^3\right ) \int \frac{C(b x) \sin \left (\frac{1}{2} b^2 \pi x^2\right )}{x} \, dx+\frac{1}{48} \left (b^7 \pi ^3\right ) \int \sin \left (b^2 \pi x^2\right ) \, dx+\frac{1}{36} \left (b^7 \pi ^3\right ) \int \sin \left (b^2 \pi x^2\right ) \, dx+\frac{1}{45} \left (2 b^7 \pi ^3\right ) \int \sin \left (b^2 \pi x^2\right ) \, dx\\ &=-\frac{b}{60 x^5}+\frac{b^5 \pi ^2}{96 x}-\frac{b \cos \left (b^2 \pi x^2\right )}{60 x^5}+\frac{67 b^5 \pi ^2 \cos \left (b^2 \pi x^2\right )}{1440 x}-\frac{\cos \left (\frac{1}{2} b^2 \pi x^2\right ) C(b x)}{6 x^6}+\frac{b^4 \pi ^2 \cos \left (\frac{1}{2} b^2 \pi x^2\right ) C(b x)}{48 x^2}+\frac{7 b^6 \pi ^3 S\left (\sqrt{2} b x\right )}{144 \sqrt{2}}+\frac{1}{45} \sqrt{2} b^6 \pi ^3 S\left (\sqrt{2} b x\right )+\frac{b^2 \pi C(b x) \sin \left (\frac{1}{2} b^2 \pi x^2\right )}{24 x^4}+\frac{13 b^3 \pi \sin \left (b^2 \pi x^2\right )}{720 x^3}+\frac{1}{48} \left (b^6 \pi ^3\right ) \int \frac{C(b x) \sin \left (\frac{1}{2} b^2 \pi x^2\right )}{x} \, dx\\ \end{align*}

Mathematica [A]  time = 0.0290908, size = 0, normalized size = 0. \[ \int \frac{\cos \left (\frac{1}{2} b^2 \pi x^2\right ) \text{FresnelC}(b x)}{x^7} \, dx \]

Verification is Not applicable to the result.

[In]

Integrate[(Cos[(b^2*Pi*x^2)/2]*FresnelC[b*x])/x^7,x]

[Out]

Integrate[(Cos[(b^2*Pi*x^2)/2]*FresnelC[b*x])/x^7, x]

________________________________________________________________________________________

Maple [A]  time = 0.059, size = 0, normalized size = 0. \begin{align*} \int{\frac{{\it FresnelC} \left ( bx \right ) }{{x}^{7}}\cos \left ({\frac{{b}^{2}\pi \,{x}^{2}}{2}} \right ) }\, dx \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(cos(1/2*b^2*Pi*x^2)*FresnelC(b*x)/x^7,x)

[Out]

int(cos(1/2*b^2*Pi*x^2)*FresnelC(b*x)/x^7,x)

________________________________________________________________________________________

Maxima [A]  time = 0., size = 0, normalized size = 0. \begin{align*} \int \frac{\cos \left (\frac{1}{2} \, \pi b^{2} x^{2}\right ){\rm fresnelc}\left (b x\right )}{x^{7}}\,{d x} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cos(1/2*b^2*pi*x^2)*fresnelc(b*x)/x^7,x, algorithm="maxima")

[Out]

integrate(cos(1/2*pi*b^2*x^2)*fresnelc(b*x)/x^7, x)

________________________________________________________________________________________

Fricas [A]  time = 0., size = 0, normalized size = 0. \begin{align*}{\rm integral}\left (\frac{\cos \left (\frac{1}{2} \, \pi b^{2} x^{2}\right ){\rm fresnelc}\left (b x\right )}{x^{7}}, x\right ) \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cos(1/2*b^2*pi*x^2)*fresnelc(b*x)/x^7,x, algorithm="fricas")

[Out]

integral(cos(1/2*pi*b^2*x^2)*fresnelc(b*x)/x^7, x)

________________________________________________________________________________________

Sympy [A]  time = 0., size = 0, normalized size = 0. \begin{align*} \int \frac{\cos{\left (\frac{\pi b^{2} x^{2}}{2} \right )} C\left (b x\right )}{x^{7}}\, dx \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cos(1/2*b**2*pi*x**2)*fresnelc(b*x)/x**7,x)

[Out]

Integral(cos(pi*b**2*x**2/2)*fresnelc(b*x)/x**7, x)

________________________________________________________________________________________

Giac [A]  time = 0., size = 0, normalized size = 0. \begin{align*} \int \frac{\cos \left (\frac{1}{2} \, \pi b^{2} x^{2}\right ){\rm fresnelc}\left (b x\right )}{x^{7}}\,{d x} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cos(1/2*b^2*pi*x^2)*fresnelc(b*x)/x^7,x, algorithm="giac")

[Out]

integrate(cos(1/2*pi*b^2*x^2)*fresnelc(b*x)/x^7, x)