La ecuación de Laplace, coordendas cilíndricas
Estado estacionario
Simetría axial

Resolveremos dos problemas que tiene simetría alrededor del eje Z y por tanto, es independiente del ángulo φ
Estudiaremos la distribución de temperaturas en el estado estacionario de un cilindro sólido de radio a y altura h cuando se especifica:
- La temperatura en la base inferior, T(ρ,0)
- La temperatura en la base superior, T(ρ, h)
- La temperatura en la superficie lateral, T(a, z)
La ecuación de Laplace en coordenadas cilíndricas
que resolvemos por el método de separación de variables T(ρ,z)=R(ρ)·Z(z)
Primer problema
La ecuación diferencial en derivadas parciales da lugar a un sistema de dos ecuaciones diferenciales. En esta ocasión, elegimos la igualdad a -k2,
La primera ecuación diferencial se escribe
Haciendo el cambio de variable x=kρ
Que es la ecuación diferencial de Bessel con n=0. Las soluciones de las dos ecuaciones diferenciales son
Se descarta el término Y0(kρ) ya que cuando ρ→0, Y0(kρ)→∞. Por tanto, el coeficiente B=0
Las condiciones de contorno son
La condición de contorno en la superficie del cilindro, T(a, z)=0, hace que
αn=ka son las raíces de la ecuación transcendente J0(ka)=0
La solución de la ecuación de Laplace es la superposición
Las condiciones de contorno en las bases inferior y superior T(ρ,0) y T(ρ, h) nos permiten calcular los coeficientes Cn y Dn. Utilizamos las relaciones de ortogonalidad de las funciones J(x) de Bessel para calcularlos
donde αm y αn son raíces distintas de J0(ka)=0 y x=ρ/a
La primera ecuación es
La segunda ecuación es
Si T(ρ,0)=100. Utilizamos la relación
El resultado es
Si T(ρ, h)=0.
Despejamos Cn y Dn del sistema de dos ecuaciones
La distribución de temperaturas con simetría axial es
Definimos la función que calcula la temperatura T(ρ, z) tomando los N raíces de la ecuación transcendente J0(ka)=0
function T = laplace_temperatura_2(x, z, alfa, a, h) T=0; for n=1:length(alfa) T=T+besselj(0,alfa(n)*x/a).*sinh(alfa(n)*(h-z)/a)/ (alfa(n)*sinh(alfa(n)*h/a)*besselj(1,alfa(n))); end T=T*200; end
Creamos un script para representar la temperatura T(ρ, z) en el recinto 0≤ρ≤a e 0≤z≤h, con a=1 y h=1. Se han tomado
Utilizamos la función
x=linspace(0,40,40); alfa=raices(@(x) besselj(0,x),x); %raíces a=1; %radio cilindro h=1; %altura [x,z] = meshgrid(0:0.05:a, 0:0.05:h); T=laplace_temperatura2(x, z, alfa, a, h); %T(x,y) mesh(x,z,T) xlabel('\rho') ylabel('z') zlabel('T(\rho,z)') title('Temperatura') view(71,32)
Segundo problema
La ecuación diferencial en derivadas parciales da lugar a un sistema de dos ecuaciones diferenciales. En esta ocasión, elegimos la igualdad a k2,
La primera ecuación diferencial se escribe
Haciendo el cambio de variable x=kρ
Que es la ecuación diferencial modificada de Bessel con n=0. Las soluciones de las dos ecuaciones diferenciales son
Se descarta el término K0(ρ) ya que cuando ρ→0, K0(ρ)→∞, lo que implica que B=0
Las condiciones de contorno
La condición de contorno en la base inferior del cilindro T(ρ, 0)=0 implica que C=0.
La condición de contorno en la base superior del cilindro T(ρ, h)=0 implica que sin(kh)=0, kh=nπ, (n=1,2,3...)
La solución de la ecuación de Laplace es la superposición
Las condición de contorno en la superficie lateral T(a, z) nos permite calcular el coeficiente Dn
Utilizamos el procedimiento para calcular los coeficientes del desarrollo en serie de Fourier de una función periódica
>> syms x h m n; >> assume(m,'integer') >> assume(n,'integer') >> res=int(sin(n*pi*x/h)*sin(m*pi*x/h),x,0,h); >> simplify(res) ans =0 >> res=int(sin(n*pi*x/h)^2,x,0,h); >> simplify(res) ans =h/2
Si la temperatura en la superficie lateral T(a, z)=100
La distribución de temperaturas con simetría axial es
Definimos la función que calcula la temperatura T(ρ, z) tomado N=10 términos del desarrollo en serie
function T = laplace_temperatura_3(x, z, a, h) T=0; for n=1:2:20 T=T+besseli(0,n*x/h).*sin(n*pi*z/h)/(n*besseli(0,n*pi*a/h)); end T=T*400/pi; end
Creamos un script para representar la temperatura T(ρ, z) en el recinto 0≤ρ≤a e 0≤z≤h, con a=3 y h=20.
a=3; %radio del cilindro h=20; %altura [x,z] = meshgrid(0:0.1:a, 0:0.1:h); T=laplace_temperatura_3(x, z, a, h); %T(x,y) mesh(x,z,T) xlabel('\rho') ylabel('z') zlabel('T(\rho,z)') title('Temperatura') view(71,32)
Distribución de temperaturas en un disco en el estado estacionario
La ecuación de la conducción del calor en el estado estacionario, independiente del tiempo, es la ecuación de Laplace en coordenadas cilíndricas.
La solución se escribe como producto de dos funciones una R(ρ) que depende solamente de ρ y otra F(φ), que depende solamente de φ. T(ρ,φ)=R(ρ)·F(φ)
Esto da lugar a dos ecuaciones diferenciales,
Solución F(φ)
La solución de la segunda ecuación diferencial es sencilla
F(φ)=F(φ+2π) tiene que ser una función periódica
Para k≠0, implica
Para k=0, implica que a0=0
Aplicando la fórmula de la diferencia de senos, sin(a+b)-sin(a-b)=2sinb·cosa
Solución R(r)
Para k≠0, hacemos la sustitución ρ=ex, x=lnρ, quedando una ecuación diferencial de coeficientes constantes, cuya solución es inmediata
Cuando k=0, la solución de la primera ecuación diferencial es
La solución, T(ρ,φ)=R(ρ)·F(φ), es el producto de
Se descarta los términos ρ-k y lnρ, que se hacen infinito cuando ρ→0. La solución de la ecuación de Laplace es la superposición
Primer problema

Supongamos un cilindro muy largo, la mitad de la superficie lateral se mantiene a 100 grados y la otra mitad se mentiene a 0 grados
La distribución de temperaturas no depende de z solamente de la distancia radial ρ y del ángulo φ
Calculamos los coeficientes An y Bn a partir de las condiciones de contorno
Coeficientes Bn
>> syms x m n; >> assume(m,'integer') >> assume(n,'integer') >>z= int(sin(m*x)*cos(n*x),x,0,2*pi); >> simplify(z) ans =0 >> z= int(sin(n*x)*cos(n*x),x,0,2*pi); >> simplify(z) ans =0 >> z= int(sin(m*x)*sin(n*x),x,0,2*pi); >> simplify(z) ans =0 >>z= int(sin(m*x)^2,x,0,2*pi); >> simplify(z) ans =pi
Coeficientes An
>> z= int(cos(m*x)^2,x,0,2*pi); >> simplify(z) ans =pi >> z= int(cos(m*x)*sin(n*x),x,0,2*pi); >> simplify(z) ans =0 >> z= int(cos(n*x)*sin(n*x),x,0,2*pi); >> simplify(z) ans =0
MATLAB no da una respuesta única a la integral
Se calcula el coeficiente A0, sabiendo que la temperatura del punto T(a,π/2)=100
La serie vale π/4, A0=50
>> syms x; >> z=symsum(sin((2*x-1)*pi/2)/(2*x-1),x,1,inf); >> simplify(z) ans =pi/4
La distribución de temperaturas en el disco es
Definimos la función que calcula la temperatura T(ρ, φ) tomado N=50 términos del desarrollo en serie
function T = laplace_temperatura_4(r, phi, a) T=0; for n=1:2:100 T=T+((r/a).^n).*sin(n*phi)/n; end T=50+T*200/pi; end
Creamos un script para representar la temperatura T(ρ, φ) con a=1.
a=1; %radio disco r=0:0.1:1; phi=0:pi/180:2*pi; [r,phi]=meshgrid(r,phi); x=r.*cos(phi); y=r.*sin(phi); z=laplace_temperatura_4(r, phi, a); hold on surf(x,y,z) xlabel('x') ylabel('y') zlabel('T(r,\phi)') title('Temperatura disco') view(70,36)
Segundo problema
La función T(a,φ)=f(φ), 0≤φ<2π, describe la temperartura fija en el bode del disco, lo que nos permitirá calcular los coeficientes A0, A1,...An, B1,...Bn,

Teniendo en cuenta las relaciones
>> syms t m n; >> assume(n,'integer'); >> assume(m,'integer'); >> int(sin(n*t),t,0,2*pi) >> simplify(ans) ans =0 >> int(cos(n*t),t,0,2*pi) ans =0 >> int(cos(n*t)^2,t,0,2*pi) >> simplify(ans) ans =pi >> int(sin(n*t)^2,t,0,2*pi) >> simplify(ans) ans =pi
Los coeficientes valen
Ejemplo
La temperatura fija en el bode del disco viene descrita por la función f(φ)=cos2φ=(1+cos(2φ))/2. Los coeficientes no nulos son
La temperarura en el disco en el estado estacionario es
r=0:0.1:1; phi=0:pi/50:2*pi; [r,phi]=meshgrid(r,phi); x=r.*cos(phi); y=r.*sin(phi); z=1/2+(r.^2).*cos(2*phi)/2; hold on surf(x,y,z) xlabel('x/a') ylabel('y/a') zlabel('T(\rho,\phi)') title('Temperatura disco') view(30,47)
Referencias
Physics 116C Home Page---Fall 2011, VI. Solutions to Homework Problem Sets and Exams. Problems 1, 3, 4