3 lines
1.0 KiB
Plaintext
3 lines
1.0 KiB
Plaintext
(1/2 - 6*(1/4 - ((-2 + Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^2)/k^2 - (2*(-1 + Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^4)/k^4) + 15*(1/4 - ((-2 + Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^2)/k^2 - (2*(-1 + Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^4)/k^4) - 20*(1/4 - ((-2 + Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^2)/k^2 - (2*(-1 + Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^4)/k^4) + 15*(1/4 - ((-2 + Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^2)/k^2 - (2*(-1 + Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^4)/k^4) - 6*(1/4 - ((-2 + Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0)^2)/k^2 - (2*(-1 + Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0)^4)/k^4) - ((-2 + Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^2)/k^2 - (2*(-1 + Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^4)/k^4 - ((-2 + Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0)^2)/k^2 - (2*(-1 + Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0)^4)/k^4)/k0^2
|
|
SeriesData[k, Infinity, {(3780*c^7)/k0^2 - ((945*I)*c^6)/k0, 0, 62370*c^7 - (363825*c^9)/k0^2 + ((1029105*I)/4*c^8)/k0 - (10395*I)/2*c^6*k0}, 7, 11, 1]
|