qpms/besseltransforms/6-3-3

3 lines
1.2 KiB
Plaintext
Raw Normal View History

((3*k^4 + 4*k^2*(3 - 2*Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^2 - 8*(-1 + Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^4)/(24*k^3) - (3*k^4 + 4*k^2*(3 - 2*Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^2 - 8*(-1 + Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^4)/(4*k^3) + (5*(3*k^4 + 4*k^2*(3 - 2*Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^2 - 8*(-1 + Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^4))/(8*k^3) - (5*(3*k^4 + 4*k^2*(3 - 2*Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^2 - 8*(-1 + Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^4))/(6*k^3) + (5*(3*k^4 + 4*k^2*(3 - 2*Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^2 - 8*(-1 + Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^4))/(8*k^3) - (3*k^4 + 4*k^2*(3 - 2*Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0)^2 - 8*(-1 + Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0)^4)/(4*k^3) + (3*k^4 + 4*k^2*(3 - 2*Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0)^2 - 8*(-1 + Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0)^4)/(24*k^3))/k0^3
SeriesData[k, Infinity, {(420*c^7)/k0^3 - ((105*I)*c^6)/k0^2, 0, (-945*I)/2*c^6 - (33075*c^9)/k0^3 + ((93555*I)/4*c^8)/k0^2 + (5670*c^7)/k0, 0, (10395*(2716*c^11 - (3047*I)*c^10*k0 - 1400*c^9*k0^2 + (330*I)*c^8*k0^3 + 40*c^7*k0^4 - (2*I)*c^6*k0^5))/(16*k0^3)}, 6, 11, 1]