3 lines
598 B
Plaintext
3 lines
598 B
Plaintext
|
((-1 + Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0) - 6*(-1 + Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0) + 15*(-1 + Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0) - 20*(-1 + Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0) + 15*(-1 + Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0) - 6*(-1 + Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0) + (-1 + Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0))/(k*k0^2)
|
||
|
|
SeriesData[k, Infinity, {(45*c^6)/k0^2, 0, (1575*c^6)/2 - (51975*c^8)/(4*k0^2) + ((6300*I)*c^7)/k0, 0, (-3274425*c^8)/8 + (20155905*c^10)/(16*k0^2) - ((1157625*I)*c^9)/k0 + (66150*I)*c^7*k0 + (33075*c^6*k0^2)/8}, 6, 11, 1]
|