GUÍA RECTANGULAR MODOS TE a|a [m]|Longitud de la guía sobre el eje x (a>=b)|2E-2 b|b [m]|Longitud de la guía sobre el eje y (a>=b)|1E-2 m|m|Modo TE m,n (m>=0, no es válida la opción m=0 con n=0)|1 n|n|Modo TE m,n (n>=0, no es válida la opción m=0 con n=0)|1 f|f [Hz]|Frecuencia en Hz|20E9 e_r|Re[permitividad e] [F/m]|Parte real de la permitividad del dieléctrico en F/m|8.841941283E-12 e_i|Im[permitividad e] [F/m]|Parte imaginaria de la permitividad del dieléctrico en F/m|-8.841941283E-16 mu|Permeabilidad mu [H/m]|Permeabilidad mu del dieléctrico en H/m|1.256637061E-6 A|A de Fh|Constante A de la función auxiliar Fh(x,y)|1.0 x|x [m]|Componente x de posición de medida|0.5E-2 y|y [m]|Componente y de posición de medida|0.25E-2 z|z [m]|Componente z de posición de medida|1.0 cc|Conductividad cc [S/m]|Conductividad del material del conductor en S/m|62893E3 z1|z1 [m]|Posición de medida z1|5.0 z2|z2 [m]|Posición de medida z2|6.0 _gammac2|-gammac^2|-gammac^2|(m*Pi/a)^2+(n*Pi/b)^2 c|c [m/s]|Velocidad de la luz en el dieléctrico en m/s|1/sqrt(mu*e_r) fc|fc [Hz]|Frecuencia de corte del modo en Hz|(c/2)*sqrt((m/a)^2+(n/b)^2) Fh|Fh(x,y)|Fh (función auxiliar) en (x,y)|(A*cos(m*Pi*x/a)*cos(n*Pi*y/b)) gamma_r|Re[gamma] [1/m]|Parte real de gamma en 1/m (sin pérdidas en conductor)|sqrt(sqrt((-(2*Pi*f)^2*mu*e_r+_gammac2)^2+(-(2*Pi*f)^2*mu*e_i)^2))*cos((abs(signum((-(2*Pi*f)^2*mu*e_r+_gammac2))*signum((-(2*Pi*f)^2*mu*e_i)))*(signum((-(2*Pi*f)^2*mu*e_r+_gammac2))*signum((-(2*Pi*f)^2*mu*e_i))*arctan(abs((-(2*Pi*f)^2*mu*e_i))/(abs((-(2*Pi*f)^2*mu*e_r+_gammac2))+abs(signum((-(2*Pi*f)^2*mu*e_r+_gammac2)))-1))+max(0,-signum((-(2*Pi*f)^2*mu*e_r+_gammac2)))*signum((-(2*Pi*f)^2*mu*e_i))*Pi)+(1-abs(signum((-(2*Pi*f)^2*mu*e_r+_gammac2))*signum((-(2*Pi*f)^2*mu*e_i))))*(signum((-(2*Pi*f)^2*mu*e_i))*(Pi/2)+abs(signum((-(2*Pi*f)^2*mu*e_r+_gammac2)))*max(0,-signum((-(2*Pi*f)^2*mu*e_r+_gammac2)))*Pi))/2) gamma_i|Im[gamma] [1/m]|Parte imaginaria de gamma en 1/m|sqrt(sqrt((-(2*Pi*f)^2*mu*e_r+_gammac2)^2+(-(2*Pi*f)^2*mu*e_i)^2))*sin((abs(signum((-(2*Pi*f)^2*mu*e_r+_gammac2))*signum((-(2*Pi*f)^2*mu*e_i)))*(signum((-(2*Pi*f)^2*mu*e_r+_gammac2))*signum((-(2*Pi*f)^2*mu*e_i))*arctan(abs((-(2*Pi*f)^2*mu*e_i))/(abs((-(2*Pi*f)^2*mu*e_r+_gammac2))+abs(signum((-(2*Pi*f)^2*mu*e_r+_gammac2)))-1))+max(0,-signum((-(2*Pi*f)^2*mu*e_r+_gammac2)))*signum((-(2*Pi*f)^2*mu*e_i))*Pi)+(1-abs(signum((-(2*Pi*f)^2*mu*e_r+_gammac2))*signum((-(2*Pi*f)^2*mu*e_i))))*(signum((-(2*Pi*f)^2*mu*e_i))*(Pi/2)+abs(signum((-(2*Pi*f)^2*mu*e_r+_gammac2)))*max(0,-signum((-(2*Pi*f)^2*mu*e_r+_gammac2)))*Pi))/2) Exr|Re[Ex(x,y,z)] [V/m]|Parte real del fasor campo eléctrico en dirección vector unitario x (sin pérdidas en conductor)|(((2*Pi*f)*mu*gamma_i/(gamma_r^2+gamma_i^2))*((exp(-gamma_r*z)*(gamma_r*cos(-gamma_i*z)-gamma_i*sin(-gamma_i*z))*(-A/(-_gammac2)))*(n*Pi/b)*cos(m*Pi*x/a)*sin(n*Pi*y/b))-((2*Pi*f)*mu*gamma_r/(gamma_r^2+gamma_i^2))*((exp(-gamma_r*z)*(gamma_r*sin(-gamma_i*z)+gamma_i*cos(-gamma_i*z))*(-A/(-_gammac2)))*(n*Pi/b)*cos(m*Pi*x/a)*sin(n*Pi*y/b))) Exi|Im[Ex(x,y,z)] [V/m]|Parte imaginaria del fasor campo eléctrico en dirección vector unitario x (sin pérdidas en conductor)|(((2*Pi*f)*mu*gamma_i/(gamma_r^2+gamma_i^2))*((exp(-gamma_r*z)*(gamma_r*sin(-gamma_i*z)+gamma_i*cos(-gamma_i*z))*(-A/(-_gammac2)))*(n*Pi/b)*cos(m*Pi*x/a)*sin(n*Pi*y/b))+((2*Pi*f)*mu*gamma_r/(gamma_r^2+gamma_i^2))*((exp(-gamma_r*z)*(gamma_r*cos(-gamma_i*z)-gamma_i*sin(-gamma_i*z))*(-A/(-_gammac2)))*(n*Pi/b)*cos(m*Pi*x/a)*sin(n*Pi*y/b))) Eyr|Re[Ey(x,y,z)] [V/m]|Parte real del fasor campo eléctrico en dirección vector unitario y (sin pérdidas en conductor)|(((2*Pi*f)*mu*gamma_r/(gamma_r^2+gamma_i^2))*((exp(-gamma_r*z)*(gamma_r*sin(-gamma_i*z)+gamma_i*cos(-gamma_i*z))*(-A/(-_gammac2)))*(m*Pi/a)*cos(n*Pi*y/b)*sin(m*Pi*x/a))-((2*Pi*f)*mu*gamma_i/(gamma_r^2+gamma_i^2))*((exp(-gamma_r*z)*(gamma_r*cos(-gamma_i*z)-gamma_i*sin(-gamma_i*z))*(-A/(-_gammac2)))*(m*Pi/a)*cos(n*Pi*y/b)*sin(m*Pi*x/a))) Eyi|Im[Ey(x,y,z)] [V/m]|Parte imaginaria del fasor campo eléctrico en dirección vector unitario y (sin pérdidas en conductor)|(-((2*Pi*f)*mu*gamma_i/(gamma_r^2+gamma_i^2))*((exp(-gamma_r*z)*(gamma_r*sin(-gamma_i*z)+gamma_i*cos(-gamma_i*z))*(-A/(-_gammac2)))*(m*Pi/a)*cos(n*Pi*y/b)*sin(m*Pi*x/a))-((2*Pi*f)*mu*gamma_r/(gamma_r^2+gamma_i^2))*((exp(-gamma_r*z)*(gamma_r*cos(-gamma_i*z)-gamma_i*sin(-gamma_i*z))*(-A/(-_gammac2)))*(m*Pi/a)*cos(n*Pi*y/b)*sin(m*Pi*x/a))) Ezr|Re[Ez(x,y,z)] [V/m]|Parte real del fasor campo eléctrico en dirección vector unitario z (sin pérdidas en conductor)|0 Ezi|Im[Ez(x,y,z)] [V/m]|Parte imaginaria del fasor campo eléctrico en dirección vector unitario z (sin pérdidas en conductor)|0 Hxr|Re[Hx(x,y,z)] [A/m]|Parte real del fasor campo magnético en dirección vector unitario x (sin pérdidas en conductor)|((exp(-gamma_r*z)*(gamma_r*cos(-gamma_i*z)-gamma_i*sin(-gamma_i*z))*(-A/(-_gammac2)))*(m*Pi/a)*cos(n*Pi*y/b)*sin(m*Pi*x/a)) Hxi|Im[Hx(x,y,z)] [A/m]|Parte imaginaria del fasor campo magnético en dirección vector unitario x (sin pérdidas en conductor)|((exp(-gamma_r*z)*(gamma_r*sin(-gamma_i*z)+gamma_i*cos(-gamma_i*z))*(-A/(-_gammac2)))*(m*Pi/a)*cos(n*Pi*y/b)*sin(m*Pi*x/a)) Hyr|Re[Hy(x,y,z)] [A/m]|Parte real del fasor campo magnético en dirección vector unitario y (sin pérdidas en conductor)|((exp(-gamma_r*z)*(gamma_r*cos(-gamma_i*z)-gamma_i*sin(-gamma_i*z))*(-A/(-_gammac2)))*(n*Pi/b)*cos(m*Pi*x/a)*sin(n*Pi*y/b)) Hyi|Im[Hy(x,y,z)] [A/m]|Parte imaginaria del fasor campo magnético en dirección vector unitario y (sin pérdidas en conductor)|((exp(-gamma_r*z)*(gamma_r*sin(-gamma_i*z)+gamma_i*cos(-gamma_i*z))*(-A/(-_gammac2)))*(n*Pi/b)*cos(m*Pi*x/a)*sin(n*Pi*y/b)) Hzr|Re[Hz(x,y,z)] [A/m]|Parte real del fasor campo magnético en dirección vector unitario z (sin pérdidas en conductor)|((A*cos(m*Pi*x/a)*cos(n*Pi*y/b))*exp(-gamma_r*z)*cos(-gamma_i*z)) Hzi|Im[Hz(x,y,z)] [A/m]|Parte imaginaria del fasor campo magnético en dirección vector unitario z (sin pérdidas en conductor)|((A*cos(m*Pi*x/a)*cos(n*Pi*y/b))*exp(-gamma_r*z)*sin(-gamma_i*z)) dc|dc [m]|Profundidad de penetración en conductor|1/sqrt(Pi*f*mu*cc) Wpc|Wpc(z) [W/m]|Pérdidas en el conductor en z en W/m|1/2*(A^2*exp(-2*gamma_r*z)*(-m^2*Pi^2*gamma_r^2*cos(gamma_i*z)^2*cos(m*Pi)*sin(m*Pi)+m^3*Pi^3*gamma_r^2*cos(gamma_i*z)^2-m^2*Pi^2*gamma_i^2*sin(gamma_i*z)^2*cos(m*Pi)*sin(m*Pi)+m^3*Pi^3*gamma_i^2*sin(gamma_i*z)^2-m^2*Pi^2*gamma_r^2*sin(gamma_i*z)^2*cos(m*Pi)*sin(m*Pi)+m^3*Pi^3*gamma_r^2*sin(gamma_i*z)^2-m^2*Pi^2*gamma_i^2*cos(gamma_i*z)^2*cos(m*Pi)*sin(m*Pi)+m^3*Pi^3*gamma_i^2*cos(gamma_i*z)^2+cos(gamma_i*z)^2*a^2*cos(m*Pi)*sin(m*Pi)*_gammac2^2+cos(gamma_i*z)^2*a^2*_gammac2^2*m*Pi+sin(gamma_i*z)^2*a^2*cos(m*Pi)*sin(m*Pi)*_gammac2^2+sin(gamma_i*z)^2*a^2*_gammac2^2*m*Pi)/(_gammac2^2*a*m*Pi)+A^2*exp(-2*gamma_r*z)*(-n^2*Pi^2*cos(m*Pi)^2*gamma_r^2*cos(gamma_i*z)^2*cos(n*Pi)*sin(n*Pi)*a^2+n^3*Pi^3*cos(m*Pi)^2*gamma_r^2*cos(gamma_i*z)^2*a^2-n^2*Pi^2*cos(m*Pi)^2*gamma_i^2*sin(gamma_i*z)^2*cos(n*Pi)*sin(n*Pi)*a^2+n^3*Pi^3*cos(m*Pi)^2*gamma_i^2*sin(gamma_i*z)^2*a^2-n^2*Pi^2*cos(m*Pi)^2*gamma_r^2*sin(gamma_i*z)^2*cos(n*Pi)*sin(n*Pi)*a^2+n^3*Pi^3*cos(m*Pi)^2*gamma_r^2*sin(gamma_i*z)^2*a^2-n^2*Pi^2*cos(m*Pi)^2*gamma_i^2*cos(gamma_i*z)^2*cos(n*Pi)*sin(n*Pi)*a^2+n^3*Pi^3*cos(m*Pi)^2*gamma_i^2*cos(gamma_i*z)^2*a^2+m^2*Pi^3*sin(m*Pi)^2*b^2*gamma_r^2*sin(gamma_i*z)^2*n+m^2*Pi^2*sin(m*Pi)^2*b^2*gamma_i^2*cos(gamma_i*z)^2*cos(n*Pi)*sin(n*Pi)+m^2*Pi^3*sin(m*Pi)^2*b^2*gamma_i^2*cos(gamma_i*z)^2*n+m^2*Pi^2*sin(m*Pi)^2*b^2*gamma_i^2*sin(gamma_i*z)^2*cos(n*Pi)*sin(n*Pi)+m^2*Pi^2*sin(m*Pi)^2*b^2*gamma_r^2*sin(gamma_i*z)^2*cos(n*Pi)*sin(n*Pi)+m^2*Pi^2*sin(m*Pi)^2*b^2*gamma_r^2*cos(gamma_i*z)^2*cos(n*Pi)*sin(n*Pi)+m^2*Pi^3*sin(m*Pi)^2*b^2*gamma_r^2*cos(gamma_i*z)^2*n+m^2*Pi^3*sin(m*Pi)^2*b^2*gamma_i^2*sin(gamma_i*z)^2*n+cos(m*Pi)^2*cos(gamma_i*z)^2*b^2*cos(n*Pi)*sin(n*Pi)*_gammac2^2*a^2+cos(m*Pi)^2*cos(gamma_i*z)^2*b^2*_gammac2^2*a^2*n*Pi+cos(m*Pi)^2*sin(gamma_i*z)^2*b^2*cos(n*Pi)*sin(n*Pi)*_gammac2^2*a^2+cos(m*Pi)^2*sin(gamma_i*z)^2*b^2*_gammac2^2*a^2*n*Pi)/(_gammac2^2*a^2*n*b*Pi))/(cc*dc) WT|WT(z) [W]|Potencia transmitida en z en W|1/4*(-m^2*b^2*cos(gamma_i*z)^2*n*cos(m*Pi)*sin(m*Pi)*Pi+m^3*b^2*cos(gamma_i*z)^2*n*Pi^2+sin(gamma_i*z)^2*n^3*a^2*cos(m*Pi)*sin(m*Pi)*Pi+sin(gamma_i*z)^2*n^3*a^2*Pi^2*m-m^2*b^2*sin(gamma_i*z)^2*cos(n*Pi)*sin(n*Pi)*cos(m*Pi)*sin(m*Pi)+m^3*b^2*sin(gamma_i*z)^2*cos(n*Pi)*sin(n*Pi)*Pi-m^2*b^2*cos(gamma_i*z)^2*cos(n*Pi)*sin(n*Pi)*cos(m*Pi)*sin(m*Pi)+m^3*b^2*cos(gamma_i*z)^2*cos(n*Pi)*sin(n*Pi)*Pi-m^2*b^2*sin(gamma_i*z)^2*n*cos(m*Pi)*sin(m*Pi)*Pi+m^3*b^2*sin(gamma_i*z)^2*n*Pi^2-cos(gamma_i*z)^2*n^2*cos(n*Pi)*sin(n*Pi)*a^2*cos(m*Pi)*sin(m*Pi)-cos(gamma_i*z)^2*n^2*cos(n*Pi)*sin(n*Pi)*a^2*m*Pi+cos(gamma_i*z)^2*n^3*a^2*cos(m*Pi)*sin(m*Pi)*Pi+cos(gamma_i*z)^2*n^3*a^2*Pi^2*m-sin(gamma_i*z)^2*n^2*cos(n*Pi)*sin(n*Pi)*a^2*cos(m*Pi)*sin(m*Pi)-sin(gamma_i*z)^2*n^2*cos(n*Pi)*sin(n*Pi)*a^2*m*Pi)*Pi*A^2*gamma_i*f*mu*exp(-2*gamma_r*z)/(a*m*b*n*_gammac2^2) alfac|alfac [Np/m]|Atenuación debida al conductor en Np/m|Wpc/(2*WT) gamma_rc|Re[gammac] [1/m]|Parte real de gamma en 1/m (con pérdidas en conductor)|gamma_r+alfac Exrc|Re[Exc(x,y,z)] [V/m]|Parte real del fasor campo eléctrico en dirección vector unitario x (con pérdidas en conductor)|(((2*Pi*f)*mu*gamma_i/(gamma_rc^2+gamma_i^2))*((exp(-gamma_rc*z)*(gamma_rc*cos(-gamma_i*z)-gamma_i*sin(-gamma_i*z))*(-A/(-_gammac2)))*(n*Pi/b)*cos(m*Pi*x/a)*sin(n*Pi*y/b))-((2*Pi*f)*mu*gamma_rc/(gamma_rc^2+gamma_i^2))*((exp(-gamma_rc*z)*(gamma_rc*sin(-gamma_i*z)+gamma_i*cos(-gamma_i*z))*(-A/(-_gammac2)))*(n*Pi/b)*cos(m*Pi*x/a)*sin(n*Pi*y/b))) Exic|Im[Exc(x,y,z)] [V/m]|Parte imaginaria del fasor campo eléctrico en dirección vector unitario x (con pérdidas en conductor)|(((2*Pi*f)*mu*gamma_i/(gamma_rc^2+gamma_i^2))*((exp(-gamma_rc*z)*(gamma_rc*sin(-gamma_i*z)+gamma_i*cos(-gamma_i*z))*(-A/(-_gammac2)))*(n*Pi/b)*cos(m*Pi*x/a)*sin(n*Pi*y/b))+((2*Pi*f)*mu*gamma_rc/(gamma_rc^2+gamma_i^2))*((exp(-gamma_rc*z)*(gamma_rc*cos(-gamma_i*z)-gamma_i*sin(-gamma_i*z))*(-A/(-_gammac2)))*(n*Pi/b)*cos(m*Pi*x/a)*sin(n*Pi*y/b))) Eyrc|Re[Eyc(x,y,z)] [V/m]|Parte real del fasor campo eléctrico en dirección vector unitario y (con pérdidas en conductor)|(((2*Pi*f)*mu*gamma_rc/(gamma_rc^2+gamma_i^2))*((exp(-gamma_rc*z)*(gamma_rc*sin(-gamma_i*z)+gamma_i*cos(-gamma_i*z))*(-A/(-_gammac2)))*(m*Pi/a)*cos(n*Pi*y/b)*sin(m*Pi*x/a))-((2*Pi*f)*mu*gamma_i/(gamma_rc^2+gamma_i^2))*((exp(-gamma_rc*z)*(gamma_rc*cos(-gamma_i*z)-gamma_i*sin(-gamma_i*z))*(-A/(-_gammac2)))*(m*Pi/a)*cos(n*Pi*y/b)*sin(m*Pi*x/a))) Eyic|Im[Eyc(x,y,z)] [V/m]|Parte imaginaria del fasor campo eléctrico en dirección vector unitario y (con pérdidas en conductor)|(-((2*Pi*f)*mu*gamma_i/(gamma_rc^2+gamma_i^2))*((exp(-gamma_rc*z)*(gamma_rc*sin(-gamma_i*z)+gamma_i*cos(-gamma_i*z))*(-A/(-_gammac2)))*(m*Pi/a)*cos(n*Pi*y/b)*sin(m*Pi*x/a))-((2*Pi*f)*mu*gamma_rc/(gamma_rc^2+gamma_i^2))*((exp(-gamma_rc*z)*(gamma_rc*cos(-gamma_i*z)-gamma_i*sin(-gamma_i*z))*(-A/(-_gammac2)))*(m*Pi/a)*cos(n*Pi*y/b)*sin(m*Pi*x/a))) Ezrc|Re[Ezc(x,y,z)] [V/m]|Parte real del fasor campo eléctrico en dirección vector unitario z (con pérdidas en conductor)|0 Ezic|Im[Ezc(x,y,z)] [V/m]|Parte imaginaria del fasor campo eléctrico en dirección vector unitario z (con pérdidas en conductor)|0 Hxrc|Re[Hxc(x,y,z)] [A/m]|Parte real del fasor campo magnético en dirección vector unitario x (con pérdidas en conductor)|((exp(-gamma_rc*z)*(gamma_rc*cos(-gamma_i*z)-gamma_i*sin(-gamma_i*z))*(-A/(-_gammac2)))*(m*Pi/a)*cos(n*Pi*y/b)*sin(m*Pi*x/a)) Hxic|Im[Hxc(x,y,z)] [A/m]|Parte imaginaria del fasor campo magnético en dirección vector unitario x (con pérdidas en conductor)|((exp(-gamma_rc*z)*(gamma_rc*sin(-gamma_i*z)+gamma_i*cos(-gamma_i*z))*(-A/(-_gammac2)))*(m*Pi/a)*cos(n*Pi*y/b)*sin(m*Pi*x/a)) Hyrc|Re[Hyc(x,y,z)] [A/m]|Parte real del fasor campo magnético en dirección vector unitario y (con pérdidas en conductor)|((exp(-gamma_rc*z)*(gamma_rc*cos(-gamma_i*z)-gamma_i*sin(-gamma_i*z))*(-A/(-_gammac2)))*(n*Pi/b)*cos(m*Pi*x/a)*sin(n*Pi*y/b)) Hyic|Im[Hyc(x,y,z)] [A/m]|Parte imaginaria del fasor campo magnético en dirección vector unitario y (con pérdidas en conductor)|((exp(-gamma_rc*z)*(gamma_rc*sin(-gamma_i*z)+gamma_i*cos(-gamma_i*z))*(-A/(-_gammac2)))*(n*Pi/b)*cos(m*Pi*x/a)*sin(n*Pi*y/b)) Hzrc|Re[Hzc(x,y,z)] [A/m]|Parte real del fasor campo magnético en dirección vector unitario z (con pérdidas en conductor)|((A*cos(m*Pi*x/a)*cos(n*Pi*y/b))*exp(-gamma_rc*z)*cos(-gamma_i*z)) Hzic|Im[Hzc(x,y,z)] [A/m]|Parte imaginaria del fasor campo magnético en dirección vector unitario z (con pérdidas en conductor)|((A*cos(m*Pi*x/a)*cos(n*Pi*y/b))*exp(-gamma_rc*z)*sin(-gamma_i*z)) Wpd|Wpd(z1,z2) [W]|Potencia disipada en el dieléctrico entre z1 y z2 (pérdidas de polarización)|-1/2*Pi^3*f^3*e_i*A^2*mu^2*(-n^2*cos(n*Pi)*sin(n*Pi)*a^2*cos(m*Pi)*sin(m*Pi)-n^2*cos(n*Pi)*sin(n*Pi)*a^2*m*Pi-m^2*b^2*n*cos(m*Pi)*sin(m*Pi)*Pi-m^2*b^2*cos(n*Pi)*sin(n*Pi)*cos(m*Pi)*sin(m*Pi)+m^3*b^2*cos(n*Pi)*sin(n*Pi)*Pi+n^3*a^2*cos(m*Pi)*sin(m*Pi)*Pi+n^3*a^2*Pi^2*m+m^3*b^2*n*Pi^2)*(-exp(-2*z2*gamma_rc)+exp(-2*z1*gamma_rc))/(gamma_rc*b*_gammac2^2*m*a*n) WH|WH(z1,z2) [J]|Valor medio de la energía magnética almacenada entre z1 y z2 en J|-1/32*mu*A^2*(-n^3*Pi^4*a^2*gamma_rc^2*m-m^3*Pi^4*gamma_i^2*b^2*n-n^3*Pi^4*a^2*gamma_i^2*m-a^2*_gammac2^2*b^2*m*Pi^2*n-n^3*Pi^3*a^2*gamma_rc^2*cos(m*Pi)*sin(m*Pi)+m^2*Pi^3*gamma_i^2*b^2*n*cos(m*Pi)*sin(m*Pi)+m^2*Pi^3*gamma_rc^2*b^2*n*cos(m*Pi)*sin(m*Pi)+n^2*Pi^2*a^2*gamma_rc^2*cos(m*Pi)*sin(m*Pi)*cos(n*Pi)*sin(n*Pi)-a^2*_gammac2^2*b^2*n*Pi*cos(m*Pi)*sin(m*Pi)-a^2*_gammac2^2*b^2*m*Pi*cos(n*Pi)*sin(n*Pi)+m^2*Pi^2*gamma_i^2*b^2*cos(m*Pi)*sin(m*Pi)*cos(n*Pi)*sin(n*Pi)-a^2*_gammac2^2*b^2*cos(m*Pi)*sin(m*Pi)*cos(n*Pi)*sin(n*Pi)-m^3*Pi^4*gamma_rc^2*b^2*n+n^2*Pi^3*a^2*gamma_i^2*m*cos(n*Pi)*sin(n*Pi)+n^2*Pi^2*a^2*gamma_i^2*cos(m*Pi)*sin(m*Pi)*cos(n*Pi)*sin(n*Pi)-m^3*Pi^3*gamma_rc^2*b^2*cos(n*Pi)*sin(n*Pi)-m^3*Pi^3*gamma_i^2*b^2*cos(n*Pi)*sin(n*Pi)+n^2*Pi^3*a^2*gamma_rc^2*m*cos(n*Pi)*sin(n*Pi)-n^3*Pi^3*a^2*gamma_i^2*cos(m*Pi)*sin(m*Pi)+m^2*Pi^2*gamma_rc^2*b^2*cos(m*Pi)*sin(m*Pi)*cos(n*Pi)*sin(n*Pi))*(-exp(-2*z2*gamma_rc)+exp(-2*z1*gamma_rc))/(b*_gammac2^2*gamma_rc*a*m*Pi^2*n) WE|WE(z1,z2) [J]|Valor medio de la energía eléctrica almacenada entre z1 y z2 en J|1/8*e_r*Pi^2*A^2*mu^2*f^2*(-n^2*cos(n*Pi)*sin(n*Pi)*a^2*cos(m*Pi)*sin(m*Pi)-n^2*cos(n*Pi)*sin(n*Pi)*a^2*m*Pi-m^2*b^2*n*cos(m*Pi)*sin(m*Pi)*Pi-m^2*b^2*cos(n*Pi)*sin(n*Pi)*cos(m*Pi)*sin(m*Pi)+m^3*b^2*cos(n*Pi)*sin(n*Pi)*Pi+n^3*a^2*cos(m*Pi)*sin(m*Pi)*Pi+n^3*a^2*Pi^2*m+m^3*b^2*n*Pi^2)*(-exp(-2*z2*gamma_rc)+exp(-2*z1*gamma_rc))/(gamma_rc*b*_gammac2^2*m*a*n) Genapplet v1.1 - 04/11/2005