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 ecuación de Laplace en coordenadas cilíndricas

1 ρ ρ ( ρ T ρ )+ 2 T z 2 =0

que resolvemos por el método de separación de variables T(ρ,z)=R(ρZ(z)

Z(z) 1 ρ d dρ ( ρ dR dρ )+R(ρ) d 2 Z d z 2 =0

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,

1 R 1 ρ d dρ ( ρ dR dρ )= 1 Z d 2 z d z 2 = k 2 ,{ d 2 R d ρ 2 + 1 ρ dR dρ + k 2 R=0 d 2 Z d z 2 k 2 Z=0

La primera ecuación diferencial se escribe

ρ 2 d 2 R d ρ 2 +ρ dR dρ + k 2 ρ 2 R=0

Haciendo el cambio de variable x=kρ

x 2 d 2 R d x 2 +x dR dx + x 2 R=0

Que es la ecuación diferencial de Bessel con n=0. Las soluciones de las dos ecuaciones diferenciales son

R(ρ)=A J 0 ( kρ )+B Y 0 ( kρ ) Z(z)=Cexp( kz )+Dexp( kz )

Se descarta el término Y0() ya que cuando ρ→0, Y0()→∞. Por tanto, el coeficiente B=0

Las condiciones de contorno son

{ T(ρ,0)=100 T(a,z)=0 T(ρ,h)=0

La condición de contorno en la superficie del cilindro, T(a, z)=0, hace que

A J 0 (ka)( Cexp(kz)+Dexp(kz) )=0

α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

T(ρ,z)= n=1 J 0 ( α n ρ a ) ( C n exp( α n a z )+ D n exp( α n a z ) )

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

0 1 x J 0 ( α m x) J 0 ( α n x)dx =0mn 0 1 x J 0 2 ( α n x)dx = 1 2 J 1 2 ( α n )

donde αm y αn son raíces distintas de J0(ka)=0 y x=ρ/a

  1. La primera ecuación es

  2. 0 1 xT(ρ,0) J 0 ( α m x )dx = 0 1 ( n=1 J 0 ( α n x ) ( C n + D n ) )x· J 0 ( α m x )dx 0 1 xT(ρ,0) J 0 ( α m x )dx =( C n + D n ) n=1 0 1 ( x· J 0 ( α m x ) J 0 ( α n x ) )dx 0 1 xT(ρ,0) J 0 ( α n x )dx =( C n + D n ) 1 2 J 1 2 ( α n )

    Si T(ρ,0)=100. Utilizamos la relación

    0 1 x J 0 ( α n x)dx = 1 α n J 1 ( α n )

    El resultado es

    100 α n = 1 2 ( C n + D n ) J 1 ( α n )

  3. La segunda ecuación es

  4. 0 1 xT(ρ,h) J 0 ( α m x )dx = 0 1 n=1 J 0 ( α n x ) ( C n exp( α n z a )+ D n exp( α n z a ) )x· J 0 ( α m x )dx 0 1 xT(ρ,h) J 0 ( α m x )dx = n=1 ( C n exp( α n z a )+ D n exp( α n z a ) ) 0 1 x J 0 ( α m x ) J 0 ( α n x )dx 0 1 xT(ρ,h) J 0 ( α m x )dx =( C n exp( α n h a )+ D n exp( α n h a ) ) 1 2 J 1 2 ( α n )

    Si T(ρ, h)=0.

    C n exp( α n h a )+ D n exp( α n h a )=0

Despejamos Cn y Dn del sistema de dos ecuaciones

C n = 200 α n J 1 ( α n ) exp( α n h a ) exp( α n h a )exp( α n h a ) = 100 α n J 1 ( α n ) exp( α n h a ) sinh( α n h a ) D n = 100 α n J 1 ( α n ) exp( α n h a ) sinh( α n h a )

La distribución de temperaturas con simetría axial es

T(ρ,z)=200 n=1 J 0 ( α n ρ a )sinh( α n hz a ) α n J 1 ( α n )sinh( α n h a )

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 length(alfa)=12 términos del desarrollo en serie

Utilizamos la función raices para calcular las raíces múltiples de una función, véase la página titulada Funciones MATLAB para calcular las raíces de una ecuació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,

1 R 1 ρ d dρ ( ρ dR dρ )= 1 Z d 2 z d z 2 = k 2 ,{ d 2 R d ρ 2 + 1 ρ dR dρ k 2 R=0 d 2 Z d z 2 + k 2 Z=0

La primera ecuación diferencial se escribe

ρ 2 d 2 R d ρ 2 +ρ dR dρ k 2 ρ 2 R=0

Haciendo el cambio de variable x=kρ

x 2 d 2 R d x 2 +x dR dx x 2 R=0

Que es la ecuación diferencial modificada de Bessel con n=0. Las soluciones de las dos ecuaciones diferenciales son

R(ρ)=A I 0 ( kρ )+B K 0 ( kρ ) Z(z)=Ccos( kz )+Dsin( kz )

Se descarta el término K0(ρ) ya que cuando ρ→0, K0(ρ)→∞, lo que implica que B=0

Las condiciones de contorno

{ T(ρ,0)=0 T(ρ,h)=0 T(a,z)=100

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

T(ρ,z)= n=1 D n I 0 ( nπ h ρ ) sin( nπ h z )

Las condición de contorno en la superficie lateral T(a, z) nos permite calcular el coeficiente Dn

T(a,z)= n=1 D n I 0 ( nπ h a ) sin( nπ h z )

Utilizamos el procedimiento para calcular los coeficientes del desarrollo en serie de Fourier de una función periódica

0 h T(a,z) sin( mπ h z )dz= 0 h { n=1 D n I 0 ( nπ h a ) sin( nπ h z ) }sin( mπ h z )dz 0 h T(a,z) sin( mπ h z )dz= n=1 D n I 0 ( nπ h a ) 0 h sin( nπ h z )sin( mπ h z )dz 0 h T(a,z) sin( nπ h z )dz= D n I 0 ( nπ h a ) h 2

>> 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

h nπ 100( 1cos(nπ) )= D n I 0 ( nπ h a ) h 2 D n = 400 nπ I 0 ( nπ h a ) ,n=1,3,5...

La distribución de temperaturas con simetría axial es

T(ρ,z)= 400 π n=1,3,5... 1 n I 0 ( nπ h ρ ) I 0 ( nπ h a ) sin( nπ h z )

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.

1 ρ ρ ( ρ T ρ )+ 1 ρ 2 2 T φ 2 =0

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(φ)

F(φ) 1 ρ d dρ ( ρ dR(ρ) dρ )+R(ρ) 1 ρ 2 d 2 F(φ) d φ 2 =0 ρ R(ρ) d dρ ( ρ dR(ρ) dρ )= 1 F(φ) d 2 F(φ) d φ 2 = k 2

Esto da lugar a dos ecuaciones diferenciales,

ρ 2 d 2 R d ρ 2 +ρ dR dρ k 2 R=0 d 2 F d φ 2 + k 2 F=0

Solución F(φ)

La solución de la segunda ecuación diferencial es sencilla

F(φ)={ Acos(kφ)+Bsin(kφ),k0 a 0 φ+ b 0 ,k=0

F(φ)=F(φ+2π) tiene que ser una función periódica

Solución R(r)

La solución, T(ρ,φ)=R(ρF(φ), es el producto de

F(φ)={ Acos(kφ)+Bsin(kφ) b 0 R(ρ)={ C ρ k +D ρ k ,k>0 c 0 lnρ+ d 0 ,k=0

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

T(ρ,φ)= A 0 + n=1 ρ n ( A n cos(nφ)+ B n sin(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

{ T(a,φ)=100,0φ<π T(a,φ)=0,πφ<2π

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

La distribución de temperaturas en el disco es

T(ρ,φ)=50+ 200 π n=1,3,5... ( ρ a ) n sin(nφ) n

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,

T(a,φ)= A 0 + n=1 a n ( A n cos(nφ)+ B n sin(nφ) )

Teniendo en cuenta las relaciones

0 2π cos(n x)cos(mx)dx=0,mn 0 2π sin(n x)sin(mx)dx=0,mn

0 2π sin(n x)dx=0, 0 2π cos(n x)dx=0 0 2π sin 2 (n x)dx=π, 0 2π cos 2 (n x)dx=π

>> 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

A 0 = 1 2π 0 2π f(φ)dφ A n = 1 π a n 0 2π f(φ)cos(nφ)dφ B n = 1 π a n 0 2π f(φ)sin(nφ)dφ

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

A 0 = 1 2π 1 2 0 2π ( 1+cos(2φ) )dφ = 1 2 A 2 = 1 π a 2 1 2 0 2π ( 1+cos(2φ) )cos(2φ)dφ = 1 2 a 2

La temperarura en el disco en el estado estacionario es

T(ρ,φ)= 1 2 + 1 2 ρ 2 a 2 cos(2φ)

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