3 lines
1.5 KiB
Plaintext
3 lines
1.5 KiB
Plaintext
((k^4*(-5 + Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0) + 4*k^2*(-5 + 3*Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^3 + 16*(-1 + Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^5)/(5*k^5) - (6*(k^4*(-5 + Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0) + 4*k^2*(-5 + 3*Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^3 + 16*(-1 + Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^5))/(5*k^5) + (3*(k^4*(-5 + Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0) + 4*k^2*(-5 + 3*Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^3 + 16*(-1 + Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^5))/k^5 - (4*(k^4*(-5 + Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0) + 4*k^2*(-5 + 3*Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^3 + 16*(-1 + Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^5))/k^5 + (3*(k^4*(-5 + Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0) + 4*k^2*(-5 + 3*Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^3 + 16*(-1 + Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^5))/k^5 - (6*(k^4*(-5 + Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0) + 4*k^2*(-5 + 3*Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0)^3 + 16*(-1 + Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0)^5))/(5*k^5) + (k^4*(-5 + Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0) + 4*k^2*(-5 + 3*Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0)^3 + 16*(-1 + Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0)^5)/(5*k^5))/k0^2
|
|
SeriesData[k, Infinity, {(945*c^6)/k0^2, 0, (10395*c^6)/2 - (343035*c^8)/(4*k0^2) + ((41580*I)*c^7)/k0, 0, (-13378365*c^8)/8 + (82351269*c^10)/(16*k0^2) - ((4729725*I)*c^9)/k0 + (270270*I)*c^7*k0 + (135135*c^6*k0^2)/8}, 6, 11, 1]
|