qpms/besseltransforms/ksmall/5-3-3

((-5*(3*k^4 + 4*k^2*(3 - 2*Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^2 - 8*(-1 + Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^4))/(24*k^3) + (5*(3*k^4 + 4*k^2*(3 - 2*Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^2 - 8*(-1 + Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^4))/(12*k^3) - (5*(3*k^4 + 4*k^2*(3 - 2*Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^2 - 8*(-1 + Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^4))/(12*k^3) + (5*(3*k^4 + 4*k^2*(3 - 2*Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^2 - 8*(-1 + Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^4))/(24*k^3) - (3*k^4 + 4*k^2*(3 - 2*Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^2 - 8*(-1 + Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^4)/(24*k^3) + (3*k^4 + 8*k0^3*(k0 - Sqrt[-k^2 + k0^2]) + 4*k^2*k0*(-3*k0 + 2*Sqrt[-k^2 + k0^2]))/(24*k^3))/k0^3
((-5*(3*Power(k,4) + 4*Power(k,2)*(3 - 2*Sqrt(1 + Power(k,2)/Power(c - Complex(0,1)*k0,2)))*Power(c - Complex(0,1)*k0,2) - 8*(-1 + Sqrt(1 + Power(k,2)/Power(c - Complex(0,1)*k0,2)))*Power(c - Complex(0,1)*k0,4)))/(24.*Power(k,3)) + (5*(3*Power(k,4) + 4*Power(k,2)*(3 - 2*Sqrt(1 + Power(k,2)/Power(2*c - Complex(0,1)*k0,2)))*Power(2*c - Complex(0,1)*k0,2) - 8*(-1 + Sqrt(1 + Power(k,2)/Power(2*c - Complex(0,1)*k0,2)))*Power(2*c - Complex(0,1)*k0,4)))/(12.*Power(k,3)) - (5*(3*Power(k,4) + 4*Power(k,2)*(3 - 2*Sqrt(1 + Power(k,2)/Power(3*c - Complex(0,1)*k0,2)))*Power(3*c - Complex(0,1)*k0,2) - 8*(-1 + Sqrt(1 + Power(k,2)/Power(3*c - Complex(0,1)*k0,2)))*Power(3*c - Complex(0,1)*k0,4)))/(12.*Power(k,3)) + (5*(3*Power(k,4) + 4*Power(k,2)*(3 - 2*Sqrt(1 + Power(k,2)/Power(4*c - Complex(0,1)*k0,2)))*Power(4*c - Complex(0,1)*k0,2) - 8*(-1 + Sqrt(1 + Power(k,2)/Power(4*c - Complex(0,1)*k0,2)))*Power(4*c - Complex(0,1)*k0,4)))/(24.*Power(k,3)) - (3*Power(k,4) + 4*Power(k,2)*(3 - 2*Sqrt(1 + Power(k,2)/Power(5*c - Complex(0,1)*k0,2)))*Power(5*c - Complex(0,1)*k0,2) - 8*(-1 + Sqrt(1 + Power(k,2)/Power(5*c - Complex(0,1)*k0,2)))*Power(5*c - Complex(0,1)*k0,4))/(24.*Power(k,3)) + (3*Power(k,4) + 8*Power(k0,3)*(k0 - Sqrt(-Power(k,2) + Power(k0,2))) + 4*Power(k,2)*k0*(-3*k0 + 2*Sqrt(-Power(k,2) + Power(k0,2))))/(24.*Power(k,3)))/Power(k0,3)
SeriesData[k, Infinity, {(15*c^5)/k0^3, 0, (-35*(20*c^7 - (15*I)*c^6*k0 - 3*c^5*k0^2))/(2*k0^3), 0, (315*(331*c^9 - (450*I)*c^8*k0 - 240*c^7*k0^2 + (60*I)*c^6*k0^3 + 6*c^5*k0^4))/(16*k0^3), 0, (-165*(22430*c^11 - (42525*I)*c^10*k0 - 34755*c^9*k0^2 + (15750*I)*c^8*k0^3 + 4200*c^7*k0^4 - (630*I)*c^6*k0^5 - 42*c^5*k0^6))/(32*k0^3)}, 4, 11, 1]
(5*k^2*(-3 + 2*Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^2 + 10*(-1 + Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^4 + 10*k^2*(3 - 2*Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^2 - 20*(-1 + Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^4 + 10*k^2*(-3 + 2*Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^2 + 20*(-1 + Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^4 + 5*k^2*(3 - 2*Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^2 - 10*(-1 + Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^4 + k^2*(-3 + 2*Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^2 + 2*(-1 + Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^4 + 2*k0^3*(k0 - Sqrt[-k^2 + k0^2]) + k^2*k0*(-3*k0 + 2*Sqrt[-k^2 + k0^2]))/(6*k^3*k0^3)
Další Hankelovy transformace pro kappa=5 Former-commit-id: cc20e7f5dbf8651a81543f84ac066d011e84082b 2018-01-23 00:52:10 +02:00			((-5(3k^4 + 4k^2(3 - 2Sqrt[1 + k^2/(c - Ik0)^2])(c - Ik0)^2 - 8(-1 + Sqrt[1 + k^2/(c - Ik0)^2])(c - Ik0)^4))/(24k^3) + (5(3k^4 + 4k^2(3 - 2Sqrt[1 + k^2/(2c - Ik0)^2])(2c - Ik0)^2 - 8(-1 + Sqrt[1 + k^2/(2c - Ik0)^2])(2c - Ik0)^4))/(12k^3) - (5(3k^4 + 4k^2(3 - 2Sqrt[1 + k^2/(3c - Ik0)^2])(3c - Ik0)^2 - 8(-1 + Sqrt[1 + k^2/(3c - Ik0)^2])(3c - Ik0)^4))/(12k^3) + (5(3k^4 + 4k^2(3 - 2Sqrt[1 + k^2/(4c - Ik0)^2])(4c - Ik0)^2 - 8(-1 + Sqrt[1 + k^2/(4c - Ik0)^2])(4c - Ik0)^4))/(24k^3) - (3k^4 + 4k^2(3 - 2Sqrt[1 + k^2/(5c - Ik0)^2])(5c - Ik0)^2 - 8(-1 + Sqrt[1 + k^2/(5c - Ik0)^2])(5c - Ik0)^4)/(24k^3) + (3k^4 + 8k0^3(k0 - Sqrt[-k^2 + k0^2]) + 4k^2k0(-3k0 + 2Sqrt[-k^2 + k0^2]))/(24*k^3))/k0^3
			((-5(3Power(k,4) + 4Power(k,2)(3 - 2Sqrt(1 + Power(k,2)/Power(c - Complex(0,1)k0,2)))Power(c - Complex(0,1)k0,2) - 8(-1 + Sqrt(1 + Power(k,2)/Power(c - Complex(0,1)k0,2)))Power(c - Complex(0,1)k0,4)))/(24.Power(k,3)) + (5(3Power(k,4) + 4Power(k,2)(3 - 2Sqrt(1 + Power(k,2)/Power(2c - Complex(0,1)k0,2)))Power(2c - Complex(0,1)k0,2) - 8(-1 + Sqrt(1 + Power(k,2)/Power(2c - Complex(0,1)k0,2)))Power(2c - Complex(0,1)k0,4)))/(12.Power(k,3)) - (5(3Power(k,4) + 4Power(k,2)(3 - 2Sqrt(1 + Power(k,2)/Power(3c - Complex(0,1)k0,2)))Power(3c - Complex(0,1)k0,2) - 8(-1 + Sqrt(1 + Power(k,2)/Power(3c - Complex(0,1)k0,2)))Power(3c - Complex(0,1)k0,4)))/(12.Power(k,3)) + (5(3Power(k,4) + 4Power(k,2)(3 - 2Sqrt(1 + Power(k,2)/Power(4c - Complex(0,1)k0,2)))Power(4c - Complex(0,1)k0,2) - 8(-1 + Sqrt(1 + Power(k,2)/Power(4c - Complex(0,1)k0,2)))Power(4c - Complex(0,1)k0,4)))/(24.Power(k,3)) - (3Power(k,4) + 4Power(k,2)(3 - 2Sqrt(1 + Power(k,2)/Power(5c - Complex(0,1)k0,2)))Power(5c - Complex(0,1)k0,2) - 8(-1 + Sqrt(1 + Power(k,2)/Power(5c - Complex(0,1)k0,2)))Power(5c - Complex(0,1)k0,4))/(24.Power(k,3)) + (3Power(k,4) + 8Power(k0,3)(k0 - Sqrt(-Power(k,2) + Power(k0,2))) + 4Power(k,2)k0(-3k0 + 2Sqrt(-Power(k,2) + Power(k0,2))))/(24.*Power(k,3)))/Power(k0,3)
			`SeriesData[k, Infinity, {(15c^5)/k0^3, 0, (-35(20c^7 - (15I)c^6k0 - 3c^5k0^2))/(2k0^3), 0, (315(331c^9 - (450I)c^8k0 - 240c^7k0^2 + (60I)c^6k0^3 + 6c^5k0^4))/(16k0^3), 0, (-165(22430c^11 - (42525I)c^10k0 - 34755c^9k0^2 + (15750I)c^8k0^3 + 4200c^7k0^4 - (630I)c^6k0^5 - 42c^5k0^6))/(32k0^3)}, 4, 11, 1]`
			(5k^2(-3 + 2Sqrt[1 + k^2/(c - Ik0)^2])(c - Ik0)^2 + 10(-1 + Sqrt[1 + k^2/(c - Ik0)^2])(c - Ik0)^4 + 10k^2(3 - 2Sqrt[1 + k^2/(2c - Ik0)^2])(2c - Ik0)^2 - 20(-1 + Sqrt[1 + k^2/(2c - Ik0)^2])(2c - Ik0)^4 + 10k^2(-3 + 2Sqrt[1 + k^2/(3c - Ik0)^2])(3c - Ik0)^2 + 20(-1 + Sqrt[1 + k^2/(3c - Ik0)^2])(3c - Ik0)^4 + 5k^2(3 - 2Sqrt[1 + k^2/(4c - Ik0)^2])(4c - Ik0)^2 - 10(-1 + Sqrt[1 + k^2/(4c - Ik0)^2])(4c - Ik0)^4 + k^2(-3 + 2Sqrt[1 + k^2/(5c - Ik0)^2])(5c - Ik0)^2 + 2(-1 + Sqrt[1 + k^2/(5c - Ik0)^2])(5c - Ik0)^4 + 2k0^3(k0 - Sqrt[-k^2 + k0^2]) + k^2k0(-3k0 + 2Sqrt[-k^2 + k0^2]))/(6k^3*k0^3)