qpms/besseltransforms/5-5-6

((k^8*(-315 + 64*Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0) + 16*k^6*(-105 + 52*Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^3 + 48*k^4*(-63 + 44*Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^5 + 64*k^2*(-36 + 31*Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^7 + 640*(-1 + Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^9)/(60480*k^6) - (k^8*(-315 + 64*Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0) + 16*k^6*(-105 + 52*Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^3 + 48*k^4*(-63 + 44*Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^5 + 64*k^2*(-36 + 31*Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^7 + 640*(-1 + Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^9)/(12096*k^6) + (k^8*(-315 + 64*Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0) + 16*k^6*(-105 + 52*Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^3 + 48*k^4*(-63 + 44*Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^5 + 64*k^2*(-36 + 31*Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^7 + 640*(-1 + Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^9)/(6048*k^6) - (k^8*(-315 + 64*Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0) + 16*k^6*(-105 + 52*Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^3 + 48*k^4*(-63 + 44*Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^5 + 64*k^2*(-36 + 31*Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^7 + 640*(-1 + Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^9)/(6048*k^6) + (k^8*(-315 + 64*Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0) + 16*k^6*(-105 + 52*Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^3 + 48*k^4*(-63 + 44*Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^5 + 64*k^2*(-36 + 31*Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^7 + 640*(-1 + Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^9)/(12096*k^6) - (k^8*(-315 + 64*Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0) + 16*k^6*(-105 + 52*Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0)^3 + 48*k^4*(-63 + 44*Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0)^5 + 64*k^2*(-36 + 31*Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0)^7 + 640*(-1 + Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0)^9)/(60480*k^6))/k0^5
SeriesData[k, Infinity, {(6*c^5)/k0^5, (-245*c^6)/(2*k0^5) + ((35*I)*c^5)/k0^4, (1216*c^7)/k0^5 - ((672*I)*c^6)/k0^4 - (96*c^5)/k0^3, (-315*(189*c^8 - (152*I)*c^7*k0 - 42*c^6*k0^2 + (4*I)*c^5*k0^3))/(8*k0^5), (86960*c^9)/(3*k0^5) - ((30240*I)*c^8)/k0^4 - (12160*c^7)/k0^3 + ((2240*I)*c^6)/k0^2 + (160*c^5)/k0, (-231*(8547*c^10 - (10870*I)*c^9*k0 - 5670*c^8*k0^2 + (1520*I)*c^7*k0^3 + 210*c^6*k0^4 - (12*I)*c^5*k0^5))/(32*k0^5), 0, (143*(141232*c^12 - (240664*I)*c^11*k0 - 179487*c^10*k0^2 + (76090*I)*c^9*k0^3 + 19845*c^8*k0^4 - (3192*I)*c^7*k0^5 - 294*c^6*k0^6 + (12*I)*c^5*k0^7))/(64*k0^5)}, 2, 11, 1]
Bessel transform mathematica results etc. Former-commit-id: 3dca9d0ccbfefa4c5f3867ce4ba31229646ca2d9 2018-01-15 15:14:15 +02:00			((k^8(-315 + 64Sqrt[1 + k^2/(c - Ik0)^2])(c - Ik0) + 16k^6(-105 + 52Sqrt[1 + k^2/(c - Ik0)^2])(c - Ik0)^3 + 48k^4(-63 + 44Sqrt[1 + k^2/(c - Ik0)^2])(c - Ik0)^5 + 64k^2(-36 + 31Sqrt[1 + k^2/(c - Ik0)^2])(c - Ik0)^7 + 640(-1 + Sqrt[1 + k^2/(c - Ik0)^2])(c - Ik0)^9)/(60480k^6) - (k^8(-315 + 64Sqrt[1 + k^2/(2c - Ik0)^2])(2c - Ik0) + 16k^6(-105 + 52Sqrt[1 + k^2/(2c - Ik0)^2])(2c - Ik0)^3 + 48k^4(-63 + 44Sqrt[1 + k^2/(2c - Ik0)^2])(2c - Ik0)^5 + 64k^2(-36 + 31Sqrt[1 + k^2/(2c - Ik0)^2])(2c - Ik0)^7 + 640(-1 + Sqrt[1 + k^2/(2c - Ik0)^2])(2c - Ik0)^9)/(12096k^6) + (k^8(-315 + 64Sqrt[1 + k^2/(3c - Ik0)^2])(3c - Ik0) + 16k^6(-105 + 52Sqrt[1 + k^2/(3c - Ik0)^2])(3c - Ik0)^3 + 48k^4(-63 + 44Sqrt[1 + k^2/(3c - Ik0)^2])(3c - Ik0)^5 + 64k^2(-36 + 31Sqrt[1 + k^2/(3c - Ik0)^2])(3c - Ik0)^7 + 640(-1 + Sqrt[1 + k^2/(3c - Ik0)^2])(3c - Ik0)^9)/(6048k^6) - (k^8(-315 + 64Sqrt[1 + k^2/(4c - Ik0)^2])(4c - Ik0) + 16k^6(-105 + 52Sqrt[1 + k^2/(4c - Ik0)^2])(4c - Ik0)^3 + 48k^4(-63 + 44Sqrt[1 + k^2/(4c - Ik0)^2])(4c - Ik0)^5 + 64k^2(-36 + 31Sqrt[1 + k^2/(4c - Ik0)^2])(4c - Ik0)^7 + 640(-1 + Sqrt[1 + k^2/(4c - Ik0)^2])(4c - Ik0)^9)/(6048k^6) + (k^8(-315 + 64Sqrt[1 + k^2/(5c - Ik0)^2])(5c - Ik0) + 16k^6(-105 + 52Sqrt[1 + k^2/(5c - Ik0)^2])(5c - Ik0)^3 + 48k^4(-63 + 44Sqrt[1 + k^2/(5c - Ik0)^2])(5c - Ik0)^5 + 64k^2(-36 + 31Sqrt[1 + k^2/(5c - Ik0)^2])(5c - Ik0)^7 + 640(-1 + Sqrt[1 + k^2/(5c - Ik0)^2])(5c - Ik0)^9)/(12096k^6) - (k^8(-315 + 64Sqrt[1 + k^2/(6c - Ik0)^2])(6c - Ik0) + 16k^6(-105 + 52Sqrt[1 + k^2/(6c - Ik0)^2])(6c - Ik0)^3 + 48k^4(-63 + 44Sqrt[1 + k^2/(6c - Ik0)^2])(6c - Ik0)^5 + 64k^2(-36 + 31Sqrt[1 + k^2/(6c - Ik0)^2])(6c - Ik0)^7 + 640(-1 + Sqrt[1 + k^2/(6c - Ik0)^2])(6c - Ik0)^9)/(60480k^6))/k0^5
			SeriesData[k, Infinity, {(6c^5)/k0^5, (-245c^6)/(2k0^5) + ((35I)c^5)/k0^4, (1216c^7)/k0^5 - ((672I)c^6)/k0^4 - (96c^5)/k0^3, (-315(189c^8 - (152I)c^7k0 - 42c^6k0^2 + (4I)c^5k0^3))/(8k0^5), (86960c^9)/(3k0^5) - ((30240I)c^8)/k0^4 - (12160c^7)/k0^3 + ((2240I)c^6)/k0^2 + (160c^5)/k0, (-231(8547c^10 - (10870I)c^9k0 - 5670c^8k0^2 + (1520I)c^7k0^3 + 210c^6k0^4 - (12I)c^5k0^5))/(32k0^5), 0, (143(141232c^12 - (240664I)c^11k0 - 179487c^10k0^2 + (76090I)c^9k0^3 + 19845c^8k0^4 - (3192I)c^7k0^5 - 294c^6k0^6 + (12I)c^5k0^7))/(64*k0^5)}, 2, 11, 1]