Separate Ewald parameter for different frequencies
[qpms.git] / besseltransforms / 7-7-6
blob3ddda62f4bfe340f74ec328df2f87f21da1e848b
1 ((k^10*(-693 + 256*Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0) + 10*k^8*(-231 + 128*Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^3 + 16*k^6*(-231 + 160*Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^5 + 32*k^4*(-99 + 80*Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^7 + 128*k^2*(-11 + 10*Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^9 + 256*(-1 + Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^11)/(2661120*k^6) - (k^10*(-693 + 256*Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0) + 10*k^8*(-231 + 128*Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^3 + 16*k^6*(-231 + 160*Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^5 + 32*k^4*(-99 + 80*Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^7 + 128*k^2*(-11 + 10*Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^9 + 256*(-1 + Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^11)/(380160*k^6) + (k^10*(-693 + 256*Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0) + 10*k^8*(-231 + 128*Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^3 + 16*k^6*(-231 + 160*Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^5 + 32*k^4*(-99 + 80*Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^7 + 128*k^2*(-11 + 10*Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^9 + 256*(-1 + Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^11)/(126720*k^6) - (k^10*(-693 + 256*Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0) + 10*k^8*(-231 + 128*Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^3 + 16*k^6*(-231 + 160*Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^5 + 32*k^4*(-99 + 80*Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^7 + 128*k^2*(-11 + 10*Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^9 + 256*(-1 + Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^11)/(76032*k^6) + (k^10*(-693 + 256*Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0) + 10*k^8*(-231 + 128*Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^3 + 16*k^6*(-231 + 160*Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^5 + 32*k^4*(-99 + 80*Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^7 + 128*k^2*(-11 + 10*Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^9 + 256*(-1 + Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^11)/(76032*k^6) - (k^10*(-693 + 256*Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0) + 10*k^8*(-231 + 128*Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0)^3 + 16*k^6*(-231 + 160*Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0)^5 + 32*k^4*(-99 + 80*Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0)^7 + 128*k^2*(-11 + 10*Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0)^9 + 256*(-1 + Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0)^11)/(126720*k^6) + (k^10*(-693 + 256*Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0) + 10*k^8*(-231 + 128*Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0)^3 + 16*k^6*(-231 + 160*Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0)^5 + 32*k^4*(-99 + 80*Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0)^7 + 128*k^2*(-11 + 10*Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0)^9 + 256*(-1 + Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0)^11)/(380160*k^6) - (k^10*(-693 + 256*Sqrt[1 + k^2/(8*c - I*k0)^2])*(8*c - I*k0) + 10*k^8*(-231 + 128*Sqrt[1 + k^2/(8*c - I*k0)^2])*(8*c - I*k0)^3 + 16*k^6*(-231 + 160*Sqrt[1 + k^2/(8*c - I*k0)^2])*(8*c - I*k0)^5 + 32*k^4*(-99 + 80*Sqrt[1 + k^2/(8*c - I*k0)^2])*(8*c - I*k0)^7 + 128*k^2*(-11 + 10*Sqrt[1 + k^2/(8*c - I*k0)^2])*(8*c - I*k0)^9 + 256*(-1 + Sqrt[1 + k^2/(8*c - I*k0)^2])*(8*c - I*k0)^11)/(2661120*k^6))/k0^7
2 SeriesData[k, Infinity, {(6*c^7)/k0^7, (-315*c^8)/(2*k0^7) + ((35*I)*c^7)/k0^6, (2000*c^9)/k0^7 - ((864*I)*c^8)/k0^6 - (96*c^7)/k0^5, (-315*(198*c^10 - (125*I)*c^9*k0 - 27*c^8*k0^2 + (2*I)*c^7*k0^3))/(4*k0^7), (77104*c^11)/k0^7 - ((63360*I)*c^10)/k0^6 - (20000*c^9)/k0^5 + ((2880*I)*c^8)/k0^4 + (160*c^7)/k0^3, (-231*(14391*c^12 - (14457*I)*c^11*k0 - 5940*c^10*k0^2 + (1250*I)*c^9*k0^3 + 135*c^8*k0^4 - (6*I)*c^7*k0^5))/(16*k0^7), 0, (143*(378720*c^14 - (511840*I)*c^13*k0 - 302211*c^12*k0^2 + (101199*I)*c^11*k0^3 + 20790*c^10*k0^4 - (2625*I)*c^9*k0^5 - 189*c^8*k0^6 + (6*I)*c^7*k0^7))/(32*k0^7)}, 2, 11, 1]