Plot empty lattice modes in lat2d_realfreqsvd.py

[qpms.git] / besseltransforms / 4-2-6

(-3*k^4*(-3 + Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^2 + 8*k^2*(3 - 2*Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^4 - 16*(-1 + Sqrt[1 + k^2/(c - I*k0)^2])*(c - I*k0)^6 + 12*k^4*(-3 + Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^2 + 32*k^2*(-3 + 2*Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^4 + 64*(-1 + Sqrt[1 + k^2/(2*c - I*k0)^2])*(2*c - I*k0)^6 - 18*k^4*(-3 + Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^2 + 48*k^2*(3 - 2*Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^4 - 96*(-1 + Sqrt[1 + k^2/(3*c - I*k0)^2])*(3*c - I*k0)^6 + 12*k^4*(-3 + Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^2 + 32*k^2*(-3 + 2*Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^4 + 64*(-1 + Sqrt[1 + k^2/(4*c - I*k0)^2])*(4*c - I*k0)^6 - 3*k^4*(-3 + Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^2 + 8*k^2*(3 - 2*Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^4 - 16*(-1 + Sqrt[1 + k^2/(5*c - I*k0)^2])*(5*c - I*k0)^6)/(3*k^6*k0^2)
SeriesData[k, Infinity, {(192*c^4)/k0^2, (-2835*c^5)/k0^2 + ((945*I)*c^4)/k0, -1920*c^4 + (17920*c^6)/k0^2 - ((11520*I)*c^5)/k0, (31185*c^5)/2 - (51975*c^7)/k0^2 + ((48510*I)*c^6)/k0 - (3465*I)/2*c^4*k0, 0, (3003*(2025*c^9 - (2979*I)*c^8*k0 - 1800*c^7*k0^2 + (560*I)*c^6*k0^3 + 90*c^5*k0^4 - (6*I)*c^4*k0^5))/(16*k0^2)}, 4, 11, 1]