Ewald 1D in 3D: jdu spát
[qpms.git] / besseltransforms / 2-1-0
blobe19fb5bb85dda974ab2fca236e0348dc646fb888
1 (-2/(Sqrt[1 + k^2/(c - I*k0)^2]*(c - I*k0)) + 1/(Sqrt[1 + k^2/(2*c - I*k0)^2]*(2*c - I*k0)) + (Sqrt[Pi]*(I*Piecewise[{{0, k0^2/k^2 <= 1}}, k/(Sqrt[-k^2 + k0^2]*Sqrt[Pi])] + Piecewise[{{k/(Sqrt[k^2 - k0^2]*Sqrt[Pi]), k0^2/k^2 < 1}}, 0]))/k)/k0
2 SeriesData[k, Infinity, {-(c^2/(k^2*k0)), 0, (3*(7*c^4 - (12*I)*c^3*k0 - 6*c^2*k0^2))/(4*k^2*k0), 0, (-5*(31*c^6 - (90*I)*c^5*k0 - 105*c^4*k0^2 + (60*I)*c^3*k0^3 + 15*c^2*k0^4))/(8*k^2*k0), 0, (35*(127*c^8 - (504*I)*c^7*k0 - 868*c^6*k0^2 + (840*I)*c^5*k0^3 + 490*c^4*k0^4 - (168*I)*c^3*k0^5 - 28*c^2*k0^6))/(64*k^2*k0), 0, ((((c - I*k0)^3*(2*c - I*k0)^3)/(4*k^2) + ((-((c - I*k0)^3*(2*c - I*k0))/(2*k^2) - ((c - I*k0)*(2*c - I*k0)^3)/(2*k^2))*k0^2)/2 + (3*(c - I*k0)*(2*c - I*k0)*k0^4)/(8*k^2) + (3*(c - I*k0)^4*(2*c - I*k0)*(c/k - (I*k0)/k))/(8*k) + (3*(c - I*k0)*(2*c - I*k0)^4*((2*c)/k - (I*k0)/k))/(8*k))*(2*c^2*((c - I*k0)^5/(16*(2*c - I*k0)) - ((c - I*k0)^3*(2*c - I*k0))/16 - ((c - I*k0)*(2*c - I*k0)^3)/16 + (2*c - I*k0)^5/(16*(c - I*k0))) - (3*I)*c*((c - I*k0)^5/(16*(2*c - I*k0)) - ((c - I*k0)^3*(2*c - I*k0))/16 - ((c - I*k0)*(2*c - I*k0)^3)/16 + (2*c - I*k0)^5/(16*(c - I*k0)))*k0 + (-(c - I*k0)^5/(16*(2*c - I*k0)) + ((c - I*k0)^3*(2*c - I*k0))/16 + ((c - I*k0)*(2*c - I*k0)^3)/16 - (2*c - I*k0)^5/(16*(c - I*k0)))*k0^2 + c*((c - I*k0)^5/16 + ((c - I*k0)^3*k0^2)/16 - ((c - I*k0)*k0^4)/16 - k0^6/(16*(c - I*k0))) - I*k0*((c - I*k0)^5/16 + ((c - I*k0)^3*k0^2)/16 - ((c - I*k0)*k0^4)/16 - k0^6/(16*(c - I*k0))) - 4*c*((2*c - I*k0)^5/16 + ((2*c - I*k0)^3*k0^2)/16 - ((2*c - I*k0)*k0^4)/16 - k0^6/(16*(2*c - I*k0))) + (2*I)*k0*((2*c - I*k0)^5/16 + ((2*c - I*k0)^3*k0^2)/16 - ((2*c - I*k0)*k0^4)/16 - k0^6/(16*(2*c - I*k0)))) + (-((c - I*k0)^3*(2*c - I*k0))/(2*k^2) - ((c - I*k0)*(2*c - I*k0)^3)/(2*k^2) + ((c - I*k0)*(2*c - I*k0)*k0^2)/(2*k^2))*(2*c^2*((-5*(c - I*k0)^7)/(128*(2*c - I*k0)) + ((c - I*k0)^5*(2*c - I*k0))/32 + ((c - I*k0)^3*(2*c - I*k0)^3)/64 + ((c - I*k0)*(2*c - I*k0)^5)/32 - (5*(2*c - I*k0)^7)/(128*(c - I*k0))) - (3*I)*c*((-5*(c - I*k0)^7)/(128*(2*c - I*k0)) + ((c - I*k0)^5*(2*c - I*k0))/32 + ((c - I*k0)^3*(2*c - I*k0)^3)/64 + ((c - I*k0)*(2*c - I*k0)^5)/32 - (5*(2*c - I*k0)^7)/(128*(c - I*k0)))*k0 + ((5*(c - I*k0)^7)/(128*(2*c - I*k0)) - ((c - I*k0)^5*(2*c - I*k0))/32 - ((c - I*k0)^3*(2*c - I*k0)^3)/64 - ((c - I*k0)*(2*c - I*k0)^5)/32 + (5*(2*c - I*k0)^7)/(128*(c - I*k0)))*k0^2 + c*((-5*(c - I*k0)^7)/128 - ((c - I*k0)^5*k0^2)/32 + ((c - I*k0)^3*k0^4)/64 - ((c - I*k0)*k0^6)/32 - (5*k0^8)/(128*(c - I*k0))) - I*k0*((-5*(c - I*k0)^7)/128 - ((c - I*k0)^5*k0^2)/32 + ((c - I*k0)^3*k0^4)/64 - ((c - I*k0)*k0^6)/32 - (5*k0^8)/(128*(c - I*k0))) - 4*c*((-5*(2*c - I*k0)^7)/128 - ((2*c - I*k0)^5*k0^2)/32 + ((2*c - I*k0)^3*k0^4)/64 - ((2*c - I*k0)*k0^6)/32 - (5*k0^8)/(128*(2*c - I*k0))) + (2*I)*k0*((-5*(2*c - I*k0)^7)/128 - ((2*c - I*k0)^5*k0^2)/32 + ((2*c - I*k0)^3*k0^4)/64 - ((2*c - I*k0)*k0^6)/32 - (5*k0^8)/(128*(2*c - I*k0)))) + ((c - I*k0)*(2*c - I*k0)*(2*c^2*((7*(c - I*k0)^9)/(256*(2*c - I*k0)) - (5*(c - I*k0)^7*(2*c - I*k0))/256 - ((c - I*k0)^5*(2*c - I*k0)^3)/128 - ((c - I*k0)^3*(2*c - I*k0)^5)/128 - (5*(c - I*k0)*(2*c - I*k0)^7)/256 + (7*(2*c - I*k0)^9)/(256*(c - I*k0))) - (3*I)*c*((7*(c - I*k0)^9)/(256*(2*c - I*k0)) - (5*(c - I*k0)^7*(2*c - I*k0))/256 - ((c - I*k0)^5*(2*c - I*k0)^3)/128 - ((c - I*k0)^3*(2*c - I*k0)^5)/128 - (5*(c - I*k0)*(2*c - I*k0)^7)/256 + (7*(2*c - I*k0)^9)/(256*(c - I*k0)))*k0 + ((-7*(c - I*k0)^9)/(256*(2*c - I*k0)) + (5*(c - I*k0)^7*(2*c - I*k0))/256 + ((c - I*k0)^5*(2*c - I*k0)^3)/128 + ((c - I*k0)^3*(2*c - I*k0)^5)/128 + (5*(c - I*k0)*(2*c - I*k0)^7)/256 - (7*(2*c - I*k0)^9)/(256*(c - I*k0)))*k0^2 + c*((7*(c - I*k0)^9)/256 + (5*(c - I*k0)^7*k0^2)/256 - ((c - I*k0)^5*k0^4)/128 + ((c - I*k0)^3*k0^6)/128 - (5*(c - I*k0)*k0^8)/256 - (7*k0^10)/(256*(c - I*k0))) - I*k0*((7*(c - I*k0)^9)/256 + (5*(c - I*k0)^7*k0^2)/256 - ((c - I*k0)^5*k0^4)/128 + ((c - I*k0)^3*k0^6)/128 - (5*(c - I*k0)*k0^8)/256 - (7*k0^10)/(256*(c - I*k0))) - 4*c*((7*(2*c - I*k0)^9)/256 + (5*(2*c - I*k0)^7*k0^2)/256 - ((2*c - I*k0)^5*k0^4)/128 + ((2*c - I*k0)^3*k0^6)/128 - (5*(2*c - I*k0)*k0^8)/256 - (7*k0^10)/(256*(2*c - I*k0))) + (2*I)*k0*((7*(2*c - I*k0)^9)/256 + (5*(2*c - I*k0)^7*k0^2)/256 - ((2*c - I*k0)^5*k0^4)/128 + ((2*c - I*k0)^3*k0^6)/128 - (5*(2*c - I*k0)*k0^8)/256 - (7*k0^10)/(256*(2*c - I*k0)))))/k^2 + ((11*c^4 - (24*I)*c^3*k0 - 12*c^2*k0^2)*((3*(-((c - I*k0)^3*(2*c - I*k0))/(2*k^2) - ((c - I*k0)*(2*c - I*k0)^3)/(2*k^2))*k0^4)/8 + (5*(c - I*k0)*(2*c - I*k0)*k0^6)/(16*k^2) - (5*(c - I*k0)^6*(2*c - I*k0)*(c/k - (I*k0)/k))/(16*k) - (3*(c - I*k0)^4*(2*c - I*k0)^3*(c/k - (I*k0)/k))/(16*k) - (3*(c - I*k0)^3*(2*c - I*k0)^4*((2*c)/k - (I*k0)/k))/(16*k) - (5*(c - I*k0)*(2*c - I*k0)^6*((2*c)/k - (I*k0)/k))/(16*k) + (k0^2*(((c - I*k0)^3*(2*c - I*k0)^3)/(4*k^2) + (3*(c - I*k0)^4*(2*c - I*k0)*(c/k - (I*k0)/k))/(8*k) + (3*(c - I*k0)*(2*c - I*k0)^4*((2*c)/k - (I*k0)/k))/(8*k)))/2))/4 - c^2*((5*(-((c - I*k0)^3*(2*c - I*k0))/(2*k^2) - ((c - I*k0)*(2*c - I*k0)^3)/(2*k^2))*k0^6)/16 + (35*(c - I*k0)*(2*c - I*k0)*k0^8)/(128*k^2) + (35*(c - I*k0)^8*(2*c - I*k0)*(c/k - (I*k0)/k))/(128*k) + (5*(c - I*k0)^6*(2*c - I*k0)^3*(c/k - (I*k0)/k))/(32*k) + (5*(c - I*k0)^3*(2*c - I*k0)^6*((2*c)/k - (I*k0)/k))/(32*k) + (35*(c - I*k0)*(2*c - I*k0)^8*((2*c)/k - (I*k0)/k))/(128*k) + (9*(c - I*k0)^4*(2*c - I*k0)^4*(c/k - (I*k0)/k)*((2*c)/k - (I*k0)/k))/64 + (3*k0^4*(((c - I*k0)^3*(2*c - I*k0)^3)/(4*k^2) + (3*(c - I*k0)^4*(2*c - I*k0)*(c/k - (I*k0)/k))/(8*k) + (3*(c - I*k0)*(2*c - I*k0)^4*((2*c)/k - (I*k0)/k))/(8*k)))/8 + (k0^2*((-5*(c - I*k0)^6*(2*c - I*k0)*(c/k - (I*k0)/k))/(16*k) - (3*(c - I*k0)^4*(2*c - I*k0)^3*(c/k - (I*k0)/k))/(16*k) - (3*(c - I*k0)^3*(2*c - I*k0)^4*((2*c)/k - (I*k0)/k))/(16*k) - (5*(c - I*k0)*(2*c - I*k0)^6*((2*c)/k - (I*k0)/k))/(16*k)))/2))/((c - I*k0)*(2*c - I*k0)*k0)}, 1, 11, 1]