3 lines
566 B
Plaintext
3 lines
566 B
Plaintext
(1/(Sqrt[1 + k^2/(c - I*k0)^2]*(c - I*k0)) - 5/(Sqrt[1 + k^2/(2*c - I*k0)^2]*(2*c - I*k0)) + 10/(Sqrt[1 + k^2/(3*c - I*k0)^2]*(3*c - I*k0)) - 10/(Sqrt[1 + k^2/(4*c - I*k0)^2]*(4*c - I*k0)) + 5/(Sqrt[1 + k^2/(5*c - I*k0)^2]*(5*c - I*k0)) - 1/(Sqrt[1 + k^2/(6*c - I*k0)^2]*(6*c - I*k0)))/k0
|
|
SeriesData[k, Infinity, {((-225*I)*c^5)/k + (1575*c^6)/(2*k*k0), 0, (-3675*(189*c^8 - (152*I)*c^7*k0 - 42*c^6*k0^2 + (4*I)*c^5*k0^3))/(8*k*k0), 0, (19845*(8547*c^10 - (10870*I)*c^9*k0 - 5670*c^8*k0^2 + (1520*I)*c^7*k0^3 + 210*c^6*k0^4 - (12*I)*c^5*k0^5))/(32*k*k0)}, 6, 11, 1]
|