3 lines
883 B
Plaintext
3 lines
883 B
Plaintext
(1/(Sqrt[1 + k^2/(c - I*k0)^2]*(c - I*k0)) - (2*(c - I*k0))/k^2 + (2*(c - I*k0))/(k^2*Sqrt[1 + k^2/(c - I*k0)^2]) - 2/(Sqrt[1 + k^2/(2*c - I*k0)^2]*(2*c - I*k0)) + 1/(Sqrt[1 + k^2/(3*c - I*k0)^2]*(3*c - I*k0)) + (6*c - (2*I)*k0)/(k^2*Sqrt[1 + k^2/(3*c - I*k0)^2]) + (-6*c + (2*I)*k0)/k^2 + (8*c - (4*I)*k0)/k^2 + (-8*c + (4*I)*k0)/(k^2*Sqrt[1 + k^2/(2*c - I*k0)^2]))/k0
|
|
SeriesData[k, Infinity, {(3*c^2)/(k*k0), 0, (-5*(25*c^4 - (24*I)*c^3*k0 - 6*c^2*k0^2))/(4*k*k0), 0, (7*(301*c^6 - (540*I)*c^5*k0 - 375*c^4*k0^2 + (120*I)*c^3*k0^3 + 15*c^2*k0^4))/(8*k*k0), 0, (-45*(3025*c^8 - (7728*I)*c^7*k0 - 8428*c^6*k0^2 + (5040*I)*c^5*k0^3 + 1750*c^4*k0^4 - (336*I)*c^3*k0^5 - 28*c^2*k0^6))/(64*k*k0), 0, (77*(28501*c^10 - (93300*I)*c^9*k0 - 136125*c^8*k0^2 + (115920*I)*c^7*k0^3 + 63210*c^6*k0^4 - (22680*I)*c^5*k0^5 - 5250*c^4*k0^6 + (720*I)*c^3*k0^7 + 45*c^2*k0^8))/(128*k*k0)}, 2, 11, 1]
|