3 lines
912 B
Plaintext
3 lines
912 B
Plaintext
(k^2*(-3 + 2*Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0) + 2*(-1 + Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^3 + 4*k^2*(3 - 2*Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0) - 8*(-1 + Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^3 + 6*k^2*(-3 + 2*Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0) + 12*(-1 + Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^3 + 4*k^2*(3 - 2*Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0) - 8*(-1 + Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^3 + k^2*(-3 + 2*Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0) + 2*(-1 + Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^3)/(6*k^2*k0^3)
|
|
SeriesData[k, Infinity, {(3*c^4)/k0^3, 0, (-70*c^6)/k0^3 + ((45*I)*c^5)/k0^2 + (15*c^4)/(2*k0), 0, (315*I)/2*c^5 + (20853*c^8)/(16*k0^3) - ((1575*I)*c^7)/k0^2 - (735*c^6)/k0 + (105*c^4*k0)/8, 0, (-15*(49346*c^10 - (85050*I)*c^9*k0 - 62559*c^8*k0^2 + (25200*I)*c^7*k0^3 + 5880*c^6*k0^4 - (756*I)*c^5*k0^5 - 42*c^4*k0^6))/(32*k0^3)}, 3, 11, 1]
|