qpms/besseltransforms/7-4-7

((k^8*(-105 + 16*Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0) + 8*k^6*(-105 + 44*Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^3 + 144*k^4*(-14 + 9*Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^5 + 320*k^2*(-6 + 5*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)/(5040*k^7) - (k^8*(-105 + 16*Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0) + 8*k^6*(-105 + 44*Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^3 + 144*k^4*(-14 + 9*Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^5 + 320*k^2*(-6 + 5*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)/(720*k^7) + (k^8*(-105 + 16*Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0) + 8*k^6*(-105 + 44*Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^3 + 144*k^4*(-14 + 9*Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^5 + 320*k^2*(-6 + 5*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)/(240*k^7) - (k^8*(-105 + 16*Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0) + 8*k^6*(-105 + 44*Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^3 + 144*k^4*(-14 + 9*Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^5 + 320*k^2*(-6 + 5*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)/(144*k^7) + (k^8*(-105 + 16*Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0) + 8*k^6*(-105 + 44*Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^3 + 144*k^4*(-14 + 9*Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^5 + 320*k^2*(-6 + 5*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)/(144*k^7) - (k^8*(-105 + 16*Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0) + 8*k^6*(-105 + 44*Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0)^3 + 144*k^4*(-14 + 9*Sqrt[1 + k^2/(6*c - I*k0)^2])*(6*c - I*k0)^5 + 320*k^2*(-6 + 5*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)/(240*k^7) + (k^8*(-105 + 16*Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0) + 8*k^6*(-105 + 44*Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0)^3 + 144*k^4*(-14 + 9*Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0)^5 + 320*k^2*(-6 + 5*Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0)^7 + 640*(-1 + Sqrt[1 + k^2/(7*c - I*k0)^2])*(7*c - I*k0)^9)/(720*k^7) - (k^8*(-105 + 16*Sqrt[1 + k^2/(8*c - I*k0)^2])*(8*c - I*k0) + 8*k^6*(-105 + 44*Sqrt[1 + k^2/(8*c - I*k0)^2])*(8*c - I*k0)^3 + 144*k^4*(-14 + 9*Sqrt[1 + k^2/(8*c - I*k0)^2])*(8*c - I*k0)^5 + 320*k^2*(-6 + 5*Sqrt[1 + k^2/(8*c - I*k0)^2])*(8*c - I*k0)^7 + 640*(-1 + Sqrt[1 + k^2/(8*c - I*k0)^2])*(8*c - I*k0)^9)/(5040*k^7))/k0^4
SeriesData[k, Infinity, {(1920*c^7)/k0^4, (-93555*c^8)/(2*k0^4) + ((10395*I)*c^7)/k0^3, (480000*c^9)/k0^4 - ((207360*I)*c^8)/k0^3 - (23040*c^7)/k0^2, (-45045*(198*c^10 - (125*I)*c^9*k0 - 27*c^8*k0^2 + (2*I)*c^7*k0^3))/(4*k0^4), 0, (45045*(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^4)}, 5, 11, 1]
Bessel transform mathematica results etc. Former-commit-id: 3dca9d0ccbfefa4c5f3867ce4ba31229646ca2d9 2018-01-15 15:14:15 +02:00			((k^8(-105 + 16Sqrt[1 + k^2/(c - Ik0)^2])(c - Ik0) + 8k^6(-105 + 44Sqrt[1 + k^2/(c - Ik0)^2])(c - Ik0)^3 + 144k^4(-14 + 9Sqrt[1 + k^2/(c - Ik0)^2])(c - Ik0)^5 + 320k^2(-6 + 5Sqrt[1 + k^2/(c - Ik0)^2])(c - Ik0)^7 + 640(-1 + Sqrt[1 + k^2/(c - Ik0)^2])(c - Ik0)^9)/(5040k^7) - (k^8(-105 + 16Sqrt[1 + k^2/(2c - Ik0)^2])(2c - Ik0) + 8k^6(-105 + 44Sqrt[1 + k^2/(2c - Ik0)^2])(2c - Ik0)^3 + 144k^4(-14 + 9Sqrt[1 + k^2/(2c - Ik0)^2])(2c - Ik0)^5 + 320k^2(-6 + 5Sqrt[1 + k^2/(2c - Ik0)^2])(2c - Ik0)^7 + 640(-1 + Sqrt[1 + k^2/(2c - Ik0)^2])(2c - Ik0)^9)/(720k^7) + (k^8(-105 + 16Sqrt[1 + k^2/(3c - Ik0)^2])(3c - Ik0) + 8k^6(-105 + 44Sqrt[1 + k^2/(3c - Ik0)^2])(3c - Ik0)^3 + 144k^4(-14 + 9Sqrt[1 + k^2/(3c - Ik0)^2])(3c - Ik0)^5 + 320k^2(-6 + 5Sqrt[1 + k^2/(3c - Ik0)^2])(3c - Ik0)^7 + 640(-1 + Sqrt[1 + k^2/(3c - Ik0)^2])(3c - Ik0)^9)/(240k^7) - (k^8(-105 + 16Sqrt[1 + k^2/(4c - Ik0)^2])(4c - Ik0) + 8k^6(-105 + 44Sqrt[1 + k^2/(4c - Ik0)^2])(4c - Ik0)^3 + 144k^4(-14 + 9Sqrt[1 + k^2/(4c - Ik0)^2])(4c - Ik0)^5 + 320k^2(-6 + 5Sqrt[1 + k^2/(4c - Ik0)^2])(4c - Ik0)^7 + 640(-1 + Sqrt[1 + k^2/(4c - Ik0)^2])(4c - Ik0)^9)/(144k^7) + (k^8(-105 + 16Sqrt[1 + k^2/(5c - Ik0)^2])(5c - Ik0) + 8k^6(-105 + 44Sqrt[1 + k^2/(5c - Ik0)^2])(5c - Ik0)^3 + 144k^4(-14 + 9Sqrt[1 + k^2/(5c - Ik0)^2])(5c - Ik0)^5 + 320k^2(-6 + 5Sqrt[1 + k^2/(5c - Ik0)^2])(5c - Ik0)^7 + 640(-1 + Sqrt[1 + k^2/(5c - Ik0)^2])(5c - Ik0)^9)/(144k^7) - (k^8(-105 + 16Sqrt[1 + k^2/(6c - Ik0)^2])(6c - Ik0) + 8k^6(-105 + 44Sqrt[1 + k^2/(6c - Ik0)^2])(6c - Ik0)^3 + 144k^4(-14 + 9Sqrt[1 + k^2/(6c - Ik0)^2])(6c - Ik0)^5 + 320k^2(-6 + 5Sqrt[1 + k^2/(6c - Ik0)^2])(6c - Ik0)^7 + 640(-1 + Sqrt[1 + k^2/(6c - Ik0)^2])(6c - Ik0)^9)/(240k^7) + (k^8(-105 + 16Sqrt[1 + k^2/(7c - Ik0)^2])(7c - Ik0) + 8k^6(-105 + 44Sqrt[1 + k^2/(7c - Ik0)^2])(7c - Ik0)^3 + 144k^4(-14 + 9Sqrt[1 + k^2/(7c - Ik0)^2])(7c - Ik0)^5 + 320k^2(-6 + 5Sqrt[1 + k^2/(7c - Ik0)^2])(7c - Ik0)^7 + 640(-1 + Sqrt[1 + k^2/(7c - Ik0)^2])(7c - Ik0)^9)/(720k^7) - (k^8(-105 + 16Sqrt[1 + k^2/(8c - Ik0)^2])(8c - Ik0) + 8k^6(-105 + 44Sqrt[1 + k^2/(8c - Ik0)^2])(8c - Ik0)^3 + 144k^4(-14 + 9Sqrt[1 + k^2/(8c - Ik0)^2])(8c - Ik0)^5 + 320k^2(-6 + 5Sqrt[1 + k^2/(8c - Ik0)^2])(8c - Ik0)^7 + 640(-1 + Sqrt[1 + k^2/(8c - Ik0)^2])(8c - Ik0)^9)/(5040k^7))/k0^4
			`SeriesData[k, Infinity, {(1920c^7)/k0^4, (-93555c^8)/(2k0^4) + ((10395I)c^7)/k0^3, (480000c^9)/k0^4 - ((207360I)c^8)/k0^3 - (23040c^7)/k0^2, (-45045(198c^10 - (125I)c^9k0 - 27c^8k0^2 + (2I)c^7k0^3))/(4k0^4), 0, (45045(14391c^12 - (14457I)c^11k0 - 5940c^10k0^2 + (1250I)c^9k0^3 + 135c^8k0^4 - (6I)c^7k0^5))/(16k0^4)}, 5, 11, 1]`