qpms/besseltransforms/6-3-2

3 lines
1.1 KiB
Plaintext
Raw Normal View History

(-6*(((-3 + 2*Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0))/6 + ((-1 + Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^3)/(3*k^2)) + 15*(((-3 + 2*Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0))/6 + ((-1 + Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^3)/(3*k^2)) - 20*(((-3 + 2*Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0))/6 + ((-1 + Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^3)/(3*k^2)) + 15*(((-3 + 2*Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0))/6 + ((-1 + Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^3)/(3*k^2)) - 6*(((-3 + 2*Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0))/6 + ((-1 + Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0)^3)/(3*k^2)) + ((-3 + 2*Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0))/6 + ((-1 + Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^3)/(3*k^2) + ((-3 + 2*Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0))/6 + ((-1 + Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0)^3)/(3*k^2))/k0^3
SeriesData[k, Infinity, {(-15*c^6)/k0^3, 0, (315*(33*c^8 - (16*I)*c^7*k0 - 2*c^6*k0^2))/(4*k0^3), 0, (-9450*I)*c^7 - (2879415*c^10)/(16*k0^3) + ((165375*I)*c^9)/k0^2 + (467775*c^8)/(8*k0) - (4725*c^6*k0)/8}, 5, 11, 1]