Aplicaicon de EES para La Trasnferencia de Calor PDF
Aplicaicon de EES para La Trasnferencia de Calor PDF
Aplicaicon de EES para La Trasnferencia de Calor PDF
Tesis de Maestría elaborada como requisito parcial para optar al título de:
Magister en Ingeniería Química
Supervisión:
Ingeniero Químico, MSc, PhD.
CARLOS ARIEL CARDONA ALZATE
This paper presents in a didactical way, the analytical, numerical and computational analysis
of a several cases of mass and/or heat transfer in transient state. The variable separation
method and Laplace transform method are used for the analytical study, and the finite
difference method using the Euler´sexplicit, the fully implicit, the Crank Nicolson and /or the
linea's technics, for the numerical study. All the calculations arising from the previous steps
are performed with the Engineering Equation Solver (EES), fchart software.
This work is expected to serve as a guide for the software to be used by undergraduate and
graduate students in solving engineering problems.
A mi tutor Carlos Ariel Cardona por su respaldo irrestricto. A cada uno de los compañeros
de la maestría por su acogida y colaboración.
Participación en eventos
4th International Conference on Sustainable Solid Waste CYPRUS 2016. Tipo de evento:
Congreso. Ámbito: Internacional. Realizado del: 2016-06-23, 2016-06-25 en Chipre,
Limassol:
Ponencia: C. Andrés García, Á. Gómez Peña, R. Betancourt G., C. Ariel Cardona Alzate.
Environmental comparison of thermochemical and biochemical ways for producing energy
from agricultural solid residues: The cut coffee stems case.
Figura 1.1. Transferencia de calor en estado transitorio unidimensional para placa plana,
cilindro largo y esfera. ............................................................................................................. 26
Figura 1.2. Placa plana, cara aislada, cara convectiva ......................................................... 30
Figura 1.3. Función F sin Bi cos para Bi 1 y Bi 5 ............................................. 36
Figura 1.4. Ej 1.1: Placa plana de acero inoxidable ............................................................... 39
Figura 1.5. Distribución de temperaturas en la placa ............................................................ 40
Figura 1.6. Placa plana, difusión unidimensional en estado transitorio ................................ 46
Figura 1.7. Ej 1.3: Conducto vertical ...................................................................................... 55
Figura 1.8. Solución gráfica, aproximación a un término variando Fo .................................. 58
Figura 1.9. Solución gráfica a 1 y 10 términos métodos separación de variables y
transformada de Laplace ........................................................................................................ 59
Figura 1.10. Solución gráfica a 1 sólo término por los métodos separación de variables y
transformada de Laplace y a 20 términos usando EES ........................................................ 63
Figura 1.11. Ej 1.4: Estanque solar ........................................................................................ 63
Figura 1.12. Geometría esférica ............................................................................................. 75
Figura 1.13. Solución gráfica y * cos Bi 1 * sen para Bi 1 ......................... 76
Figura 1.14. Perfil de temperaturas en la esfera en dos tiempos diferentes ......................... 78
Figura 1.15. Fourier crítico esferas ........................................................................................ 78
Figura 1.16. Cilindro largo con convección ............................................................................ 85
Figura 1.17. Primeros cinco valores propios de la ecuación (1.62) para Bi 1 y 10 ........... 92
Figura 1.18. Perfil de temperaturas ........................................................................................ 95
Figura 1.19. Distribución de temperaturas en un sólido semi-infinito para tres condiciones
superficiales: Temperatura constante en la superficie, flujo constante de calor en la
superficie, y convección superficial ...................................................................................... 100
Figura 1.20. Perfiles de temperatura para dos tiempos pequeños ...................................... 101
Figura 1.21. Similitud de los perfiles luego de la transformación ........................................ 102
Figura 1.22. Contacto interfacial entre dos sólidos semi - infinitos a diferentes temperaturas
iniciales ................................................................................................................................. 113
Figura 1.23. Paralelepípedo infinito de sección ................................................................... 115
Figura 1.24. Barra rectangular infinita .................................................................................. 117
Figura 1.25. Extremo de un cilindro semi-infinito ................................................................. 119
Figura 1.26. Perfil de temperaturas a 15 cm del extremo de la barra cilíndrica .................. 120
Figura 1.27. Ej 1.13: Lata de gaseosa ................................................................................. 121
Figura 1.28. Esfera con película dieléctrica ......................................................................... 128
Figura 1.29. Placa de aluminio ............................................................................................. 130
Figura 1.30. Ej 1.19: Tanque de líquido ............................................................................... 137
Figura 1.31. Ej 1.23: Tanques en serie ................................................................................ 141
Figura 2.1. Pared de ladrillo ................................................................................................. 162
Figura 2.2. Placa plana con una superficie aislada y otra convectiva ................................. 162
Figura 2.3. Distribución inicial y perfil de temperatura ......................................................... 168
Figura 2.4. Temperatura del centro contra el tiempo de simulación en centésimos de hora.
............................................................................................................................................... 170
Figura 2.5. Perfil de temperatura en cada nodo................................................................... 170
Figura 2.6. Perfil de temperatura en diferentes tiempos...................................................... 171
Figura 2.7. Placa plana sin generación en estado inestable ............................................... 172
Figura 2.8. Perfil de temperatura placa ................................................................................ 175
Figura 2.9. Distribución de temperatura con h variable, método implícito .......................... 175
Figura 2.10. Ejemplo 2.2....................................................................................................... 176
Figura 2.11. Distribución de temperatura en el sólido ......................................................... 180
Figura 2.12. Distribución de temperatura en el sólido usando EES .................................... 182
Figura 2.13. Placa plana con h igual y temperatura diferente en ambos lados .................. 185
Figura 2.14. Ej 2.3: Nodos de la placa plana ....................................................................... 192
Figura 2.15. Perfil de temperatura métodos explícito, implícito, Crank Nicolson y analítico
............................................................................................................................................... 195
Figura 2.16. Perfil de temperatura placa cada 5 min por método analítico y Crank Nicolson
............................................................................................................................................... 196
Figura 2.17. Perfil de temperatura a lo largo de la placa plana ........................................... 202
Figura 2.18. Nodos pared de ladrillo .................................................................................... 203
Figura 2.19. Perfil de temperatura con coeficiente convectivo variable .............................. 204
Figura 2.20. Perfil de temperatura a las 27 horas ................................................................ 205
Figura 2.21. Zoom del perfil de temperatura a las 27 horas ................................................ 205
Figura 2.22. Perfiles de temperatura en una placa plana asimétrica transitoria ................. 207
Figura 2.23. Temperatura adimensional en una placa de espesor L .................................. 210
Figura 2.24. Difusión transitoria de Helio en un tubo ........................................................... 217
Figura 2.25. Perfil de concentraciones para la difusión transitoria de Helio en un tubo ..... 218
Figura 2.26. Concentración de placa asimétrica .................................................................. 219
Figura 2.27. Ej 2.7: Membrana porosa ................................................................................. 220
Figura 2.28. Perfil de concentración ..................................................................................... 221
Figura 2.29. Perfil de concentración con el tiempo .............................................................. 222
Figura 2.30. Perfil de temperatura ........................................................................................ 223
Figura 3.1. Placa plana con generación en estado inestable .............................................. 252
Figura 3.2. Solución analítica de la placa con generación .................................................. 264
Figura 3.3. Solución numérica (Crank Nicolson) de la placa con generación ..................... 264
Figura 3.4. Perfil de concentración sistema semi-infinito .................................................... 272
Figura 3.5. Ej 3.5: Nodos varilla de acero ............................................................................ 275
Figura 3.6. Perfil de temperatura método analítico .............................................................. 276
Figura 3.7. Perfil de temperatura método implícito .............................................................. 277
Figura 3.8. Distribución de temperatura de la manzana a diferentes tiempos .................... 283
Figura 3.9. Distribución de temperatura en la manzana (esfera con generación) a según el
r* ............................................................................................................................................ 284
Figura 3.10. Perfil de temperatura método Crank Nicolson ................................................. 285
Figura 4.1. Distribución de nodos ......................................................................................... 304
Figura 4.2. Simetría esférica ................................................................................................ 315
Figura 4.3. Coordenadas esféricas ...................................................................................... 315
Figura 4.4. Simetría cilíndrica ............................................................................................... 318
Figura 4.5. Coordenadas cilíndricas ..................................................................................... 319
TABLA DE CONTENIDO DE TABLAS
UNIDADES GENERALIZADAS:
LETRAS
A Especie química
Az Superficie perpendicular a z [L2]
B Especie química
Bi Número deBiot, hL / k ó hR / k
Ci Coeficiente del i-ésimo término en una serie de Fourier
CP Capacidad calorífica a presión constante [E/M.T]
CV Capacidad calorífica a volumen constante [E/M.T]
c Concentración molar total [moles/L3]
ci Concentración molar de la especie i [moles/L3]
D Diámetro [L]
Deq Diámetro equivalente [L]
2
Def Difusividad efectiva [ L / t ]
2
Dij Coeficiente de difusión de i en j [ L / t ]
Eb Potencia emisiva [E/L2]
f Factor de fricción, adimensional
Fo Número de Fourier, tiempo adimensional
2
g Aceleración de la gravedad [ L / t ] ; gramo
G Potencial químico
Gr Numero de Grashoff, adimensional
Coeficiente de transferencia de Calor [ E / L t T ] ; constante de
2
h
Planck
hR Humedad relativa
H Constante de la ley de Henry [presión/fracción molar]
i Corriente eléctrica [amperios]
In x Función de Bessel modificada de primera clase y orden n del
argumento x
J Densidad de flujo molar [moles/t.L2]
j Densidad de flujo másico [M/t.L2]
Jn x Función de Bessel de primera clase y orden n del argumento x.
k
kB constante de Boltzmann [E/T]
k Coeficientes de transferencia de masa [L/t]
kG Coeficiente de transferencia de masa [moles/t.L 2.presión]
kx,y Coeficientes de transferencia de masa, [moles/t.L 2.fracción molar]
k’ Constante para reacción de primer orden
K Kelvin; Coeficiente global de transferencia de masa
Kn x Función de Bessel modificada de segunda clase y orden n del
argumento x
L Altura de una aleta; longitud [L]; espesor de una placa
Le Numero de Lewis, /Dij =Sc/Pr (adimensional)
m Caudal molar [moles/t]
m’ Caudal másico [M/t]
Mi Peso molecular de i [M/mol]
ni Densidad de flujo másico de la especie i [M/t.L 2]
Ni Densidad de flujo molar de la especie i [moles/t.L 2]
Nu Numero de Nusselt (adimensional)
P Presión total [M/L.t2]; perímetro [L]
Pi Presión parcial de i [M/L.t2]
Pe Numero de Peclet, Re.Pr ó Re.Sc (adimensional)
Pr Numero de Prandtl, / , adimensional.
Q’ Caudal volumétrico [L3/t]
Q Flujo de energía [E/t]
Densidad de flujo de energía [ E / t L ]
2
q
r Coordenada radial [L]
r* Posición radial, adimensional
R Radio de cilindro o de esfera
Constante universal de los gases
Re Numero de Reynolds, adimensional
Si Superficie perpendicular a dirección i
Sc Numero de Schmidt, / Dij , adimensional
Sh Numero de Sherwood, coeficiente adimensional de transferencia de
masa
t Espesor aleta
Coeficiente global de transferencia de calor [ E / L t T ] ; momento
2
U
dipolar
V Velocidad
V Volumen
xC Longitud crítica
xi,yi Fracción molar de la especie i
Xi,Yi Relación molar de la especie i
x, y, z coordenadas cartesianas
z* Coordenada adimensional
Yn x Función de Bessel de segunda clase de orden n del argumento x
w Ancho aleta
wi Fracción másica de la especie i
Wi Relación másica de la especie i
LETRAS GRIEGAS
Difusividad térmica [ L2 / t ]
Coeficiente de expansión térmica [T ]; Difusividad generalizada
[ L2 / t ]
Coeficiente de “expansión másica” [ L3 / M ]
Espesor [L]
Diferencia
Emisividad, fracción de vacío, parámetro de Lennard – Jonnes;
eficacia
n Valor propio
eficiencia; parámetro adimensional
Temperartura adimensional
Trayectoria libre media, longitud de onda [L]
n Valor propio
Viscosidad [M/L.t]
Viscosidad cinemática o difusividad de impulso, / , [ L2 / t ]
i Concentración másica volumétrica de i [M/L 3]
densidad [M/L3]
e Resistividad eléctrica [ m]
tensión superficial [ M / t 2 ] ; parámetro de Lennard Jonnes [L];
constante de Stefan – Botzmann [ E / t L2 T ]
4
Tiempo adimensional
ij Flujo de cantidad de movimiento j en la dirección i o esfuerzo cortante
actuando en la dirección j sobre un área perpendicular a i [M/L.t2]
Término de generación
Concentración generalizada
Integral de colisión; ohmio
16
INTRODUCCIÓN
Para analizar un problema del mundo real de manera científica se debe modelar
matemáticamente a través de conceptos básicos. Estos conceptos son la conservación de
las especies químicas, la conservación de la materia, la conservación de la cantidad de
movimiento y la conservación de la energía. Para cada una de estas entidades que se
conservan se puede escribir un balance de flujos que describa la transformación de las
mismas. Este balance se expresa en forma matemática, tanto a nivel macroscópico como
microscópico. La desigualdad entrópica también es un concepto básico, pero
esencialmente indica si un proceso es factible o no y no es base de una ecuación de
balance.
Para simular un fenómeno físico tal como flujo de fluidos, transferencia de calor,
transferencia de masa, los principios de conservación se expresan en términos de
ecuaciones diferenciales parciales. Estas ecuaciones se conocen como ecuaciones de
conservación.
z z
Todavía no se ha dicho por qué
mecanismo físico se produce la entrada
y y y salida de . Para los fenómenos
que estudiamos se transporta por dos
mecanismos primarios: difusión, debida
a movimientos moleculares y
convección debida al movimiento del
x x x fluido.
dif x ,
x
z
aquí es una propiedad del sistema, una difusividad, con dimensiones de
2
longitud .
tiempo
convx Vx .
Teniendo presente que x convx dif x y que expresiones similares se escriben para las
direcciones y y z , ordenando términos y dividiendo por xyzt , el balance es:
t t t
x x x y y y z z z .
t x y z
18
x y z
,
t x y z
/ t .
V .
t
V V V .
19
Un balance global de materia, donde no habrá término de generación (la masa ni se crea ni
se destruye a no ser en reacciones nucleares), ni gradientes, por lo que es la densidad
del sistema masa total por unidad de volumen,
V V V 0 ,
t t
V 0 .
Teniendo los análisis anteriores en cuenta, el balance toma la forma:
V 2 .
t
2 .
t
20
OBJETIVOS
OBJETIVO GENERAL
El modelo matemático obtenido en el aparte anterior será resuelto para sistemas con
gradientes solamente en una dirección tanto de forma analítica como numérica y las
expresiones resultantes se solucionarán usando el software Engineering Equation Solver
(EES) de fchart.
OBJETIVOS ESPECÍFICOS
4. Se hace un manual de uso del software EES atendiendo las sugerencias hechas por
los estudiantes del curso. Se agrega una sección que facilita la comprensión y el uso
de los métodos numéricos basados en diferencias finitas con ayuda del software
EES.
21
PROCESOS EN ESTADO TRANSITORIO
De otra parte, una alta fracción de las operaciones ingenieriles de transferencia de masa,
involucran transferencia entre dos fases una de las cuales está dispersa como gotas o
burbujas en la otra. Un acercamiento al análisis teórico de estos procesos asume que las
gotas o burbujas de la fase dispersa pueden mirarse como esferas, en las cuales la
transferencia ocurre por difusión molecular no estacionaria. Algunos problemas de secado
presentan también esta geometría.
22
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
Sobre este tema se ha realizado una gran cantidad de trabajo a todo nivel de complejidad y
sofisticación matemática y física, que está disponible en la literatura sobre el tema. En
textos como el clásico Carslaw y Jaeger se encuentran métodos de solución que van desde
la separación de variables, la superposición de fuentes y sumideros de calor, el teorema de
Green, además de las transformadas integrales y la muy útil transformada de Laplace,
como también una introducción a la solución por diferencias finitas.
Modelo matemático: Para explicar los efectos de los procesos de transferencia de masa y
calor se necesitan modelos matemáticos. Estos modelos se desarrollan utilizando los
principios fundamentales de la física, los principios de conservación. Una vez que se
23
PROCESOS EN ESTADO TRANSITORIO
v 2 . (1.1)
t
El símbolo representa una concentración que puede ser de energía térmica CPT en
dimensiones de energía por unidad de volumen, concentraciones másicas que puede estar
en una de las diferentes formas de expresarla, por ejemplo c A en moles de la especie A por
unidad de volumen o A masa de la especie A por unidad de volumen de la solución,
concentraciones de cantidad de movimiento V cantidad de movimiento por unidad de
volumen.
2 . (1.2)
t
En ausencia de generación la ecuación anterior se reduce a:
2 . (1.3)
t
Coordenadas rectangulares:
2
2 , (1.4)
z 2
24
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
2
. (1.4a)
t z2
1
2 r , (1.5)
r r r
1
r . (1.5a)
t r r r
1 2
2 r , (1.6)
r 2 r r
1
2 r2 . (1.6a)
t r r r
0 para la placa ( r z)
1
m rm
2
con m 1 para el cilindro . (1.7)
r r r 2 para la esfera
Así, en forma general, el balance en estado transitorio unidimensional sin generación, con
propiedades constantes, ecuación (1.3) toma la forma
0 para la placa ( r z)
1
m rm con m 1 para el cilindro . (1.3a)
t r r r 2 para la esfera
25
PROCESOS EN ESTADO TRANSITORIO
Para hallar la solución analítica se dispone de varias técnicas matemáticas tales como la
separación de variables, la transformada de Laplace, las transformadas integrales, la
variable compleja, la combinación de variables, series de Fourier, etc.
Dependiendo de las condiciones límite y el método utilizado, las soluciones tienen una de
dos formas estándar: a) Series de la función de error o sus integrales relacionadas; estas
soluciones son más útiles en la evaluación numérica para tiempos cortos o sea en las
etapas iniciales de la difusión. b) Series trigonométricas, las cuales convergen más
satisfactoriamente para valores grandes del tiempo. Cuando la difusión ocurre en geometría
cilíndrica, las series trigonométricas son reemplazadas por series de funciones de Bessel.
Figura 1.1. Transferencia de calor en estado transitorio unidimensional para placa plana, cilindro largo y esfera.
0 para la placa (r z )
T 2T m T
2 con m 1 para el cilindro . (1.8)
t r r r 2 para la esfera
T T
Temperatura adimensional; T0 constante.
T0 T
2 m
. (1.9)
2
0 para 0 . (1.10a)
T T
k h T T para z L, o k h T T para r R .
z r
Bi para 1 , (1.10b)
la condición inicial es
, F G . (1.11)
28
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
Las funciones F y G dependen solo de una variable y deben satisfacer la ecuación (1.9):
dG d 2 F m dF
F G , (1.12)
d d d
reagrupando
1 dG 1 d 2 F m dF
.
2
(1.13)
G d F d d
dG
2G 0 , (1.14)
d
d 2 F m dF
2F 0 . (1.15)
d d
2
G C1 exp 2 Fo , (1.16)
es de la misma forma para las tres geometrías. Sin embargo depende de la solución de la
función F que es diferente en los tres casos, a pesar de que esta debe satisfacer las
mismas condiciones de frontera:
dF
0 para 0, (1.15a)
d
dF
BiF para 1. (1.15b)
d
29
PROCESOS EN ESTADO TRANSITORIO
La ecuación (1.15) es una ecuación diferencial lineal, homogénea de segundo orden con
condiciones de frontera homogéneas y es un parámetro adimensional no especificado
independiente de r * , conforma una ecuación de Sturm Liouville y sus funciones solución
son ortogonales respecto a la función de peso r * . Los valores de para los cuales la
solución no es trivial ( F 0 ), son los valores propios (eigenvalues) y las funciones solución
las funciones propias. Todos los valores propios son reales positivos. El cero no es valor
propio (Mickley H. S., 1957). Los valores propios forman una serie infinita monótona
creciente.
r z F z F z dz 0
b
m n para m n , (1.16a)
a
r z F z F z dz N
b
m n para m n , (1.16b)
a
donde m y n son enteros y N una constante positiva. Los límites de integración a y b son
los dos puntos donde se estipulan las condiciones límite, en nuestro caso cero y uno
respectivamente.
Determinamos a continuación el valor de la función F y los valores propios para las tres
formas geométricas descritas.
T T
k H C p . (1.9b)
z z t
T 2T
para 0 z L ; t 0 ,
t z 2
T
z0 0 t 0,
z
T
zL k h T T t 0.
z
2
para 0 z L ; t 0 , (i)
t z 2
z0 0 t 0, (ii)
z
zL k h 0 t 0, (iii)
z
y la condición inicial:
z, t F z G t , (v)
t' z, t F z G ' t ,
z' z, t F ' z G t ,
z'' z, t F '' z G t ,
Reemplazando en (i)
1
F '' z G t F z G ' t .
Dividiendo por F z G t
F "( z ) G '(t )
2 .
F ( z) G(t )
G t C1 exp 2t . (vi)
d 2F
2
2F 0 . (1.17)
dz
Usando el operador D d :
dz
D 2
2 F 0, entonces D i D i F 0 siendo i 1 .
32
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
dF
i dz .
F
Es decir
1 i
2e 12 ei cos ,
F z C2 sen z C3 cos z ,
k cos z h cos z 0 o k sen L h cos L 0 .
z z L
Así los valores propios n son las raíces positivas de la ecuación trascendental:
hL
L tan L . (vii)
k
z , t Cn F z G t , (viii)
1
L
0 cuando n m
cos z cos
0
n m z dz .
N cuando n m
Obtenemos
L
L
f z cos n z dz Cn cos 2 n z dz , (ix)
0
0
L
L 1
N cos 2 n z dz sen 2 n L . (x)
2 4 n
0
La integral del lado izquierdo en (ix) la realizamos teniendo en cuenta que en nuestro caso
la distribución inicial de temperaturas es constante, 0 1 :
34
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
An cos n z dz 1 / n sin n L ,
L
(xi)
0
An
Cn .
N
Reemplazando An en la expresión para el perfil de temperatura (viii) obtenemos:
y los valores discretos (propios o valores eigen) de n son las raíces positivas de la
ecuación trascendental
n tan n Bi . (1.19c)
Este número infinito de raíces son los valores propios o eigenvalues que satisfacen las
condiciones impuestas. Estos valores se encuentran en los intervalos
n 1 n n 12 con n 1, 2, .
hL
Bi para transferencia de calor. (1.19d)
k
N n Bi Bi
2 2
2 n2 Bi 2
.
L
L
1 T T Tm T senn
dz Cn exp(n2 Fo) . (1.19e)
L T0 T
T0 T n 1 n
0
Gracias a la tecnología computacional disponible, tanto esta expresión como la del perfil de
temperaturas presentan ventajas sobre soluciones gráficas, en especial en programas de
simulación donde aparecen procesos en estado transitorio. Sin embargo, dado que todavía
en muchos libros de texto se utiliza, se presenta el siguiente procedimiento, innecesario
como se acaba de mencionar.
Q T0 Tm T T
1 m . (1.20b)
Q0 T0 T T0 T
También para el cálculo de los perfiles de temperatura fueron ampliamente usados los
gráficos de Heisler pero tal como ocurre con la expresión anterior son inútiles en la
actualidad.
En algunos casos y para uso de calculadoras sencillas, es conveniente saber que para
valores del parámetro de Fourier mayores a aproximadamente 0.2, solo se requiere el
primer término de la serie infinita.
Se debe tener en cuenta que los valores propios n deben obtenerse resolviendo la
ecuación trascendental. Esta ecuación puede resolverse numéricamente conociendo Bi .
Se comprende mucho mejor el sentido físico de las magnitudes de estos valores propios si
observamos que esta ecuación puede escribirse como:
F n sin n Bi cos n .
Al dibujar esta función, los valores que hacen cero la función son los valores propios n . Se
observa que ocurren a intervalos de , en la primera mitad del intervalo, es decir
n 1 n n 1 / 2 , con n 1, 2, 3,
10
Bi=5
Bi=1
5
0
F
-5
-10
-15
0 3,142 6,283 9,425 12,57
l
Figura 1.3. Función F sin Bi cos para Bi 1 y Bi 5
37
PROCESOS EN ESTADO TRANSITORIO
Transferencia de masa
c A 2c A ,
DAB (i)
t z 2
c A
Por simetría 0 en z 0 para todo t . (iii)
z
cA
Para t 0, DAB kc cAG cA en z L , (iv)
z
cA k
c cA mcA en z L , (v)
z mDAB
de aquí se deduce que la misma ecuación (1.19) puede usarse para resolver problemas de
transferencia de masa si hacemos
cA mcA kc L
y Bi para transferencia de masa.
cA0 mcA mDAB
La Figura 1.3 muestra que cada valor de n se encuentra en un intervalo definido así: 1
está entre 0y ;
2
2 entre y 2 ; s entre 2 y 2
2
, n entre
n 1 y n 1
. Esto es cierto independientemente del valor de Bi . Para generar
2
los valores propios usando EES (ver código de programación en la sección Notas al final
del capítulo) se establece el número de términos que se considera adecuado calcular y se
hallan los valores apropiados a suponer en cada intervalo usando el comando
“DUPLICATE” así:
Debe notarse que se calculan funciones trigonométricas de números reales, por lo cual se
debe establecer en el sistema de unidades de lectura de ángulos los radianes, así se esté
trabajando en calculadora o en computador. Los comandos que comienzan con $ son
"directivas". En este caso es muy útil introducir esta información al comienzo del código o
programa pues es posible olvidarse de dar la instrucción llamando el cuadro de diálogo que
asigna unidades manualmente. La información entre comillas no la tiene en cuenta el
ordenador y sirve para recordar qué hace el programa. No olvide colocar la información
correspondiente a cada problema en particular.
Ejemplo 1.1: Analizar una placa plana de un acero inoxidable de espesor 10 cm que se
enfría por sus dos caras mayores desde una temperatura uniforme de 40 °C hasta que su
temperatura máxima sea de 30 °C, en aire a 20 °C con coeficiente convectivo 120 W/m 2.K.
Las propiedades del sólido pueden considerarse constantes en los siguientes valores:
conductividad térmica k = 17.14 W/m.K, densidad 8563kg m3 , calor específico CP =
512 J/kg.K. Estimar el calor cedido por el sólido en este tiempo. ¿Cuál es la temperatura de
la superficie en ese momento?
39
PROCESOS EN ESTADO TRANSITORIO
35
34,5
34 Temperatura promedia
33,5
33 Perfil a los 691 s
32,5
32
31,5
31
30,5 Perfil a los 1520 s
T [C]
30 Temperatura promedia
29,5
29
28,5
28
27,5
27
26,5
26
25,5
25
0 0,1 0,2 0,3 0,4 0,5 0,6 0,7 0,8 0,9 1
z
Figura 1.5. Distribución de temperaturas en la placa
dT
k h T T fluido .
dz sólido
Lcar L
Tenemos entonces que la resistencia en el sólido es proporcional
k en el sólido ( car
es una longitud característica) y a 1 en el fluido
h
41
PROCESOS EN ESTADO TRANSITORIO
n sin n
cos n .
Bi
Al tender Bi hacia infinito, cos n 0 , lo que ocurre para valores de n dados por:
n 2n 1 / 2 con n 1, 2,
Así mismo, de la trigonometría sabemos que para estos valores de n el sen n 1
n 1
y
que el valor de la función seno para cualquier múltiplo entero de es cero por lo cual
sen 2n 0 . De esta manera
n 1
4 1
Cn con n 1, 2,
2n 1
La ecuación (1.19) toma entonces la forma
n 1
S 4 1
cos n z * exp n2 Fo . (1.19b)
0 S 1 2n 1
m S 8 1 2n 12 2
m 2 exp Fo . (1.19c)
0 S 1 2n 1 2
4
Para la última igualdad, usada para procesos de secado, se supone que el volumen del
sólido no se altera durante el proceso y por ello la densidad del sólido seco, ss , puede
considerarse constante, y basta dividir numerador y denominador del segundo término por
esta cantidad.
T TS
.
T0 TS
A la expresión (1.19b) se puede llegar por un análisis similar al que nos condujo a la
ecuación (1.19) cambiando la condición límite ecuación (1.15b) por un valor constante en la
superficie: para z* 1, s . La solución obtenida, al igual que la (1.19) converge
rápidamente para valores grandes del tiempo adimensional, Fo es aproximadamente
mayor o igual a 0.2..
Para estas condiciones límite es relativamente fácil encontrar una solución que converge
rápidamente para valores menores de Fourier usando transformada de Laplace.
43
PROCESOS EN ESTADO TRANSITORIO
Transformada de Laplace
Este método ha sido usado en la solución de mucha clase de procesos transitorios. Para
usarlo en la solución de la ecuación (1.8) asumimos que las propiedades k / CP
permanecen constantes en la región. Si trabajamos en coordenadas cartesianas,
T T x, y, z , t . Este método ofrece con frecuencia análisis simples para muchos
mecanismos físicos que se hacen difíciles de analizar a partir de la separación de variables.
LT x, y, z, t L(T ) T ( x, y, z ) e ptT ( x, y, z, t )dt T ( p) , (1.24)
0
aquí p puede ser complejo y su parte real es positiva y suficientemente grande para que la
integral converja. Así, si T t e , p debe ser mayor que 2.
2t
Debemos tener siempre presente que, así como la función original es función de t , su
transformada será función de p. La integral, una función de p , es la transformación de
T x, y, z , t a T x, y, z, p . Así, las transformadas de funciones corrientes son construidas
fácilmente efectuando la integral tal como en los siguientes ejemplos:
si T a, constante T a e pt dt a ,
p
0
si T eat , T e pt eat dt e p a t dt 1 ,
0 0
p a
si T sen wt , T e pt sen wt dt w .
0 p 2
w2
Algunas de las propiedades más corrientemente utilizadas de la transformada de Laplace
son (Arpaci p 343):
No Función Transformada
i C1 f t C2 g t C1 f p C2 g p
df t
ii pf p f 0
dt
n f x, t n f x, p
iii
x n x n
f d
t 1
iv 0 p
f p
1 p
v f t f
vi exp t f t f p
f t g d f p g p
t
vii
0
Tabla 1.1. Propiedades de la Transformada de Laplace
2T 2 pt 2T
L 2 2 e T z, t dt 2 ,
z z 0 z
T pt T
L e
dt pL(T ) T z,0 pT ( z ) T z,0 ,
t t
0
2T z , t 1 T z , t
.
z 2 t
2 T ( z) p T ( z,0 )
T ( z ) ,
z 2
i
1 t
T ( z, t )
e T ( )d ,
2i
i
En forma alterna, la placa o losa puede imaginarse lo suficientemente delgada como para
que los efectos de borde puedan despreciarse y tendremos difusión a través de dos caras
opuestas. Consideremos concentración inicial uniforme en cA0 , en toda la placa,
concentración constante c AS en las dos superficies mayores, difusión ocurriendo solo
normal a las dos superficies mayores las cuales son permeables al soluto A , propiedades
físicas constantes.
a a
c AS c AS
c A
N A 0.
t
N AZ J AZ cAvZ* J AZ .
47
PROCESOS EN ESTADO TRANSITORIO
cA 2 cA
D AB . (1.25a)
t z2
Haciendo Y c A c AS ,
Y 2Y
D AB , (1.25b)
t z2
condiciones límite:
La última de las condiciones de frontera surge del hecho de la simetría del sistema. En el
plano intermedio siempre habrá un máximo (o mínimo) de concentraciones. Esta condición
equivale también a que no haya flujo a través de tal plano, es decir que estuviese sellado a
la transferencia.
f z, t
Lt p f z, p f z,0 ,
t
f z, t f z, p
Lt .
z z
Y 2Y
Lt pY Yo DAB Lt 2 ,
t z
Y Lt Y ( z, t ) Y ( z, p) .
Por lo tanto
d 2 Y pY Y
2
o , (1.26)
dz D AB D AB
pC Y Y
0 o , entonces C 0 .
DAB DAB p
Yo
Y C1 exp mz C2 exp mz con m2 p
p DAB , (1.27)
dY
C1m exp mz C2m exp mz 0 entonces C1 C2 ,
dz
ahora para z L
Yo Y0
Y C1 exp mz exp mz 0 C1 ,
p p exp(mL) exp(mL)
o sea:
Yo Yo exp mz exp mz
Y .
p p exp mL exp mL
n n 1 n 2 2 n n 1 n 2 n 3 3
a b a n na n 1b a b a b
n
2! 3!
50
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
n 0
n 0
por lo cual
Y 1
1
n
exp p / DAB 2n 1 L z
1
n
exp p / DAB 2n 1 L z
.
Yo p n 0 p n0 p
La transformada inversa de cada término en estas dos series se encuentra en tablas; por
ejemplo, el ítem 8 en la tabla de transformadas de Laplace dada por (Crank, The
Mathematics of Diffusion, 1964) p.327 o ítem 83 (Mickley H. S., 1957) p.316, o numeral 30
(Arpaci, 1966) (tabla 4.16 al final del capítulo).
Dado que
cA cAS c c
1 A Ao ,
cAo cAS cAS cAo
cA cAo 2n 1 L z 2n 1 L z
1 erfc 1 erfc
n n
. (1.29)
cAS cAo n0 2 DABt n 0 2 DABt
c A c Ao 2n 1 z * 2n 1 z *
erfc erfc
n 1 n 1
1 1 . (1.29a)
c As c Ao n 1 2 Fo n 1 2 Fo
Las ecuaciones (1.29 y 1.29 a) convergen para cualquier valor del tiempo.
51
PROCESOS EN ESTADO TRANSITORIO
2 x
erf ( x)
0
exp( 2 )d , (1.30)
y dado que
exp( 2 )d
,
2
0
x 2n 1 1
n 1
2
2 x3 1 x5 1 x 7
erf x
2n 1 n 1!
x . (1.30a)
n 1 3 2! 5 3! 7
Esta expresión es válida para todo número real x , y también en todo el plano complejo.
Este resultado se basa en el desarrollo en serie de Taylor de exp x 2 que se integra
término a término.
exp 2 d .
2
erfc( x) 1 erf ( x)
x
(1.30b)
La serie (1.29) converge rápidamente para todos los valores de Fourier, menos aquellos
DAB t
valores para los cuales Fo 0.2 . Por ejemplo, para la concentración en el centro,
L2
z 0 , cuando Fo 1:
c A c A0
0.9590 0.0678 0.0008 0.8920 ,
c AS c A0
y cuando Fo 0.25
c A c A0
0.3146 0.0001 0.3145 ,
c AS c A0
para Fo 0.2 ,
c A c A0
0.2277 4.345 x10 6 0.2277 .
cAS cA0
cAo cAm D t 1 nL
0.5
2 AB2 0.5 2 1 ierfc
n
0.5 . (1.31)
cAo cAS L n 1 DABt
c Ao c Am 1
n
2 Fo 0.5 2 1 ierfc
n
. (1.31a)
cAo c AS n 1 Fo
Escribimos:
i nerfc( x) i n 1erfc( )d n 1, 2, 3,
x
i 0 erfc ( x) erfc ( x) ,
53
PROCESOS EN ESTADO TRANSITORIO
i1erfc ( x) ierfc ( x)
exp x 2 xerfc ( x) . (1.31b)
Ejemplo 1.2: Determinar el tiempo que se necesita para reducir el contenido de humedad
máximo a 10% en peso de una placa de arcilla de 5 cm de grueso colocada sobre una
banda que pasa a través de un secador continuo, lo que restringe el secado a una sola de
las superficies planas. El contenido inicial de humedad será 15 % en peso y el contenido de
humedad en la superficie bajo condiciones de secado constante se mantendrá a 4 % en
peso. La difusividad efectiva del agua a través de la arcilla es 1.3x10 -4 cm2/s.
Usando EES (ver código en sección Notas al final del capítulo) los resultados obtenidos
son:
El software puede producir un informe en PDF para lo cual debe instalarse el paquete
gratuito MikTeX Latex de la página http://miktex.org. En el manual o en la ayuda (help) se
encuentra más información en la sección LaTeX/PDF Report. Mostramos, como ilustración,
una parte del informe de este ejemplo:
Datos
L 0,05 m. (1)
wo 15. (4)
ws 4. (5)
wo
WAo . (6)
100 wo
ws
WAs . (7)
100 ws
t
Fo DAB 2 . (8)
L
zˆ z L.
zˆ 0. (9)
N 5. (10)
duplicate i 1; N (11)
1
t 1
t
2 i 1
cos 2 i 1 zˆ 2 exp 2 i 1 2 Fo 4
2
(12)
end (13)
zt 4 Sum 1.. N (14)
m ;t
1
2 i 1
2
exp 2 i 1 2 Fo 4
2
(18)
end (19)
Sum m ; 1.. N
8
mt (20)
2
WAm WAs WAo WAs mt (21)
WAm
wm 100 (22)
1 WAm
Resultados
DAB 1,300 108 m 2 s Fo 0,3666
L 0,05 m N 5
55
PROCESOS EN ESTADO TRANSITORIO
Ejemplo 1.3: Un conducto vertical de 10 pulgadas de diámetro interior tiene una conexión
horizontal de prueba de 0.5 pulgadas de diámetro interior terminada en una válvula 2 pies
fuera de la línea grande. Hidrógeno fluye a través de la línea grande a 100 psia y 15 °C por
varios días, y la línea de prueba es purgada y la válvula cerrada. El gas que fluye se cambia
de hidrógeno a un gas reformado que contiene 70 % molar de hidrógeno y 30 % molar de
metano y el flujo continúa a 100 psia y 15 °C. Una hora más tarde, un poco de gas de
prueba es removido para análisis, abriendo la válvula. Estime la composición del primer
pequeño incremento de gas retirado, asumiendo que el gas en la pequeña línea de prueba
ha permanecido completamente estancado.
10'’
2 pies
Solución: El sistema a estudiar es el pequeño tubo lateral y aunque se trata de un tubo los
gradientes de concentración son axiales por lo que es simetría cartesiana unidimensional.
Si seleccionamos el eje z en la dirección axial de tubo en cuestión, tendremos que cuando
se purgó el sistema y se cerró la válvula de su extremo, la composición a todo su largo es
uniforme de H2 puro. Cuando se crea la perturbación, la composición en su extremo abierto
(izquierdo en la Figura 1.7) cambia a 70% molar de hidrógeno, y dado su pequeño diámetro
se puede asumir que no hay efectos convectivos, es decir que los cambios que ocurran a lo
largo del tubo pequeño son solamente por difusión molecular. Con presión y temperatura
constantes en el sistema gaseoso, existe contradifusión equimolecular. Aplicando un
56
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
balance para la especie A en una longitud diferencial del tubo se llega a la ecuación
(1.25a):
cA 2 cA
D AB ,
t z2
dividiendo ambos lados de la igualdad por c , la concentración total que es constante por
estar a temperatura y presión constantes, se obtiene
yA 2 yA
DAB , (1.25c)
t z2
zt 4 Sum 1.. N . y A y As y Ao y As zt .
DAB 0,000009734 m 2 s . Fo 0,0943.
P 689476 Pa . T 288 K .
zt 0,9574. time 3600 s .
ws 4. WA 0,1111.
57
PROCESOS EN ESTADO TRANSITORIO
y A 0,9872.
i z i
1 0.7924
2 -0.04106
3 0.0005954
4 -0.000001598
5 7.256E-10
Tabla 1.2. Primeros 5 términos de la sumatoria usando EES
Parece más práctico, en este caso, usar las ecuaciones basadas en el método de
Transformada de Laplace, los resultados obtenidos son:
P 689476 Pa . T 288 K .
LPzt 0,9574. time 3600 s .
y ALP 0,9872.
De las ecuaciones (1.19) y (1.29) se nota que zt 1 LPzt . Los términos de la sumatoria
son ahora:
i LPzt i
1 0,0426
2 -9,834E-12
3 2,262E-30
4 -3,779E-58
5 4,220E-95
Tabla 1.3. Primeros 5 términos de la sumatoria método transformada de Laplace
58
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
Aunque las ecuaciones que se usan por este método son menos familiares al estudiante, es
claro que, si se conoce previamente el valor del módulo de Fourier, es más conveniente
utilizar las ecuaciones (1.29) si Fo 0.25 y las ecuaciones (1.19) si Fo 0.25 . Esto
especialmente si se trabaja con calculadoras científicas en lugar de computadoras, caso en
el cual se asegura una muy buena exactitud usando solo el primer término de la sumatoria
correspondiente.
Para verificar los límites de esta aproximación generamos la Figura 1.8 comparando
resultados a un término y a 10 términos variando Fo:
1
LaPlace 1 término
0,9 Separación Variables 1 término
0,8
0,7
0,6
0,5
yA
0,4
0,3
0,2
0,1
0
0 0,1 0,2 0,3 0,4 0,5 0,6 0,7 0,8 0,9 1
Fo
Figura 1.8. Solución gráfica, aproximación a un término variando Fo
La Tabla 1.4 muestra valores obtenidos con 10 y con 1 término por el método de
separación de variables ( y A , y A1 ) y por el método de transformada de Laplace ( y ALP , y ALP1 ).
La Tabla 1.5 enseña los mismos valores para la zona crítica establecida donde comienzan
a ser inexactos los cálculos a un término para ambos métodos. Estas tablas se grafican en
la Figura 1.8 y Figura 1.9 respectivamente. Del análisis de tablas y gráficos se obtiene un
estimativo de Fourier crítico 0.26 donde coinciden los cuatro valores a tres cifras decimales.
0,6 0,2677 0,2677 0,2677 0,2526 0,26 0,6188 0,6193 0,6188 0,6187
0,7 0,2091 0,2091 0,2091 0,1831 0,27 0,6038 0,6042 0,6038 0,6036
0,8 0,1634 0,1634 0,1634 0,1237 0,28 0,5892 0,5895 0,5892 0,5889
0,9 0,1277 0,1277 0,1277 0,07236 0,29 0,5749 0,5751 0,5749 0,5745
1 0,09976 0,09976 0,09976 0,02736 0,3 0,5609 0,5611 0,5609 0,5605
Tabla 1.4. Valores obtenidos métodos separación 0,31 0,5473 0,5474 0,5473 0,5468
variables y transformada de Laplace a 1 y 10 términos
0,32 0,534 0,5341 0,534 0,5333
0,33 0,521 0,5211 0,521 0,5202
0,34 0,5083 0,5084 0,5083 0,5074
0,35 0,4959 0,496 0,4959 0,4948
0,36 0,4838 0,4839 0,4838 0,4825
0,37 0,4721 0,4721 0,4721 0,4705
0,38 0,4606 0,4606 0,4606 0,4588
0,39 0,4493 0,4494 0,4493 0,4473
0,4 0,4384 0,4384 0,4384 0,436
Tabla 1.5. Valores obtenidos zona crítica métodos
separación de variables y transformada de Laplace a
1 y 10 términos
De la Figura 1.9 se observa que ambas soluciones a un solo término coinciden para
0.2 Fo 0.4 . De la Figura 1.8 y la Tabla 1.4, se concluye la validez de la solución por
separación de variables a un término, a 4 cifras decimales para Fo 0.37 (a dos decimales
para Fo 0.2 ), y la solución por transformada de Laplace es satisfactoria, a 4 cifras
decimales para Fo 0.23 (a dos cifras para Fo 0.4 ).
1
Separación de variables 1 término
0,9
0,8
0,6
yA
0,5
0,4
0,3
Transformada de Laplace 1 término
0,2
0 0,05 0,1 0,15 0,2 0,25 0,3 0,35 0,4 0,45 0,5 0,55 0,6
Fo
Figura 1.9. Solución gráfica a 1 y 10 términos métodos separación de variables y transformada de Laplace
60
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
A efecto de revisar el concepto sobre cortos tiempos para la pared convectiva, procedemos
a desarrollar una ecuación similar a la (1.19) para el ejemplo 1.1 con base en la
transformada de Laplace. El planteamiento es idéntico al que nos lleva a la ecuación (1.27)
pero se diferencia en el análisis de las condicioes de frontera:
Yo
Y C1 exp mz C2 exp mz con m2 p
p DAB , (1.27)
límite para z 0 ,
T
Ahora para z L , k h T T , es decir
z
61
PROCESOS EN ESTADO TRANSITORIO
Con C1 C2 C se obtiene
C k m / h e mL e mL e mL e mL Y0 / p .
Reemplazando se obtiene
Y0 Yo e mz emz
Y mL .
p p e
emL k m / h e mL e mL
Y 1 1 e e
m L z m L z
.
Y0 p p 1 k m / h 1 k m / h e2mL
m L z e m L z
Y 1 e 1
.
Y0 p p 1 k m / h 1 k m / h e 2 mL
1
1 k m / h
1
1 x n 1 1 x n ,
n 1 n
1 x x 2 x3
1 x n 0
Y 1
h/k e m L z e m L z h / k h / k m e m 3L z e m 3L z
Y0 p p h / k m p h / k m
2
Como se observa, cada término de la serie es más complejo. Invirtiendo solo los dos
primeros términos obtenemos una solución válida para tiempos cortos ( p y m grandes ). Los
ítem 1 y 37 de la tabla A.5 son aplicables:
62
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
T T 1 z * 1 z * Bi 1 z* Bi 2 Fo 1 z *
1 erfc erfc e erfc Bi Fo
T0 T 2 Fo 2 Fo 2 Fo (1.32)
Bi 1 z * Bi 2 Fo
e
erfc Bi Fo
1 z * .
2 Fo
También
T T0 1 z * 1 z * Bi 1 z* Bi 2 Fo 1 z *
erfc erfc e erfc Bi Fo
T T0 2 Fo 2 Fo 2 Fo
Bi 1 z* Bi 2 Fo
e
erfc Bi Fo
1 z * .
(1.32a)
2 Fo
Fo T1 TEES TLP
0,01 40,97 40 40
0,1 40,39 39,95 39,95
0,2 39,76 39,6 39,6
0,3 39,15 39,1 39,1
0,4 38,56 38,54 38,54
0,5 37,99 37,98 37,99
0,6 37,43 37,43 37,45
0,7 36,9 36,9 36,94
0,8 36,38 36,38 36,45
0,9 35,87 35,87 35,98
1 35,38 35,38 35,53
Tabla 1.7. Valores obtenidos de temperatura por cada uno de los métodos
valores para Fo 0.3 . De otra parte, la solución por transformada de Laplace, TLP , da
excelentes resultados para Fo 0.5 , pudiéndose reemplazar por la solución a un término a
partir de este valor.
63
PROCESOS EN ESTADO TRANSITORIO
41
Separación de Variables 1 término
39
T °C
38
37
36
35
0 0,1 0,2 0,3 0,4 0,5 0,6 0,7 0,8 0,9 1
Fo
Figura 1.10. Solución gráfica a 1 sólo término por los métodos separación de variables y transformada de
Laplace y a 20 términos usando EES
Ejemplo 1.4 (Problema 14.46 Incropera et al.[37] p 978): Un estanque solar opera sobre el
principio de que las pérdidas de calor de una capa poco profunda de agua, que actúa como
un absorbedor solar, se pueden minimizar al establecer un gradiente de salinidad vertical
estable en el agua. En la práctica tal condición se puede lograr mediante la aplicación de
una capa de sal pura al fondo y agregar una capa superpuesta de agua pura. La sal entra
en la solución en el fondo y se transfiere a través de la capa de agua por difusión, con lo
que se establecen condiciones de sal estratificada.
Como primera aproximación, la densidad total de masa y el coeficiente de difusión para
sal en agua ( DAB ) se pueden suponer constantes, con DAB 1.2 109 m2 s .
Solución: Para difusión en fase líquida podemos despreciar el término de arrastre por lo que
la ecuación (1.25a) escrita en términos de concentraciones másicas volumétricas es
A 2 A
DAB .
t z2
n 1
A AS 4 1
A0 AS 1 2n 1
cos n z * exp n2 Fo . (i)
n
2n 1
.
2
0.25 1
0.75 .
0 1
Esta es válida para z* 0 , por lo que la ecuación (i) debe resolverse para Fo .
La parte (c) se responde con el valor encontrado en la parte (b) para la concentración
promedia que es el valor uniforme que alcanzará la solución luego de un tiempo infinito, o si
se mezclara de manera uniforme, pues no está entrando más soluto al sistema.
Usando EES (ver código en sección Notas al finaldel capítulo) se obtienen los siguientes
resultados:
S 1 m 2 . V 1 m3 .
theta _ mt 0, 4807. theta _ zt 0,75.
Observando la Tabla 1.8 que nos muestra los términos de las sumatorias, se evidencia que
la solución manual mejoraría muy poco haciendo el cálculo con dos términos, pero la
dificultad operativa se aumentaría por hacerse necesario tanteo para la solución.
theta[i] theta_m[i]
0,592 0,592
-0,002978 0,0009927
4,070E-07 8,139E-08
-9,991E-13 1,427E-13
4,031E-20 0
Tabla 1.8. Términos de las sumatorias
El número de Fourier es un poco menor que el valor crítico para placa plana haciendo que
el error involucrado al usar un solo término para cálculo con calculadora normal sea del
orden del 1%, suficientemente aproximado para la mayoría de las aplicaciones. Además, si
se usa la solución por transformada de Laplace cuando, como en este caso, la incógnita es
el tiempo, se requeriría prueba y error para solución con calculadora, inclusive si se usara la
ecuación (1.30c).
medido. Se coloca nuevamente el diafragma y los gases de cada mitad del cilindro son bien
mezclados y analizados.
yA 2 yA
DAB .
t z2
Siendo los gases puros y a la misma presión en las dos mitades, entonces las
concentraciones serán simétricas alrededor del punto medio y será necesario obtener una
solución sólo para la mitad. Si tomamos la mitad izquierda del tubo como el lugar donde
inicialmente se encuentra la sustancia A, para el tiempo t 0 cuando se remueve la
separación, la concentración es uniforme para toda la longitud L (tomamos el total del tubo
como 2L ) y Ao 1.0 . La base izquierda del tubo es impermeable a la difusión del gas por lo
que se cumple, si tomamos allí el origen coordenado, que para z 0, y A / z 0 . Así
mismo, en el punto intermedio, siempre estará la concentración de equilibrio, es decir para
z L, y As 0.5 , constante. Es entonces aplicable la ecuación (1.19c) pues se conocen es
las concentraciones promedio después de terminar el experimento:
y Am y AS 8
1 2n 12 2
2 exp Fo .
y A0 y AS 1 2n 12 4
Con el código en EES (ver en sección Notas al final del capítulo) se obtienen los resultados:
Fo 0, 2864. theta _ mt 0, 4.
Sherwood, Pigford y Wilke dan un valor experimental para la difusividad Helio - Metano a
298 K y 1 atm, DAB 0.675 cm2 s . Corrigiéndola para las condiciones del experimento
tenemos:
DAB 0.675 5 293 298 0.7769 0.7793 0.1312 cm 2
1.5
s . Este resultado está ajustado
al valor calculado usando la subrutina D_12_gas del EES, como se puede observar. El
número de Fourier está por encima del valor crítico por lo que parece adecuado el cálculo
con un solo término.
Una característica importante de este proceso es que el calor se genera dentro del objeto
mismo, y no por una fuente externa de calor, como en los sistemas convección –
conducción.
El calentamiento por inducción se usa en muchos procesos industriales, tales como para
fundir los metales refractarios (Nb, Ta, Mo, W, Re) con temperaturas de fusión mayores a
los 2000 K. También en la industria de los semiconductores, y fogones de inducción.
Para el caso de una placa plana cuya otra superficie está aislada el análisis será:
68
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
T 2T
. (i)
t z2
En la superficie, el calor generado se dividirá entre el que se disipa hacia el medio con
temperatura igual a la inicial de todo el sistema T0 y coeficiente convectivo h , y el que es
conducido hacia el interior del sólido de conductividad térmica k y longitud característica L
(distancia desde la superficie aislada hasta la superficie donde ocurre el calentamiento):
T
qk h T T0 para z L . (ii)
z
T
0 para z 0 . (iii)
z
t z T T0
, z* , i .
L2 L q/h
i 2i
. (iv)
z *
i hL
Bi 1 i siendo Bi , (v)
z * k
2
. ver ecuación (1.9)
z *2
Bi . ver ecuación (1.10b)
z *
0. ver ecuación (1.10a)
z *
La condición inicial en t 0, 0, T T0 , i 0 .
Por el método de separación de variables obtenemos una función del tiempo tal como la
ecuación (1.16)
G C1 exp 2 .
Cn exp(n2 ) cos(n z * ) ,
n 1
es decir
T T0
i 1 Cn exp(n2 ) cos(n z * ) , (1.33)
q/h n 1
n tan n Bi ,
2sinn
Cn .
n sin(n ) cos(n )
Esta solución es similar a la obtenida para la placa plana calentada o enfriada hacia un
medio con temperatura constante T desde una temperatura inicial uniforme T0 , razón por
la cual los llamados gráficos de Heisler se pueden usar también para analizar problemas de
calentamiento por inducción electromagnética. Se analizan a continuación dos ejemplos
presentados por (Heisler, 1947):
70
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
Ejemplo 1.6: Se calienta por inducción electromagnética de alta frecuencia una placa de
acero de 0.5 plg de espesor. El otro lado se encuentra aislado. Se deben alcanzar 1600 °F
en 1.5 s en la superficie expuesta. ¿Cuál es el suministro de energía necesario en W/plg2?
¿Cuál será la temperatura del centro en ese momento? La temperatura inicial de la placa,
igual a la de los alrededores es 70 °F, la conductividad térmica del acero k = 25 Btu/hr-pie-
°F; la densidad es 460 lb pie3 ; calor específico CP = 0.120 Btu/lb-°F. El coeficiente
convectivo promedio, por radiación se estima en 9.9 Btu/hr-pie2-°F (La temperatura de la
superficie cambia de 70 °F hasta 1600 °F en el período de calentamiento, considerándose
que la mayor parte del tiempo está a temperatura alta (2/3)1600=1070 °F). Haga el mismo
cálculo para un período largo de calentamiento, de 200 s. (ver código de solución en
sección Notas).
N 10
lowerlimit i i 1 0,000001 for i 1 to N
upperlimit i lowerlimit i for i 1 to N
2
guessi lowerlimit i for i 1 to N
4
L
Bi h
k
1
for i 1 to N
tan Bi
sen
Ci 2 for i 1 to N
sen cos
z
zˆ
L
i Ci exp 2 Fo cos zˆ for i 1 to N
zt Sum 1.. N
time
Fo
L2
71
PROCESOS EN ESTADO TRANSITORIO
k
Cp
i1 1 zt
zˆ 1
Ts T0
i1
q
h
T0 70 F
Ts 1600 F
h 9,9 Btu hr ft 2 F
k 25 Btu hr ft F
460 lb ft 3
C p 0,12 Btu lb F
1,5
time
3600 hr
q
Tc T0 io
h
o planewallT ; ND xˆ; Fo; Bi
xˆ 0
io 1 o
0,5
L
12 ft
q 70132 Btu hr ft 2 .
El modelo matemático para este caso se configura así ecuación (1.3a) con m 2 o
ecuación (1.8) con m 2 , o ecuación (1.6a):
1 2 T 2T 2 T 1 T
r , (1.6b)
r 2 r r r 2 r r t
T
en r 0 T / r 0; en r R k h T T .
r
2 2
, (1.6c)
r *2 r * r *
0 para r* 0 , (1.10a)
r *
Bi para r* 1 , (1.10b)
r *
La condición inicial es
Como las condiciones límite son homogéneas se puede usar el método de separación de
variables
r*, F r * G . (1.11)
Reemplazando en (1.16c)
dG d 2 F 2 dF
F G , (1.12a)
d dr * r * dr *
1 dG 1 d 2 F 2 dF
,
2
(1.13a)
G d F dr * r * dr *
dG
2G 0 , (1.14)
d
G C1 exp 2 Fo , (1.16)
d 2 F 2 dF
2
2F 0 . (1.15a)
dr * r * dr *
1 d 2 dF 2
r* F 0. (1.15b)
r *2 dr * dr *
dF f 1d f
2 ,
dr r r dr
d 2 dF d df df d2 f d f
,
dr dr d r d r
r f r r
dr d r2 d r
por lo tanto:
74
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
d 2 dF d2 f
dr
r r .
dr d r2
d2 f
2
2 f 0 .
dr *
f C4 cos r * C5 sin r * .
Regresando a la variable F:
cos r * sin r *
F C4 C5 , (1.34)
r* r*
Multiplicando todos los términos por r *2 , se observa que C4 0 para que se cumpla la
condición (1.10a). Para que se cumpla (1.10b) en r* 1 :
teniendo en cuenta que hay un número infinito de valores de que satisfacen la ecuación
planteada escribimos:
sin n r *
Cn exp n2 Fo . (1.37)
1 r*
75
PROCESOS EN ESTADO TRANSITORIO
sin n r *
1 Cn . (1.38)
1 r*
T , h
R Escribimos entonces la solución como
1
Cn exp(n2 Fo) sen(n r * ) , (1.40)
n 1 n r *
n 1 n n con n 1, 2,
Con frecuencia se escribe así:
1 n cot n Bi , (1.36a)
con esta correlación podemos expresar los coeficientes Cn como (Baehr, 2011) p.170,
(Rohsenow, 1973) p.153:
76
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
1/ 2
2 Bi n2 Bi 1
2
2 Bi sen n n2 Bi 1
2
Cn 2 1
n 1
n Bi Bi
.
n n Bi Bi 1
2 2
3 R 2 m
Cn exp(n2 Fo)
r dr 3 sen(n ) n cos(n ) . (1.35a)
R3 0 0 n 1 n3
15
10
0
y
-5
-10
-15
-20
0 3,142 6,283 9,425 12,57
l
Figura 1.13. Solución gráfica y * cos Bi 1 * sen para Bi 1
77
PROCESOS EN ESTADO TRANSITORIO
Ejemplo 1.7: Analizar una esfera de un acero inoxidable de diámetro 10 cm que se enfría
desde una temperatura uniforme de 40 °C hasta que su temperatura máxima sea de 30 °C,
en aire a 20 °C con coeficiente convectivo 120 W/m 2.K. Las propiedades del sólido pueden
considerarse constantes en los siguientes valores: conductividad térmica k = 17.14 W/m.K,
densidad 8563kg m3 , calor específico CP = 512 J/kg.K. Estimar el calor cedido por el
sólido en este tiempo. ¿Cuál es la temperatura de la superficie en ese momento?
A partir de la solución con EES donde se ilustra el uso del comando ”FUNCTION” que
permite al programa tomar decisiones (ver código en sección Notas al final del capítulo) se
obtienen los resultados:
Bi 0,3501.
3,909 106 m2 s .
E _ so 45912 J . E _ s 25127 J .
Fo 0,807. N 3.
R _ o 0,05 m.
Vs 0,0005236 m3.
T 30. time 516,1.
T_infinity 20. T_m 29,05.
T_o 40.
Fo T T_EES
0,01 41,83 40
0,1 39,99 39,61
0,2 38,12 38,08
0,3 36,43 36,43
0,4 34,9 34,9
0,5 33,51 33,51
0,6 32,25 32,25
0,7 31,11 31,11
0,8 30,07 30,07
0,9 29,13 29,13
1 28,28 28,28
Tabla 1.10. Resultados para la esfera
78
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
35
34
33 251 s
32
31
T °C
30
29
516 s
28
27
26
25
0,2 0,4 0,6 0,8 1
r
Figura 1.14. Perfil de temperaturas en la esfera en dos tiempos diferentes
45
43
41 N=1
39 N=20
37
Tcentro
35
33
31
29
27
25
0 0,1 0,2 0,3 0,4 0,5 0,6 0,7 0,8 0,9 1
Fo
Figura 1.15. Fourier crítico esferas
79
PROCESOS EN ESTADO TRANSITORIO
Comentario: Comparando con el Ejemplo 1.1, los perfiles son más planos que en la placa.
Así mismo, el cálculo con un solo término de la sumatoria converge más rápidamente al
cálculo exacto (20 términos en este caso), pudiéndose considerar un Foc 0.20 .
Separación de variables
Se desarrolla a continuación una expresión que será válida para estos casos cuando
Bi 40 . Para una solución por separación de variables el planteamiento es idéntico al que
nos llevó a la ecuación (1.40) con excepción de la segunda condición límite: para
r* 1, T Ts , 0 F . La condición en el centro hace que, como antes, C4 0 (ecuación
(1.35)). La segunda condición de frontera requiere que (ecuación (1.34)):
sin n r *
Cn exp n2 2 Fo . (1.43)
1 r*
n 1
2 1
Cn ,
n
1n 1 sen n r * exp
2
n 1 n r*
n
2 2
Fo . (1.44)
sen n r *
Cuando r 0, n por aplicación de la regla de L’Hopital.
r *
T TS
para transferencia de calor
T0 TS
cA cAS
o cualquiera de sus equivalentes para transferencia de masa.
cA0 cAS
1 3 R 2
cAdV 3 0 cAr dr 30 cAr * dr * ,
1
cAm 2
V V R
pues V 4 / 3 R y dV 4 r 2dr
3
6 1
2 2
exp n 2 2 Fo ,
1
m 3 r *2 dr* (1.45)
o n1 n
Tm TS
m para transferencia de calor
T0 TS
c Am c AS
m o cualquiera de sus equivalentes para transferencia de masa.
c A0 cAS
Transformada de Laplace
Estas expresiones convergen rápidamente para Fo 0.2 . Una solución que converge
rápidamente para Fo 0.2 se obtiene resolviendo la ecuación (4.5) usando transformada
de Laplace (Crank, The Mathematics of Diffusion, 1964) p. 86 – 87):
T 1 2 T
Cp k 2 r t 0, T T0 ; r R; T Ts ,
t r r r
o haciendo Y T T0 ,
Y 2 Y 2 Y
2 .
t r r r
Condiciones de frontera :
T0 T0 0, 0 r R, t 0 condición inicial,
Haciendo u Y r , obtenemos:
u 2u
,
t r2
u0 0, 0 r R, t 0,
u Ys R us , r R, t 0.
d 2u p
u 0,
dr 2
s p en r R; 0 en r 0 .
C1 exp r p C2 exp r p ,
us erq e rq Y R 1 erq e rq p
u ; con q .
p e Rq e Rq YS r p e Rq e Rq
( R r )q
Y R 1 e( R r ) q e
.
YS r p
1 e 2 Rq
La expansión de Maclaurin al denominador:
1
1 e2 Rq e4 Rq e2 nRq n 0, 1, 2,
1 e
2 Rq
e qx x
erfc .
p 2 t
T To R 2n 1 R r 2n 1 R r
erfc erfc . (1.46a)
Ts To r n 0 4 t 2 4 t 2
1 1
Adimensionalizando
1 2n 1 r * 2n 1 r *
0 1 S 2 Fo
r * n0
erfc erfc . (1.46b)
2 Fo
6 Fo
n 1
n
m0 3Fo 12 Fo ierfc 6 Fo 2 ierfc 3Fo . (1.47)
n 1 Fo n 1 Fo
Recordamos
83
PROCESOS EN ESTADO TRANSITORIO
0 exp d ,
2 x
erfc( x) 1 erf ( x) 1 2
(1.30b)
i1erfc ( x) ierfc ( x)
exp x 2 xerfc ( x) . (1.31b)
T
Q 4 R 2 k .
r r R
Del problema se concluye que la resistencia a la transferencia externa es nula, por lo cual
Bi y s es la concentración en la superficie, que entonces será cero.
a) Suponiendo (a comprobar luego) que el número de Fourier es mayor que 0.2, leemos de
la tabla A.1 que 1 y C1 2.0 . Reemplazando en la ecuación (1.40) a un término con
r* 0 ,
2.0exp 2 Fo Fo 0.1179 0.2 ,
0.5
0.8
por lo que debemos usar un mayor número de términos en la sumatoria. Adaptando la tabla
A:4, observamos que C Bi 1, y que n n y que Cn 2 1
n 1
. Usando los 6 primeros
términos de la serie obtenemos:
0.114378 * 5 x103
2
D t
Fo AB2 0.114378 entonces t 57.2s .
R 5 x108
84
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
b) Se usa la misma ecuación (1.40), pero ahora con r* 3 5 0.6 . Teniendo presente
que para este número de Fourier el tercer término de la sumatoria ya es del orden de 10 -5,
usamos entonces solamente los dos primeros términos, obteniendo cA 0.2637 mol dm3 .
Usando EES (ver código en sección Notas al final del capítulo) se obtienen los resultados:
parte (a):
Se hace con la ecuación en separación de variables que permite el cálculo en
r* 0
Fo 0.1144; theta 0.625; time 57.19 s .
parte (b):
Se incluye el cálculo con la ecuación obtenida por transformada de Laplace. Se
anota que por este método es suficiente un término y por el de separación de
variables bastan dos términos.
1 Qr T
H CP , (1.8b)
Sr r t
T T
r , (1.8c)
t r r r
T
r 0 0 t 0,
r
T
rR k h T T t 0.
r
T T / T0 T ; Fo t ; r* r ,
R2 R
86
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
1 *
r para 0 z L; t 0 , (1.8c)
r * r * r
r* 0 0 t 0,
r *
k
r* 1 h 0 t 0 ,
R r *
r* 1 Bi 0 ,
r *
r * , F r * G , (1.11)
1 dG 1 * F
* *
r * 2 . (1.12)
G d r F r r
G C1 exp 2 . (1.16)
* F * 2
r r F 0 , (1.15c)
r * r *
En r* 0, dF 0, (1.15a)
dr *
F
En r* 1, Bi F 0 . (1.15b)
r
NOTA: Una ecuación diferencial ordinaria escrita en la forma general (Tosun, Modeling in
Transport Phenomena, 2007)
p y
ax bx y 0 jk,
j k
x (1.48)
x x
2 p j
, (1.49)
2
1 p
, (1.50)
2 p j
1 p 4b
2
n . (1.51)
2 p j
Caso (i) a 0
Caso (ii) a 0
m F
r* F 0,
m 2
r* (1.9)
r * r *
1 m 1 m
1, , n , a 2 0 .
2 2
2
J1/2 x sin x , (1.54)
x
2
J 1/2 x cos x . (1.55)
x
Por esta razón las soluciones dadas por las ecuaciones (1.52) y (1.53) convergen a las
ecuaciones (1.19) y (1.40).
(1) k ( x 2 ) 2 k p
( 1) k ( x 2 ) 2 k p
J p ( x) , J p ( x) ,
k 0 k !( k p )! k 0 k !(k p)!
(1) k ( x 2 ) 2 k
J 0 ( x) , J 0 (0) 1.
k 0 (k !) 2
J0 x 1 2 2 2
1!2 2!2 3!2
J1 x 1 2 2 2 .
2 1!2! 2!3! 3!4!
Yn x
cos n J n x J n x
sin n ,
como Y0 0 entonces C3 0 .
n n
J n x J n1 x J n x J n1 x J n x .
x x
J1 BiJ 0 .
Esta ecuación trascendental provee un número infinito de valores propios para cada valor
de Bi . Por esta razón, llamando cada valor propio particular como n se escribe
n J1 n BiJ 0 n n 1, 2, 3, (1.57)
Cn exp n2 J 0 n r * .
n 1
1 Cn J 0 n r * . (1.58)
j 1
Como las funciones propias son ortogonales entre sí respecto a la función de peso,
multiplicamos ambos lados de la ecuación (x) por r * J 0 m r * dr e integramos desde
r* 0 hasta r* 1, así:
1
1
r* J
0 r dr C r J r J r dr .
m
* *
n
*
0 n
*
0 m
*
(1.59)
n 1 0
0
1
* 2
r J
0
r dr
n
* *
J 02 n J 12 n / 2 N , (1.60)
0
1
r* J
0 r dr
n
* *
1
J .
n 1 n
(1.61)
0
T T
Cn exp(n2 Fo) J 0 (n r * ) , (1.62)
T0 T n1
donde Fo t ; r* r ,
R2 R
2 J1 (n )
Cn , (1.63)
n J 0 (n ) J1 (n )
2 2
n J1 n BiJ 0 n . (1.57)
J1 (n )
n Bi , (1.57a)
J 0 (n )
2 Bi
Cn , (1.58a)
Bi 2 J 0 n
2
n
1
2 Bi 2 exp(2n Fo) J 0 (n r * ) .
0
n 1 n Bi J 0 (n )
2
(1.62b)
T T
y Bi
hR
.
T0 T k
cA mcA kc R
, Bi .
cA0 mcA mDAB
92
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
Las cantidades J0 y J1 son las funciones de Bessel de primera clase y orden cero y uno
respectivamente.
Se hace claro en este momento que la solución manual implica cálculos dispendiosos, pues
aunque para Fo 0.21 (Yovanovich) la serie converge rápidamente obteniéndose
resultados de precisión aceptables con el primer término de la serie, para valores menores
es necesario encontrar más términos lo que representa más valores propios y más
coeficientes. De hecho, hasta hace poco tiempo se usaban métodos gráficos de solución
tales como los de Gurney-Lurie de difícil uso o los de Gröber para cortos tiempos de
exposición ( Fo 1 ). Los gráficos más utilizados fueron los de (Heisler, 1947) que mejoró la
precisión graficando la temperatura adimensional en el eje de simetría como ordenada
contra el número de Fourier como abscisa y el número de Biot como parámetro. Si se
requiere conocer la temperatura en un punto diferente del centro se debe usar un gráfico
auxiliar que relaciona la temperatura en el centro con la de cualquier punto. En las abscisas
va Bi y como parámetro una distancia adimensional. Los diagramas tipo Heisler aparecen
en muchos libros de texto y son muy utilizados. Sin embargo presentan limitaciones tales
como: no son válidos para Fo < 0.2, son difíciles de leer para valores de Fo del orden de la
unidad o menores, y el proceso de transitorio ya casi ha terminado para la mayor parte de
los diagramas. Por ejemplo, la temperatura adimensional 0, en el centro, eje o plano
de simetría de una esfera, cilindro o placa vale respectivamente, aproximadamente, 0.1,
0.2, y 0.5 para Fo = 1 y Bi = 1, habiendo entonces progresado el cambio un 90%, 80% y
50% en cada caso.
0
y
-1
-2
-3
-4
-5
0 1,57 3,14 4,71 6,28 7,85 9,42 10,99 12,56 14,13
x
Figura 1.17. Primeros cinco valores propios de la ecuación (1.62) para Bi 1 y 10
93
PROCESOS EN ESTADO TRANSITORIO
Valores promedio:
R
2 m
Cn exp(n2 Fo) J1 (n )
R 2 0
rdr
0
2n 1 n
Er . (1.52a)
0
Usaremos una técnica similar a la desarrollada para la placa plana y para la esfera para
obtener automáticamente estos valores propios con la ayuda del EES.
Los resultados obtenidos usando EES que tiene entre sus funciones las funciones de
Bessel (ver código en sección Notas al final del capítulo):
T 20 C . Tm 29.22 C .
Ts 28.46 C . Tc 30 C .
T_o = 40 C . V = 0.007854 m3 .
94
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
Ejemplo 1.10: Una barra larga de madera con diámetro externo igual a 12 mm se expone a
aire de temperatura 1400 °C. Si la temperatura de ignición de la madera es de 425 °C,
determine el tiempo requerido para iniciar la combustión dado que la temperatura inicial de
la barra es de 10 °C. Tome k = 0.15 W/m.K; h = 16 W/m 2.K; 730 kg m3 , y
Cp = 25000 J/kg.K.
T T
1
2Bi 2 exp(n2 Fo) J 0 (n r * ) ,
T0 T n 1 n
0 n
2
Bi J ( )
con r* 1 :
TS T
1
2 Bi 2 exp(n2 Fo) ,
T0 T n 1 n
2
Bi
Usando EES con el mismo código del ejercicio anterior, se observa en la Tabla 1.12 que es
necesario usar por lo menos cuatro términos de la serie.
500
450
400
t=793 [s]
350
300
t=500 [s]
T °C
250
200
150 t=200[s]
100
50
0
0 0,1 0,2 0,3 0,4 0,5 0,6 0,7 0,8 0,9 1
r*
Figura 1.18. Perfil de temperaturas
El desarrollo es en todo igual al anterior hasta la ecuación (1.15b) donde la condición límite
cambia:
En r* 1, T Ts entonces F 0 (1.15c)
F
*
r * * r *2F 0 .
r r
La solución es la misma ecuación (1.56) que con la condición límite (1.15a) se reduce a:
F Cn J 0 n r * .
Cn exp n2 J 0 n r * .
n 1
1 Cn J 0 n r * .
j 1
Como las funciones propias son ortogonales entre sí respecto a la función de peso,
multiplicamos ambos lados de la ecuación (x) por r * J 0 m r * dr e integramos desde r* 0
hasta r* 1 , así:
1
r*J
0 n r * J 0 m r * dr* 12 J12 n si mn y cero en los otros casos.
0
La solución anterior tiene en cuenta que para este caso J 0 n 0 por lo que difiere de
(1.60).
n r * dr* 1 J1 n ,
Por definición r*J
n
0
0
S
J r *
r*, 2 0 n exp n2 Fo . (1.64)
0 S n 1 J
n 1 n
m t r , t 2rdr ,
1 R
R 2 0
97
PROCESOS EN ESTADO TRANSITORIO
m 0
4 2 exp n2 Fo .
1
(1.65)
S 0 n 1 n
Solución para tiempos cortos de contacto: A diferencia de las soluciones encontradas para
la placa y la esfera, la solución por transformada de Laplace para geometría cilíndrica, aún
para las condiciones de frontera más simples resultan en series con términos
progresivamente más complejos y por tanto son soluciones con poca aplicación práctica.
Recordemos el planteamiento del problema:
S S
r r r ,
r (1.8d)
t
S
r 0 0 t 0,
r
r R S = 0 t 0,
y condición inicial
t 0 S 1 .
98
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
d d 2 1
r q r r . (1.66)
dr dr
d
r 0 entonces 0, rR entonces 0 .
dr
1 I qr
S 0 . (1.67)
p pI 0 qR
ex 1 32
I0 x 1 .
2 x 1!8 x 2!8 x
2
S 1 1 r * 1 r * Fo 1 r *
2 erfc ierfc
0 S r * 2 Fo 4r *3/ 2
2 Fo (1.68)
9 2r * 7r * 1 r *
5/ 2
Fo i 2erfc
32r * 2 Fo
x / 2 x / 2
2 4
I0 x 1
1! 2!
2 2
99
PROCESOS EN ESTADO TRANSITORIO
Ejemplo 1.11: El rodillo de roble de una podadora de pasto, que tiene un contenido inicial
de 55 % en peso, se coloca en un horno de secado donde su humedad superficial se
mantiene a 20 % en peso. Si el contenido máximo de humedad del rodillo seco se fija en
30% en peso, cuanto tiempo deberá secarse un rodillo que tiene 4 plg de diámetro por 18
plg de largo cuando
a) Los extremos del rodillo se sellan.
b) La superficie curva del cilindro se sella.
c) El secado se hace a través de toda la superficie.
Para el cilindro secándose desde la superficie corta, se usan las ecuaciones para Bi 40 :
WA WAS
J r *
2 0 n exp n2 Fo ,
WA0 WAS n 1 n J1 n
J 0 n 0 ,
WAm WA0
4 2 exp n2 Fo .
1
WAS WA0 n 1 n
L 0.2286 m . N 10 .
r _ hat 0 . R _ o 0.0508 m .
100
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
Los casos b y c se resuelven más fácilmente analizando el rodillo como muy largo debido a
sus dimensiones y las propiedades de transporte del material como estudiamos a
continuación.
Figura 1.19. Distribución de temperaturas en un sólido semi-infinito para tres condiciones superficiales:
Temperatura constante en la superficie, flujo constante de calor en la superficie, y convección superficial
Otra geometría simple para la cual pueden hallarse soluciones analíticas es el sólido semi -
infinito. Como se observa en la Figura 1.19, el sólido semi-infinito se idealiza como que
comienza en z 0 y se extiende hasta el infinito en esa dirección, presentando solo esa
superficie. No existe a la izquierda de ese plano. Si repentinamente cambian las
condiciones en esta superficie, ocurrirá transporte transitorio unidimensional al interior del
sólido.
101
PROCESOS EN ESTADO TRANSITORIO
T1
T T2
p t
T1 T2
t2
t1
T2 z
z1 z2
Figura 1.20. Perfiles de temperatura para dos tiempos pequeños
T 2T
si se trata de transferencia de calor, y
t z2
condición inicial estará dada por T z ,0 T0 y la condición límite interna será de la forma
La solución para este caso puede obtenerse reconociendo la existencia de una variable de
similitud mediante la cual la ecuación diferencial parcial, involucrando dos variables
independientes z , t puede transformarse en una ecuación diferencial ordinaria expresada
en términos de una sola variable de similitud.
Si analizamos la Figura 1.21 observamos que las curvas para contra z en t1 y t2 muestran
en la pared que en t1 . Así parece que cada curva puede caracterizarse por un espesor de
penetración t diferente, y podemos preguntarnos si existe una variable, digamos
z , que pueda unificar todas las curvas en una sola.
t
z1 z2
p ,
1 t1 2 t 2
ambos puntos (y todos los puntos en los que se tiene Tp o p ) como se muestra en la
Figura 1.21 coincidirán. En ese caso, de la ecuación diferencial parcial que describe el
fenómeno:
2
2 , (1.69)
z t
T T0
es la temperatura adimensional.
TS T0
d d d z d d d d 1
2 , ,
t d dt d dt z d dz d
2 d d 2 1 1 1 d 2
z 2 d z z d 2 2 d 2
.
d 2 d d
0. (1.70)
d 2 dt d
d
constante a , (1.71)
dt
como 0 en t 0 :
1
d a dt ; 2a t
t
2
.
0 0
d 2 d
2 a 0, (1.72)
d d
con:
0 para ,
1 para 0 .
si 4 t
1
2
haciendo a 2 por conveniencia:
d d d
2 0 ; 2 d ; ln 2 ln C1 entonces C1 exp 2 ,
d d
C1 exp 2 d C2 .
1
exp
d
2
C2 1; C1 entonces 1 0
.
exp
d
2
exp
d
2
0 o
105
PROCESOS EN ESTADO TRANSITORIO
Este valor cambiará entre uno y cero según cambie de cero a infinito. Para evaluar el
denominador hacemos u ; d 1 2 u
2 1 2
du , y por definición de la función Gama:
u 1 exp u du ,
0
,
2
1 12 1
exp d u exp u du 1 2
2
1
2 2
0
0
entonces:
T T0 z
1 2
exp dn erfc erfc
2 n
1/ 2
, (1.72)
TS T0 0 2t
T 2T .
t z2
Y 2Y ,
(1.73)
t z2
t 0, Y Y0 T0 Ts , 0 z ,
106
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
t 0, Y 0, z 0; Y Y0 , z .
f z, t
Lt p f z, p f z,0 ,
t
f z, t f z, p
Lt ,
z z
dY d 2Y
t
Lt L 2
.
dt dz
Reemplazando y organizando:
d 2 Y pY Yo
.
dz 2
Esta ecuación tiene la forma de la ecuación de la aleta con generación, diferencial lineal
ordinaria no homogénea. Su solución es:
1
Y
Y C1 exp mz C2 exp mz o ; m p
2
.
p
Y0
Y 0, p 0; Y , p .
p
Yo Y0
Y , p C1 exp m C2 exp m entonces C2 0 .
p p
Y C1 exp mz
Yo
Ahora, la solución se reduce a .
p
107
PROCESOS EN ESTADO TRANSITORIO
Yo
Y (0, p) C1 exp m0
Y0
0 entonces C1
p p.
La solución será:
Y z, p 1 exp mz
.
Y0 p p
T TS z z
1 erfc erf . (1.72a)
T0 TS 2 t 2 t
t 1
zP 4 t entonces Fo 2
0,0625 .
zP 16
Esta cantidad se conoce como la profundidad de penetración y se toma como criterio para
considerar un sólido real como semi-infinito. Debemos tener presente que no podemos
definir esta distancia como aquella a la cual T T0 puesto que, según nuestro modelo, sería
infinita.
T d ,
k Ts To
dT
qs q z k dz
z 0
z z 0
d n 0
k Ts To dT
qs
4 t 1/ 2 d n 0
,
108
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
dT
2 exp 2
2
,
d n 0 n 0
k (TS T0 )
qS . (1.73)
t
La cantidad t
1
2
se toma en ocasiones como la profundidad de penetración (en lugar de
1 tp 2k (TS T0 )
qS m
tp 0
qs dt
t p
. (1.74)
dT q
z 0 entonces S .
dz k
T 2T
t z2
2 T 3T qz 2 qz
k k entonces .
z t z3 t z2
u 2u
.
t z2
t 0, u 0, z u 0, z 0, u 1 .
Reconociendo que estas son las mismas condiciones y ecuación que se resolvió antes
escribimos:
qz z
u erfc .
qs 2 t
qS z
T TS 2 t ierfc . (1.75)
k 2 t
k T TS
exp 2 erfc
1 z
donde . (1.75a)
2qS t 2 t
k T TS 1
. (1.76)
2qS t
k Tm TS 2
. (1.77)
2qS t p 3
La condición en la superficie es
T
Para z 0 , k h T T .
z z 0
T T0
erfc exp 2 2 erfc , (1.78)
T T0
h t z
y .
k 2 t
TS T0
1 exp 2 erfc , (1.79)
T T0
qS t
exp 2 erfc . (1.80)
k T T0
Observe que en este caso Ts y qs cambian con el tiempo. Como es de esperarse esta
solución tiende a la de Dirichlet para valores del coeficiente convectivo grandes ( 100 ).
( z , t ) S z
2 erf 1/ 2
, (1.77b)
0 S 2 t
erf 2
exp(u )du .
2
(S 0 )
mS . (1.73a)
t
2 mS t z 2 mS z z
( z, t ) S exp erfc
2 t , (1.75b)
4 t
Al analizar los tres casos podemos obtener algunas conclusiones: para el caso 1, la
temperatura del medio se aproxima monótonamente a Ts a medida que transcurre el
tiempo, mientras que la magnitud del gradiente de temperatura superficial así como el flujo
de calor en la superficie, decrece como t 0.5 . En contraste, para el caso de flujo constante
en la interfase, se observa que T 0, t Ts t aumenta monótonamente con t . Para el
1
2
f1 Bi, Fo, z L tales como los gráficos de Gurney - Lurie o los de Gröber - Erk;
f 2 Bi, Fo,0 o de temperatura (concentración) en el plano, eje o centro de simetría;
f3 Bi, Fo,1 o de temperatura (concentración) en la superficie;
Q f 4 Bi, Fo o de calor (masa) total transferida.
Q0
f 2 y f3 son denominados de Heisler.
Una aplicación interesante del caso (1) resulta cuando dos sólidos semi - infinitos, a
temperaturas iniciales diferentes, TA0 y TB 0 , se ponen en contacto a través de sus
superficies libres. Si la resistencia de contacto es despreciable, el requisito de equilibrio
térmico indica que para t 0 , en el momento del contacto, ambas superficies deben tomar
la misma temperatura Ts , la cual será TB 0 Ts TA0 (suponiendo TB 0 TA0 ). Como Ts no
cambiará con el tiempo, ello implica que tanto la historia de la temperatura como la del flujo
de calor en la interfase para cada uno de los sólidos vienen dadas por las ecuaciones del
caso (1).
Figura 1.22. Contacto interfacial entre dos sólidos semi - infinitos a diferentes temperaturas iniciales
Este proceso sirve para describir el contacto por un tiempo pequeño entre dos cuerpos
finitos a temperaturas diferentes. La ecuación (1.79) explica por qué sólidos diferentes a la
misma temperatura se sienten como si fueran más calientes o más fríos cuando se tocan.
En los procesos de templado de metales también se coloca un objeto caliento con un
sistema de enfriamiento por tiempos cortos.
c c es la
en z 0 pueden escribirse como cA2 ; DAB1 A1 DAB 2 A 2 donde
cA1 z z
relación entre la concentración que se tendría en la z 0 y la de la región z 0 cuando el
equilibrio se alcance. Observando las soluciones (1.47) nosotros buscaremos soluciones de
la forma:
z
c A1 A1 B1erf z 0,
2 DAB1t
z
c A 2 A2 B2erf z 0.
2 DAB 2t
obtenemos:
c A1
1
1 D / D 1/ 2
erf
z
,
c A0 1 D AB2 / D AB1 1 / 2
AB 2 AB1
2 D AB1t
c A2 z
1 erf .
c A0 1 D AB 2 / D AB1 1 / 2 2 D AB 2 t
Se puede observar que cuando la difusión ocurre, los valores en la interfase permanecen
constantes e iguales a
cA1 1 cA2
; . (1.80)
cA0 1 DAB 2 / DAB1 1/ 2 cA0 1 DAB 2 / DAB1 1/ 2
Para el caso que nos ocupa, la difusividad en las dos barras será igual y 1 por lo tanto:
cA1 1 1 z cA2 1 1 z
erf ; erf . (1.81)
cA0 2 2 2 DABt cA0 2 2 2 DABt
cA c A0 D AB t
J Az D AB . (1.82)
z z 0 2
115
PROCESOS EN ESTADO TRANSITORIO
D AB t
M J A dt c A0
t
. (1.83)
0
T 2T 2T
Cp k . (1.84)
t x
2
Y2
Condiciones de frontera:
t 0 T T0 , a x a, b y b.
T T
t 0 k h(T T ), x a, k h(T T ), y b.
x y
T T
x0 0, y0 0.
x y
116
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
T x, y , t X x , t Y y , t . (1.85)
1 X 2 X 1 Y 2Y
.
2
(1.86)
X t x 2 Y t y 2
Los dos lados de la ecuación (1.86) deben variar independiente pero similarmente por lo
que el parámetro de separación es cero. Se conforman dos ecuaciones diferenciales
con sus respectivas condiciones límite así:
X 2X Y 2Y
, ,
t x2 t y2
X x,0 X 0 , Y y,0 Y0 ,
X 0, t Y 0, t
0, 0,
x y
X a, t Y b, t
k h X a, t X , k h Y b, t Y .
x y
T T
Cn exp(n2 Fo) cos(n z* ) .
T0 T n1
Debe tenerse presente que Fo y Bi serán diferentes en las direcciones x e y a no ser que
2a 2b :
117
PROCESOS EN ESTADO TRANSITORIO
ha hb t , t .
Bia , Bib , Fob 2
Foa 2
k k b a
También como los valores propios con los que se calcula la constante Cn dependen de Bi
estos también serán diferentes. Estas soluciones son prácticas en especial cuando se
puede usar el primer término de la serie. De resto siempre será importante la ayuda del
software. Es útil recordar que
2 t 2 t a2 b2
exp a 2 exp b 2 exp 2 2 t . (1.87)
a b a b
2W
2H
Figura 1.24. Barra rectangular infinita
T T T T T T
. (1.88)
T0 T paralelepípedo T0 T placa2 a T0 T placa2b
que tienen por espesores las tres aristas del bloque. Así mismo una solución para un
cilindro de longitud finita podría expresarse como un producto de soluciones de un cilindro
infinito y una placa infinita de espesor igual a la longitud del cilindro.
Tm T T T T T
m m . (1.88a)
To T barra To T placa 2 a To T placa 2b
Q Q Q
1 1 1 ,
Q0 Q0 Q0
prisma 2a 2b
es decir:
Q Q Q Q Q
1 . (1.25c)
Q0 Q0 Q0 Q0 Q0
prisma 2a 2b 2a 2b
Similarmente desarrolla expresiones para otras formas, tales como un prisma rectangular
(como un ladrillo), un cilindro finito, que se conforma como la intersección de una placa y un
cilindro largo.
Sin embargo, como expresamos luego de la ecuación (1.25b) estos procedimientos fuera
de engorrosos son inútiles actualmente, pues solamente requerimos las expresiones para la
119
PROCESOS EN ESTADO TRANSITORIO
temperatura promedia de los sólidos involucrados. El calor cedido o ganado por el sólido
será, como ya se explicó
Ejemplo 1.12: Una barra cilíndrica larga de acero inoxidable (k = 14.9 W/m.°C,
7900 kg m3 , CP = 477 J/kg.K) se saca del horno a temperatura uniforme 450 °C y se
expone a un ambiente a 150 °C, con coeficiente convectivo 85 W/m 2.K. Determine la
temperatura en un punto colocado a 10 cm de uno de los extremos así: en la superficie
curva y en el eje de la misma, 25 minutos después de salir del horno.
para r 0
alpha=0,000003954 m 2/s. Bi=0,4279.
Lambda=0,8778. C_n=1,099.
Fo=1,054. Theta=0,4692.
C_rt=0,4878 Función cilindro. time=1500 s.
S_zt=0,9619 Función sólido semi-infinito T=290,7 C Temperatura en el eje a
convectivo. 15 cm del extremo.
120
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
295
290
285
280
T [°C]
275
270
265
260
0 0,01 0,02 0,03 0,04 0,05 0,06 0,07 0,08
r [m]
Figura 1.26. Perfil de temperaturas a 15 cm del extremo de la barra cilíndrica
Ejemplo 1.13: Analice el caso de una lata de gaseosa que se encuentra en la nevera a 4
°C. Sus dimensiones son 12.5 cm de alto y 6 cm de diámetro. (i) ¿Cuánto tiempo después
de que se coloca en un ambiente a 25 °C con coeficiente combinado de convección y
radiación h = 10 W/m 2.K, su temperatura promedio será 15 °C? ¿Cuál será en ese
momento la temperatura en el centro geométrico de la lata? ¿Cuál será el punto con menor
temperatura en la misma? La gaseosa está colocada sobre una mesa de un material
aislante y su superficie superior está expuesta a la transferencia de calor. (ii) La lata de
gaseosa se cubre con un aislamiento cilíndrico de caucho (k = 0.13 W/m.K) de 1 cm de
espesor que no hace contacto térmico perfecto con la superficie metálica, creándose una
resistencia de contacto de 8x10-5 m2.K/W entre ambos. ¿Qué tiempo se requerirá ahora
para el mismo cambio de temperatura? Sugerencia: observe que el efecto del aislante es
cambiar el coeficiente h a un coeficiente U que engloba las resistencias en serie por
contacto, conducción en el caucho y convección con el ambiente para la parte cilíndrica.
Este coeficiente U se usa para calcular el nuevo Bi = UR/k del cilindro. Desprecie la
resistencia térmica opuesta por la pared de aluminio de la lata. Las propiedades de la
gaseosa son aproximadamente las mismas del agua: C P = 4184 J/kg.K; k = 0.598 W/m.K;
1000 kg m3 .
121
PROCESOS EN ESTADO TRANSITORIO
4C
6 cm
Figura 1.27. Ej 1.13: Lata de gaseosa
Solución
parte (a) temperaturas promedio todas las superficies con el mismo coeficiente
convectivo h
alpha=1,429E-07. E_L=0,06766.
C_p=4184. E_R=0,4893.
h=10. k=0,598.
L=0,125. rho=1000.
r_o=0,03. theta_ML=0,9323.
theta_MR=0,5107. theta_RL=0,4762.
time=4734. T_f=25.
T_i=4. T_m=15.
1 m T 1 T
s , (1)
s m s s t
122
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
T s,0 T0 , (2)
T 0, t
0, (3)
s
T L o R, t
k h T T L o R, t . (4)
s
T T r * p J p n r *
exp n2 Fo .
2 Bi
2 (5)
T0 T n Bi 2 2 p Bi J p n
k / CP
J p es la función de Bessel de primera clase y orden p , y n son los valores propios
dados por
n J p 1 n Bi J p n . (6)
T T 2 1 m Bi exp n Fo
2 2
T0 T n1 n2 n2 Bi 2 2p Bi
. (7)
Las soluciones para la pared plana, el cilindro largo y la esfera se obtienen haciendo
m 0 y p 1 ; m 1 y p 0; y m 2 y p 1 respectivamente. La relación con las
2 2
coordenadas esféricas (Mickley H. S., 1957) p. 176.
123
PROCESOS EN ESTADO TRANSITORIO
2
J 1/2 x cos x , (8)
x
2
J1/2 x sin x , (9)
x
2 sin x
J 3/ 2 x cos x . (10)
x x
T T
Cn exp(n2 Fo) f n (n r * ) . (11)
T0 T n1
Q CP V T0 T , (12)
T T
Dn exp(n2 Fo) . (13)
T0 T n1
Geometría fn n Cn Dn
2sin n
cos n r * n Bi cot n
2 Bi 2
n2 Bi 2 Bi n2
Placa
n sin n cos n
J 0 n r * n J1 n BiJ 0 n 2 Bi 4 Bi 2
Cilindro
n Bi 2 J 0 n
2
n2 Bi 2 n2
sin n r * / n r *
n 1 Bi tan n 2 sen n n cos n 6 Bi 2
Esfera n2 Bi 2 Bi n2
n sen n cos n
124
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
Tabla 1.15. Expresiones para la función característica, valores propios, coeficientes Cn y Dn para cada
geometría
Las soluciones para placa simétrica, cilindro largo esfera con temperatura inicial constante
se presentan en la forma adimensional:
T T
Cn exp(n2 Fo) f n (n r * ) .
T0 T n1
La función característica y los coeficientes deben ser calculados para los n valores de los
valores propios que den suficiente exactitud a la respuesta.
Para obviar esta situación, a todas luces inconveniente, se han propuesto muchas
soluciones alternas.
1,
1 . (15)
1 / n
1/ n
1, 1,0
1 , 1 ,
Geometría fn n Bi 0 Bi n Foc
Tabla 1.16. Expresiones para la función característica, valores propios, Fo crítico y primer valor propio de cada
ecuación trascendental para el mín y máx valor de Bi según cada una de las geometrías
Los valores calculados a partir de esta expresión difieren de los valores exactos en menos
que un 0.4% lo que lo hace mejor que interpolar en la Tabla 1.16.
126
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
se demuestra que C1 tiende a 1 en todos los casos así como el coeficiente D1 de las
temperaturas promedias adimensionales.
Analizando el caso de la placa plana, ecuación (1.19), es claro que además cos(0) = 1. De
otra parte, la ecuación trascendental, ecuación (1.19b) que genera los valores propios es:
n tan n Bi .
x3 2 x5
tan x x
3 15
Para un valor pequeño de x, tan x tiende a x , por lo que se concluye que en estas
condiciones, tomando el primer término de la serie
Bi 0.2, 1 Bi . (16)
n cot n 1 Bi .
x2 x4
x cot x 1
3 45
1 3Bi . (17)
n J1 n BiJ 0 n .
Usando solo el primer término de las expansiones en serie de las funciones de Bessel que
aparecen después de la ecuación (1.56) se obtiene:
J1 x 1 2 2 2 ,
2 1!2! 2!3! 3!4!
2x 2x 2x
2 4 6
J0 x 1
1! 2! 3!
2 2 2
1 2Bi .
Esfera con temperatura inicial constante, con convección hacia un medio con temperatura
constante:
Cilindro largo con temperatura inicial constante, con convección hacia un medio con
temperatura constante:
Las situaciones anteriores, teniendo presente que el número de Biot correlaciona las
resistencias interna (conductiva) y externa (convectiva-radiativa) son aplicables a
situaciones donde la temperatura del sólido es casi uniforme. Al analizar las expresiones
que correlacionan el perfil de temperatura con el tiempo y la posición cuando hay
resistencia externa, se observa que para valores del parámetro Bi hl ( ks
ks
conductividad térmica del sólido) menores de 0.1 (para el inverso, mayor que 10), la
temperatura en el sólido es esencialmente uniforme en cualquier instante (diferencias de
temperatura menores al 5%). En tales casos se puede despreciar la variación de la
temperatura con la posición, considerando que ésta sólo varía con el tiempo. Como la
forma geométrica no tiene importancia el análisis se simplifica.
Ejemplo 1.14: Una esfera sólida de acero (AISI1010), de 300 mm de diámetro, se recubre
con una capa de material dieléctrico de 2 mm de espesor y una conductividad térmica de
ka 0.04 W m K . La esfera recubierta está inicialmente a una temperatura uniforme de
500°C y de pronto se templa en un baño de aceite para el que
T 100C y h 3300 W m K . Estime el tiempo que se requiere para que la esfera
recubierta alcance 140°C. Sugerencia: Deje de lado el efecto del almacenamiento de
energía en el material dieléctrico, puesto que su capacitancia térmica CP V es pequeña
comparada con la de la esfera de acero.
Capa
dieléctrica
k 0.04 W m.K
Las propiedades del acero las estimamos a temperatura intermedia 500 140 / 2 320C
De la tabla A-1 del Incropera et al.: 7832 kg m3 , C p 559 J kg.K , k s 48.8 W m.K .
1 1 R R
2 1 ,
U o Ao ho Ao 4 ka R1R2
U R1
Bi 0.060 0.10 .
ks
T T
exp 3BiFo .
T0 T
Se escribe la información en la ventana del EES (ver código en sección Notas al final del
capítulo) y se obtienen los resultados:
Solución:
Se trata de una placa pero no cumple con las características que llevan a la ecuación (18).
Estimamos la longitud característica como volumen/área:
dT
qA hA T Ta CP LA ,
dt
d h q
.
dt CP L CP L
H C exp mt , m h C L .
p
condición inicial t 0, 0 T0 Ta .
La solución general
q
0 exp mt 1 exp mt .
h
Ejemplo 1.16: Un tanque bien agitado contiene V0 100 pie3 de un líquido que tiene
velocidad A k ' A con k ' 0.1 min 1 , ¿cómo varía la concentración de A en el tanque
con el tiempo? La corriente de salida Q2 es igual que la de entrada de 10 pie 3/min pero su
Solución: Tanque agitado por lo que la concentración cambia con el tiempo y no con la
posición. Se efectúa un balance macroscópico para la especie A, entrada neta más
generación igual acumulación:
dM A
Q1 A1 Q2 A2 A V ,
dt
d A
Q A1 A k ' A V0 V0
dt
.
Reorganizando
d A Q A Q
k ' A 1 .
dt V V
a a
A A0 e Pt ,
P P
aplica la siguiente ecuación cuando se utiliza una turbina normal de palas rectas (McCabe
et al. 4a ed pg 469):
2 1
0.76 Da N C p 3
0.24
hDt
2 3
k s , (i)
k
dT MC p Tv T1
MC p U Tv T entonces t .
dt US Tv T2
El coeficiente global U incluye las tres resistencias en serie presentes. Si se considera que
la superficie dada corresponde a la interna:
Ri ln 2
R
1 1
Ri Ri .
U i hi k R2hv
El coeficiente hi se estima con la correlación propuesta (i). Las propiedades para las
partes (a) y (b) se toman como las del agua a 40°C y el aparte (c) las mismas pero a 80 °C,
lo que no es del todo correcto puesto que la variación de la temperatura con el tiempo no es
lineal.
Los valores necesarios se obtienen del apéndice de cualquier libro de calor y masa.
0.358 103 kg m.s, k 0.672W m.K . Estimando Ts 87C , s 0.324 10 3 kg m.s.
134
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
k 2/3 2/3 0.093 , y de los datos podemos despreciar el efecto de la variación de s . Por lo
tanto:
2/3
M dcA
kc S 0 cAS cA V ,
M0 dt
d VcA
kc S cAS cA .
dt
2/3
S M
ln cAS cA kc 0 t constante .
V M0
o abreviadamente:
El sistema se define como una porción de universo bajo estudio. El resto del universo son
los alrededores. El sistema puede ser una cantidad específica de materia o de volumen
(frecuentemente llamado volumen de control). La “velocidad de entrada” se refiere a todo el
flujo dentro del sistema (de la cantidad involucrada) a través de los límites del sistema, y la
136
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
“velocidad de salida” se refiere a todo flujo que deje el sistema a través de sus límites. La
diferencia de la segunda menos la primera es la “velocidad neta de salida”. La “velocidad de
generación” se refiere a toda producción dentro del sistema, y la “velocidad de
acumulación” se refiere a la velocidad de cambio con el tiempo de la cantidad total de
masa, energía o cantidad de movimiento en el sistema y puede ser positivo o negativo.
Las ecuaciones de balance pueden aplicarse al sistema como un todo (balances globales o
macroscópicos), a un incremento (balance incremental), o a un elemento diferencial
(balance diferencial). Las ecuaciones como la (1.7) son también denominadas leyes de
conservación.
Ejemplo 1.19: Se está llenando un tanque con un líquido que fluye con caudal másico m 1’
(kg/s). Al mismo tiempo el líquido sale a razón de m 2’ (kg/s). El área transversal del tanque
es S y la altura del nivel del líquido en el tanque en cualquier momento t es z (ver Figura
1.29). Al aplicar la ecuación de balance al líquido dentro del tanque observamos que la
velocidad de generación es cero puesto que no se produce masa dentro del tanque; pero la
velocidad de acumulación no será cero a menos que m 1’ = m2’ o sea que las magnitudes de
los caudales hacia y desde el tanque sean iguales. Si tal fuera el caso tendríamos una
situación de estado estable puesto que no hay cambio en la cantidad de líquido en el
tanque con el tiempo.
Sin embargo, si suponemos que la cantidad entrando m 1’ es mayor que la cantidad que sale
m2’, el nivel del líquido en el tanque cambiará con el tiempo a medida que el tanque se llena
y la velocidad de acumulación será mayor que cero. Si la masa total del sistema es M y la
densidad de líquido es , la velocidad de acumulación es:
Sz S
dM d dz
,
dt dt dt
dM
m2' m1' 0.
dt
137
PROCESOS EN ESTADO TRANSITORIO
Ejemplo 1.20: Supongamos ahora que ocurre una reacción química homogénea dentro del
tanque el cual permanece bien agitado, de tal manera que puede considerarse velocidad de
reacción uniforme dentro del mismo.
dM A
m'A2 m'A1 A V .
dt
En el ejemplo 6 no podía haber generación puesto que la masa total debe conservarse;
pero si una reacción química está ocurriendo dentro del líquido y produciendo la especie A
la generación no es cero y la masa de A no se conserva. En este último caso debemos
distinguir entre el término de generación y el término de entrada siendo éste la cantidad que
atraviesa los límites del sistema y el otro la generación de A ocurriendo en cada punto
dentro del sistema.
Ejemplo 1.21: Fluye agua dentro de un tanque bien agitado a 150 lb/hr y se agrega cloruro
de sodio a razón de 30 lb/hr. La solución resultante deja el tanque a 120 lb/hr; debido a la
agitación la concentración de la solución de salida es igual a la del tanque. Hay 100 lb de
agua pura en el tanque al comenzar la operación, y los caudales de entrada y salida se
mantienen constantes posteriormente. Calcule la concentración de salida (fracción másica
de sal) después de una hora.
138
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
Solución:
dM A
m'A2 m'A1 0, (i)
dt
d ( M wA )
m2' wA2 m1' wA1 0,
dt
dwA dM
120 wA 30 M wA 0,
dt dt
dM dM
m2' m1' 0 entonces 120 150 30 0 ,
dt dt
dM
60 tasa de acumulación ,
dt
t
wA 2
dt dwA2 1 60t 100 1 30
ln ln ,
60t 100
180 wA2 30 60 100 180 30 180 wA2
0
0
despejando y simplificando:
1 10
3
wA2 1 ,
6 6t 10
Ejemplo 1.22: Tratamiento De Una Corriente Residual. Una corriente fluida de velocidad
volumétrica de flujo constante Q ' se vierte en un río. La corriente contiene un material
Solución: En el período 0 t V
Q ' durante en el cual el tanque se está llenando, un
balance molar macroscópico de la especie A da:
dM A
mA2 mA1 AVt ; Vt Q ' t es el volumen en el tanque en cualquier t .
dt
dM A
Q'c A0 kv c A Q't Q'c A0 kv M A ,
dt
MA
t
dM 1 Q'c A0 kv M A
A
dt t ln ,
Q'c A0 kv M A kv Q'c A0
0
0
Q ' cA0
de donde: M A 1 exp k t ,
v
kv
kv V
cAf 1 exp Q '
.
c A0 kv V
Q '
d cAV dc
Q ' cA0 Q ' cA kvcAV entonces V A Q ' cA0 Q ' kvV c A ,
dt dt
cA
V dc A t
dt ,
Q ' c A0 (Q ' kv V )c A V / Q '
c Af
Q'c A0 (Q'kv V )c A
t V / Q' V
ln .
Q ' k v V Q 'c A0 (Q ' k v V ) c Af
Q ' c A 0
c A
En el límite:
Q ' k v V ,
c A c A Q' k vV V
exp t .
c Af c A V Q'
Ejemplo 1.23: Considere un conjunto de tres tanques en serie. Inicialmente cada tanque
contiene V0 m3 de solución con concentración c A0 . Si una solución de concentración cAi
entra al primer tanque a razón de L m 3/h y la solución sale de cada tanque con la misma
rapidez, determine una ecuación que nos permita calcular la concentración del soluto A en
la solución que sale del último tanque como una función del tiempo. Considere mezclado
perfecto en cada tanque.
141
PROCESOS EN ESTADO TRANSITORIO
dcA1
LcA1 LcAi V0 0.
dt
c A1
V0 dcA1
t
cAi cA1 Lt
cAi cA1 0
dt exp ,
L cAi cA0 V 0
c Ao
Lt
c A1 c Ai c Ai c A0 exp .
V0
dcA2
LcA2 LcA1 V0 0,
dt
Lt
LcA2 L c Ai c Ai c A0 exp V0 A2 ,
dc
V0 dt
Lt
c A 2 c Ai c Ai c A0 exp 0 ,
V0 dc A 2
L dt V0
142
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
Lt
c A2 L / V0 c Ai c Ai c A0 exp .
dcA2 L
dt V0 V0
dy x . (1)
Esta expresión es de la forma Py Q con P, Q constantes o funciones de
dx
Conociendo que
d
dx
ye Pdx yPe Pdx e Pdx
dy
dx
, entonces podemos multiplicar ambos
ye Pdx Qe Pdxdx C .
Lt
c A2e L / V0 dt L / V0 c Ai c Ai c A0 exp e L /V0 dt dt C ,
V0
Lt
c Ai e V0 c Ai c A0 Lt / V0 C
c A2 Lt
,
V0
e
dcA3
LcA3 LcA2 V0 0,
dt
LcA3 L c Ai c Ai c A0 e Lt /V0 Lt / V0 1 V0
dcA3
dt
0.
c A3 c Ai L2t 2 Lt Lt
1 exp ,
c A0 c Ai 2V0 V0 V0
Ejemplo 1.24: Existe peligro de asfixia cuando por falta de precaución se agrupa mucha
gente en recintos cerrados. ¿Cuánto tiempo puede esperarse que transcurra para que esto
ocurra al interior de un automóvil desde que se cierran completamente las ventanillas hasta
que se pierde la consciencia? Supongamos que el espacio libre que queda para el aire en
el vehículo ocupado por 8 personas (descontando un perro) sea de 2.15 m 3, y que la
concentración inicial de oxígeno sea 21% molar yA0 0.21 y la presión ambiente la
atmosférica normal. La pérdida del conocimiento empieza cuando la concentración de
oxígeno en el medio baja del 9% molar, y el consumo fisiológico de oxígeno por persona se
estima en 6.6072x10 m3/s, medidos a 21.11 °C y 1 atm. Suponga que la velocidad de
consumo de oxígeno por persona es proporcional a la concentración de oxígeno presente
en el aire.
inicial, RA0 k cA0 aCAPT donde C APT sería la concentración molar de O2 puro a 1 atm y
aCAPT P / RT a
De lo antes dicho, k a T ,
c A0 p A0 / RT y A0
6.6072 x106
k 3.1463 x105 m3 O2 / s .
0.21
0.09
dy V dy A t ,
0 0 Vc A 8kcy A
dt
dt 8k yA 0
0.21
144
SISTEMAS CON CONDICIÓN INICIAL UNIFORME
2.15 ln 21 / 9
t 7237 .4 s 2.01 h .
8 * 3.1463 x105
A veces un problema puede enunciarse de tal manera que no sea posible seguir
exactamente el procedimiento anterior. Además, como en todos los problemas de
ingeniería, la precisión que se desea obtener en determinado cálculo debe considerarse en
el contexto del problema completo. De nada sirve obtener con dos cifras significativas si
el modelo que se ha usado es una mala aproximación a la realidad. Aquí la principal fuente
de error reside en la determinación del coeficiente de transferencia de calor. No sólo es
difícil calcular un valor de h con un error inferior al 10%, sino que, en muchos problemas de
enfriamiento, h no es constante, como supone el modelo. Por ejemplo, cuando el
enfriamiento se efectúa por convección natural, se muestra que h es proporcional a
Ts T a la potencia 1/4 en el caso de un flujo laminar y a la potencia 1/3 para un flujo
turbulento. Por lo tanto, el valor de h debe calcularse para alguna diferencia media de
temperatura o por algún método iterativo.
"Vaya a Menú Options- Variable Info-Show array variables-array se desactiva y en guess para
lambda[] se coloca guess[], y en lower y upper limit se coloca lowerlimit[] y upperlimit[]. Así se
delimitan los intervalos de cálculo para cada valor propio. De otra forma calcula todos los valores
iguales. Recuerde que cero no es un valor propio"
duplicate i=1;N
C[i]=2*sin(lambda[i]/(lambda[i]+sin(lambda[i])*cos(lambda[i]))
end
z_hat=z/L
duplicate i=1;N
theta[i]=C[i]*exp(-lambda[i]^2*Fo)*cos(lambda[i]*z_hat)
end
theta_zt=sum(theta[1..N])
T=T_infinity+(T_o- T_infinity)*theta_zt
Fo=alpha*time/L^2
alpha=k/rho/C_p “propiedades del sólido”
duplicate i=1;N
theta_m[i]=C[i]*exp(-lambda[i]^2*Fo)*sin(lambda[i])/lambda[i]
end
theta_mt=sum(theta_m[1..N])
T_m=T_infinity+(T_o- T_infinity)*theta_mt
E_t=rho*C_p*2*L*S_z*(T_o- T_m)"calor cedido por la placa espesor 2L ecuación (4.25)"
146
NOTAS SISTEMAS CON CONDICIÓN INICIAL UNIFORME
El EES trae en Options – Function Information – Transient Conduction Library las funciones
planewall_T, planewall_T_ND, planewall_Q, planewall_Q_ND que hacen estos cálculos con 20
términos en la sumatoria. Es de advertir que los “Q” dan directamente el calor transferido, relativo al
momento inicial, por unidad de área para media placa y por unidad de longitud para el cilindro. Por
esta razón, si se desea obtener la temperatura adimensional promedio para la placa, mL es
Q
necesario dividir el resultado de planewall_Q por C p L con lo que obtenemos 1 mL ; así
Q0
mismo para el cilindro largo el valor obtenido por cylinder_Q se divide por C p R 2 .
Ejemplo 1.1:
N=10
duplicate i=1;N
lowerlimit[i]=(i-1)*pi+1e-6
upperlimit[i]=lowerlimit[i]+pi/2
guess[i]=lowerlimit[i]+pi/4
end
"Vaya a Menú Options- Variable Info-Show array variables-array se le quita la selección y en guess
para lambda[] se coloca guess[], y en lower y upper limit se coloca lowerlimit[] y upperlimit[]. Así se
delimitan los intervalos de cálculo para cada valor propio. De otra forma calcula todos los valores
iguales. Recuerde que cero no es un valor propio"
duplicate i=1;N
C[i]=4*sin(lambda[i])/(2*lambda[i]+sin(2*lambda[i]))
End
z_hat=z/L
duplicate i=1;N
theta[i]=C[i]*exp(-lambda[i]^2*Fo)*cos(lambda[i]*z_hat)
end
147
PROCESOS EN ESTADO TRANSITORIO
theta_zt=sum(theta[1..N])
T=T_infinity+(T_o- T_infinity)*theta_zt
Fo=alpha*time/L^2
alpha=k/rho/C_p "propiedades del sólido"
duplicate i=1;N
theta_m[i]=C[i]*exp(-lambda[i]^2*Fo)*sin(lambda[i])/lambda[i]
end
theta_mt=sum(theta_m[1..N])
T_m=T_infinity+(T_o- T_infinity)*theta_mt
E_t=rho*C_p*2*L*S_z*(T_o- T_m) "calor cedido por la placa de espesor 2L, ecuación (1.25)"
lambda[i] theta[i] theta_m[i] Se observa claramente que para este valor del
0,5593 0,5 0,4743 parámetro de Fourier, el segundo término de la serie
3,249 1,179E-20 0 es bastante pequeño.
El gráfico se obtiene creando una tabla paramétrica en Tables – New Parametric Table, y pasamos a
la derecha del cuadro de diálogo las variables que deseamos, en este caso T y z_hat. Arriba a la
izquierda aparece el número de filas que deseamos (No. of Runs). Por conveniencia cambio a 11,
número impar para incluir el cero. 0k y la tabla vacía aparece. Seleccionando el triángulo que está en
el encabezado de z_hat damos primer valor 0 y último 1, 0k y se llena la columna. Vamos a
Calculate – calculate parametric table y, como previamente, en la ventana de ecuaciones se colocó
entre comillas el valor T = 30 y z_hat = 0, informándose allí mismo para qué valor del tiempo
queremos saber las temperaturas (time = 1520 s en este caso), automáticamente se llena la columna
de temperaturas. Ahora Plots – New Plot X_Y. Se abre un cuadro de diálogo donde se dice qué
variable va en las abscisas y cuál en las ordenadas, paso, si entramado o no, línea, color, símbolo
suavizar o no la curva, en fin a su gusto. 0k y aparece el gráfico. Puede ser modificado como se
explica en el manual, pero por lo pronto del cuadro de diálogo en el mismo gráfico, el botón abc
permite colocar letreros indicativos, que se arrastran al sitio que se desee. Para colocar otra curva en
el mismo gráfico se procede a crear otra tabla paramétrica esta vez con el tiempo necesario para que
el centro de la placa alcance 35 °C. En Plots se dice Overlay y sin modificar parámetros básicos del
gráfico anterior se sobrepone la nueva curva. Las líneas con la temperatura promedio de ambos
casos se hacen con tablas lookup creadas independientemente de las correlaciones de la ventana
de ecuaciones.
Ejemplo 1.2
duplicate i=1;N
theta[i]=(-1)^(i-1)/(2*i-1)*cos((2*i-1)*pi*z_hat/2)*exp(-(2*i-1)^2*pi^2*Fo/4)
end
theta_zt=4/pi*sum(theta[1..N]) "Ecuación (1.19b)
W_A=W_As+(W_Ao- W_As)*theta_zt
w=W_A/(1+W_A)*100
duplicate i=1;N
theta_m[i]=1/(2*i-1)^2*exp(-(2*i-1)^2*pi^2*Fo/4)
end
theta_mt=8/pi^2*sum(theta_m[1..N]) "Ecuación (1.19c)
W_Am=W_As+(W_Ao-W_As)*theta_mt
wm=W_Am/(1+W_Am)*100
w=W_ALP/(1+W_ALP)*100
duplicate i=1;N
theta_LP[i]=(-1)^(i-1)*erfc(((2*i-1)-z_hat)/(2*Fo^0,5))+&
(-1)^(i-1)*erfc(((2*i-1)+z_hat)/(2*Fo^0,5))
End
Ejemplo 1.3
"Datos"
L=2*convert(ft;m) "[m]"
D_AB=D_12_gas(G1$;G2$;T;P) "[m^2/s]"
G1$='hydrogen': G2$='methane'
P=100*convert(psi;Pa) "[Pa]"
T=15+273 "[K]"
y_As=0,7: y_Ao=1
time=3600 [s]
Fo=D_AB*time/L^2:" z_hat=z/L"
z_hat=0
N=5
duplicate i=1;N
theta[i]=(-1)^(i-1)/(2*i-1)*cos((2*i-1)*pi*z_hat/2)*exp(-(2*i-1)^2*pi^2*Fo/4)
149
PROCESOS EN ESTADO TRANSITORIO
end
theta_zt=4/pi*sum(theta[1..N]) "ec (1.19b)"
y_A=y_As+(y_Ao- y_As)*theta_zt
"Datos"
L=2*convert(ft;m) "[m]"
D_AB=D_12_gas(G1$;G2$;T;P) "[m^2/s]"
G1$='hydrogen': G2$='methane'
P=100*convert(psi;Pa) "[Pa]"
T=15+273 "[K]"
y_As=0,7: y_Ao=1
time=3600 [s]
Fo=D_AB*time/L^2:" z_hat=z/L"
z_hat=0
N=5
duplicate i=1;N
theta_LP[i]=(-1)^(i-1)*erfc(((2*i-1)-z_hat)/(2*Fo^0,5))+&
(-1)^(i-1)*erfc(((2*i-1)+z_hat)/(2*Fo^0,5))
end
"El símbolo & sirve para continuar la ecuación en el renglón siguiente"
theta_LPzt=sum(theta_LP[1..N]) "Ecuación (4.33a)"
y_ALP=y_Ao+(y_As-y_Ao)*theta_LPzt
Para verificar los límites de esta aproximación generamos el siguiente gráfico comparando
resultados a un término y a 10 términos variando Fo:
$UnitSystem SI mass K Pa Rad J
$Tabstops 0,2 0,4 0,6 3,5 in
z_hat=0
Fo=0,2
N=10
y_As=0: y_Ao=1
theta_LP[i]=(-1)^(i-1)*erfc(((2*i-1)-z_hat)/(2*Fo^0,5))+&
(-1)^(i-1)*erfc(((2*i-1)+z_hat)/(2*Fo^0,5))
end
theta_LPzt=sum(theta_LP[1..N]) "Ecuación (4.33a)"
y_ALP=y_Ao+(y_As-y_Ao)*theta_LPzt
A continuación, hacemos una comparación con los resultados para el método de separación de
variables a 1 y a 20 términos y el método de transformada de Laplace, ecuaciones (1.32 y 1.32a),
para el caso del ejemplo 1.1.
lowerlimit=1e-6
upperlimit=lowerlimit+pi/2
guess=lowerlimit+pi/4
1/tan(lambda)=lambda/Bi "calcula solo el primer valor propio"
C=4*sin(lambda)/(2*lambda+sin(2*lambda))
theta_1=C*exp(-lambda^2*Fo)*cos(lambda*x_hat)
theta_LPo=erfc((1-x_hat)/2/sqrt(Fo))+erfc((1+x_hat)/2/sqrt(Fo))-&
exp(Bi*(1-x_hat)+Bi^2*Fo)*erfc(Bi*sqrt(Fo)+(1-x_hat)/2/sqrt(Fo))-&
exp(Bi*(1+x_hat)+Bi^2*Fo)*erfc(Bi*sqrt(Fo)+(1+x_hat)/2/sqrt(Fo))
theta_LP=1-theta_Lpo "ecuación 4.36"
T_LP=T_f+(T_i-T_f)*theta_LP
T_EES=T_f+(T_i-T_f)*theta_EES
T_1=T_f+(T_i-T_f)*theta_1
Ejemplo 1.4
ESTANQUE SOLAR
duplicate i=1;N
theta[i]=(-1)^(i-1)/(2*i-1)*cos((2*i-1)*pi*z_hat/2)*exp(-Fo*(2*i-1)^2*pi^2/4)
end
theta_zt=4/pi*sum(theta[1..N]) "Ecuación (1.19b)
rho_Ac=rho_As+(rho_Ao- rho_As)*theta_zt
151
PROCESOS EN ESTADO TRANSITORIO
duplicate i=1;N
theta_m[i]=1/(2*i-1)^2*exp(-Fo*(2*i-1)^2*pi^2/4)
end
theta_mt=8/pi^2*sum(theta_m[1..N]) "Ecuación (1.19c)
rho_Am=rho_As+(rho_Ao-rho_As)*theta_mt
M=rho_Am*V
V=L*S
S=1 [m2]
Ejemplo 1.5
Ejemplo 1.6
INDUCCION ELECTROMAGNETICA
duplicate i=1;N
C[i]=2*sin(lambda[i])/(lambda[i]+sin(lambda[i])*cos(lambda[i]))
end
152
NOTAS SISTEMAS CON CONDICIÓN INICIAL UNIFORME
z_hat=z/L
duplicate i=1;N
theta[i]=C[i]*exp(-lambda[i]^2*Fo)*cos(lambda[i]*z_hat)
end
theta_zt=sum(theta[1..N])
{T=T_infinity+(T_o- T_infinity)*theta_zt}
Fo=alpha*time/L^2
alpha=k/rho/C_p
theta_i1=1-theta_zt
{Fo=0,1087
Bi=0,0165}
z_hat=1
theta_i1=(T_s-To)/(q/h)
To=70 [F]
T_s=1600 [F]
h=9,9 [Btu/hr-ft^2-F]
k=25 [Btu/hr-ft-F]
rho=460 [lb/ft^3]
C_p=0,12 [Btu/lb-F]
time=200/3600 [hr]
T_c=To+(q/h)*theta_io
theta_o=planewall_T_ND(x_hat;Fo;Bi)
x_hat=0
theta_io=1-theta_o
L=0,5/12 [ft]
Ejemplo 1.7
alpha=k/rho/C_p
"Bi=1"
duplicate i=1;N
lambda[i]*cos(lambda[i])=(1-Bi)*sin(lambda[i])
end
"Menú Options- Variable Info-Show array variables-array se le quita el v y en guess para lambda[] se
coloca guess[]. De otra forma calcula todos los valores iguales. Recuerde que cero no es un valor
propio"
"Evaluación de los coeficientes Cn"
duplicate i=1;N
C[i]=4*(sin(lambda[i])- lambda[i]*cos(lambda[i]))/(2*lambda[i]-sin(2* lambda[i]))
end
"Historia tiempo-posición de la temperatura de la esfera"
duplicate i=1;N
theta[i]=theta(C[i];lambda[i];Fo;r_hat)
end
T=T_infinity+(T_o-T_infinity)*sum(theta[1..N])
Ejemplo 1.8
N=5
duplicate i=1;N
lambda[i]=i*pi
end
154
NOTAS SISTEMAS CON CONDICIÓN INICIAL UNIFORME
duplicate i=1;N
C[i]=2*(-1)^(i+1)/i/pi
end
duplicate i=1;N
theta[i]=theta(C[i];lambda[i];Fo;r_hat)
end
theta=sum(theta[1..N])
c_A=c_As+(c_Ao-c_As)*theta
Fo=D_AB*time/R^2
r_hat=0
D_AB=5e-8 [m^2/s]
2*R=10e-3 [m]
thetao[i]=erfc(((2*i-1)-r*)/2/sqrt(Fo))-erfc(((2*i-1)+r*)/2/sqrt(Fo))
thetao=sum(thetao[1..N])/r*
c_AL=c_Ao+(c_As-c_Ao)*thetao
Ejemplo 1.9
"propiedades y dimensiones"
h=120 [W/m^2-K]: k=17,14 [W/m-K]: rho=8563 [kg/m^3]: R_o=0,05 [m]
C_p=512 [J/kg-K]
T_infinity=20 [C]: T_o=40 [C]: "T=30 [C]":time=768,8 [s]
r_hat=1
"intervalos para los valores propios"
N=10
duplicate i=1;N
lowerlimit[i]=(i-1)*pi+1e-6 "cero no es un valor propio"
upperlimit[i]=lowerlimit[i]+pi
guess[i]=lowerlimit[i]+pi/2
end
Bi=h*R_o/k "k del sólido"
"ecuación trascendental"
duplicate i=1;N
lambda[i]*Bessel_J1(lambda[i])-Bi*Bessel_J0(lambda[i])=0
end
155
PROCESOS EN ESTADO TRANSITORIO
duplicate i=1;N
C[i]=2*Bi/((lambda[i]^2+Bi^2)* Bessel_J0(lambda[i]))
end
{r_hat=r/R_o}
duplicate i=1;N
theta[i]=C[i]*exp(-lambda[i]^2*Fo)* Bessel_J0(lambda[i]*r_hat)
end
T=T_infinity+(T_o- T_infinity)*sum(theta[1..N])
Fo=alpha*time/R_o^2
alpha=k/rho/C_p "propiedades del sólido"
duplicate i=1;N
theta_m[i]=C[i]*exp(-lambda[i]^2*Fo)*Bessel_J1(lambda[i])/lambda[i]
end
T_m=T_infinity+(T_o- T_infinity)*2*sum(theta_m[1..N])
E=rho*C_p*V*(T_o- T_m)
V=pi*R_o^2*L
L=1
Ejemplo 1.10
IGNICION MADERO
"Bi=1"
duplicate i=1;N
lambda[i]*Bessel_J1(lambda[i])-Bi*Bessel_J0(lambda[i])=0
end
156
NOTAS SISTEMAS CON CONDICIÓN INICIAL UNIFORME
"Menú Options- Variable Info-Show array variables-array se le quita el v y en guess para lambda[] se
coloca guess[]. De otra forma calcula todos los valores iguales. Recuerde que cero no es un valor
propio"
duplicate i=1;N
C[i]=2*Bi/((lambda[i]^2+Bi^2)* Bessel_J0(lambda[i]))
end
{r_hat=r/R_o}
duplicate i=1;N
theta[i]=C[i]*exp(-lambda[i]^2*Fo)* Bessel_J0(lambda[i]*r_hat)
end
T=T_infinity+(T_o- T_infinity)*sum(theta[1..N])
theta_rt=sum(theta[1..N])
Fo=alpha*time/R_o^2
alpha=k/rho/C_p "propiedades del sólido"
Ejemplo 1.11
"propiedades y dimensiones"
D_AB=4e-5*convert(ft^2/hr;m^2/s)
R_o=2*convert(in;m)
L=9*convert(in;m)
Fo=D_AB*time/R_o^2
T_s=20/80: T_o=55/45: T=30/70:{time=768,8 [s]}
r_hat=0
"intervalos para los valores propios"
N=10
duplicate i=1;N
lowerlimit[i]=(i-1)*pi+1e-6 "cero no es un valor propio"
upperlimit[i]=lowerlimit[i]+pi
guess[i]=lowerlimit[i]+pi/2
end
"ecuación trascendental"
duplicate i=1;N
Bessel_J0(lambda[i])=0
end
{r_hat=r/R_o}
duplicate i=1;N
theta[i]=exp(-lambda[i]^2*Fo)*Bessel_J0(lambda[i]*r_hat)/Bessel_J1(lambda[i])/lambda[i]
end
T=T_s+(T_o- T_s)*2*sum(theta[1..N])
duplicate i=1;N
theta_m[i]=exp(-lambda[i]^2*Fo) /lambda[i]^2
end
T_m=T_o+(T_s- T_o)*4*sum(theta_m[1..N])
Ejemplo 1.12
"cilindro semi-infinito"
"Datos"
k=14,9:rho=7900: Cp=477: alpha=k/rho/Cp: T_0=450: T_infinity=150: h=85: time=25*60
Ro=0,075: z=0,15
"r=Ro o 0 se coloca entre comillas para hacer la gráfica"
r=0
"Ecuación (4.51c) p 292 RBG sólido semi-infinito convectivo"
S_zt=erf(z/(2*sqrt(alpha*time)))+exp(h*z/k+h^2*alpha*time/k^2)*&
(1-erf(h*sqrt(alpha*time)/k+z/2/sqrt(alpha*time)))
Theta=S_zt*C_rt
T=Theta*(T_0-T_infinity)+ T_infinity
"para graficar: new parametric table-solve table-new plot window"
Ejemplo 1.13
$UnitSystem Rad C Pa J
"Cilindro corto valores promedio"
E_L=planewall_Q(time;T_i;T_f;alpha;k;h;L)/(rho*C_p*L*(T_f-T_i))
E_R=cylinder_Q(time;T_i;T_f;alpha;k;h;r_o)/(rho*C_p*pi*r_o^2*(T_f-T_i))
theta_ML=1-E_L
theta_MR=1-E_R
theta_RL=theta_ML*theta_MR
theta_RL=(T_m-T_f)/(T_i-T_f)
T_m=15: T_i=4: T_f=25: alpha=k/rho/C_p: k=0,598: rho=1000: C_p=4184: L=0,125: r_o=0,03: h=10
158
NOTAS SISTEMAS CON CONDICIÓN INICIAL UNIFORME
La función Planewall_Q da calor por unidad de área y cilinder_Q da calor por unidad de longitud. Por
eso para encontrar el m es necesario dividir por el Q0 .
"Cilindro corto con coeficientes convectivos diferentes T_m"
"Valores propios para la ecuación lambda_n*tan(lambda_n) = Bi"
$UnitSystem SI mass C Pa Rad J
N=3
duplicate i=1;N
lowerlimit[i]=(i-1)*pi+1e-6
upperlimit[i]=lowerlimit[i]+pi
guess[i]=lowerlimit[i]+pi/2
end
Bi_L=h_L*L/k
duplicate i=1;N
1/tan(lambda[i])=lambda[i]/Bi_L
end
"Menú Options- Variable Info-Show array variables-array se le quita el v y en guess para lambda[] se
coloca guess[]. De otra forma calcula todos los valores iguales. Recuerde que cero no es un valor
propio"
"Evaluación de los coeficientes Cn"
duplicate i=1;N
C[i]=4*sin(lambda[i])/(2* lambda[i]+sin(2* lambda[i]))
end
Fo_L=alpha*time/L^2
alpha=k/rho/C_p "propiedades del sólido"
duplicate i=1;N
theta_m[i]=C[i]*exp(-lambda[i]^2*Fo_L)*sin(lambda[i])/lambda[i]
end
theta_mL = sum(theta_m[1..N])
E_R=cylinder_Q(time;T_i;T_f;alpha;k;h;r_o)/(rho*C_p*pi*r_o^2*(T_f-T_i))
theta_MR=1-E_R
theta_RL=theta_mL*theta_MR
theta_RL=(T_m-T_f)/(T_i-T_f)
Variables in Main
alpha=1,429E-07 Bi_L=2,09
C_p=4184 E_R=0,4788
Fo_L=0,05752 h=7,07
h_L=10 k=0,598
L=0,125 N=3
159
PROCESOS EN ESTADO TRANSITORIO
rho=1000 r_o=0,03
theta_mL=0,9136 theta_MR=0,5212
theta_RL=0,4762 time=6288
T_f=25 T_i=4
T_m=15
duplicate i=1;N
1/tan(lambda[i])=lambda[i]/Bi_L
end
"Menú Options- Variable Info-Show array variables-array se le quita el v y en guess para lambda[] se
coloca guess[]. De otra forma calcula todos los valores iguales. Recuerde que cero no es un valor
propio"
"Evaluación de los coeficientes Cn"
duplicate i=1;N
C[i]=4*sin(lambda[i])/(2* lambda[i]+sin(2* lambda[i]))
end
Fo_L=alpha*time/L^2
alpha=k/rho/C_p "propiedades del sólido"
duplicate i=1;N
theta_m[i]=C[i]*exp(-lambda[i]^2*Fo_L)*sin(lambda[i])/lambda[i]
end
theta_mL = sum(theta_m[1..N])
E_R=cylinder_Q(time;T_i;T_f;alpha;k;h;r_o)/(rho*C_p*pi*r_o^2*(T_f-T_i))
theta_MR=1-E_R
theta_RL=theta_mL*theta_MR
theta_RL=(T_m-T_f)/(T_i-T_f)
z_hat=z/L
duplicate i=1;N
160
NOTAS SISTEMAS CON CONDICIÓN INICIAL UNIFORME
theta[i]=C[i]*exp(-lambda[i]^2*Fo_L)*cos(lambda[i]*z_hat)
end
theta_L=sum(theta[1..N])
"Cilindro"
T_c=cylinder_T(r;time;T_i;T_f;alpha;k;h;r_o)
theta_c=(T_c-T_f)/(T_i-T_f)
theta_cc=theta_L*theta_c
T_cc=theta_cc*(T_i-T_f)+T_f
Variables in Main
alpha=1,429E-07 Bi_L=2,09
C_p=4184 E_R=0,4788
Fo_L=0,05752 h=7,07
h_L=10 k=0,598
L=0,125 N=3
r=0 rho=1000
r_o=0,03 theta_c=0,566
theta_cc=0,5466 theta_L=0,9657
theta_mL=0,9136 theta_MR=0,5212
theta_RL=0,4762 time=6288
T_c=13,11 T_cc=13,52
T_f=25 T_i=4
T_m=15 z=0,0625
z_hat=0,5
Ejemplo 1.14
1/U=1/h+t/ka*R2/R1
h=3300: t=2e-3: ka=,04:R2=,152:R1=,150:ks=48,8
Bi=U*R1/ks
Fo=alpha*time/R1^2
theta=exp(-3*Bi*Fo)
theta=(Tm-Tf)/(To-Tf)
Tm=140: Tf=100:To=500
alpha=ks/rho/Cp
rho=7832: Cp=559
161
PROCESOS EN ESTADO TRANSITORIO
Cuando cambiamos ligeramente las condiciones límite o iniciales del modelo, la dificultad
matemática aumenta llevando a expresiones más complicadas y de manejo más incómodo.
Mostramos en este capítulo como, la solución del balance sin generación, pero con
condiciones iniciales o de frontera modificados respecto a los que se analizaron en el
capítulo 1, se resuelven por métodos numéricos basados en el método de las diferencias
finitas.
Solución analítica
Se plantea una ecuación diferencial para el caso de una placa plana sin generación en
estado inestable intercambiando calor con un medio a T . Su distribución de temperatura
inicial es lineal.
pie2
Una pared de ladrillo 0.016
hr con espesor de
1.5 pie, está inicialmente a temperatura uniforme de 80 F.
Sus superficies se llevan a 350 °F y 650 F
respectivamente hasta alcanzar el estado estable. A partir
de este momento la superficie izquierda se aísla y la
superficie derecha se pone en contacto con aire
estancado a 80 °F. ¿Cuánto tiempo después la
temperatura en el centro de la pared alcanza 300 F?
k 0.38 Btu , h 1.272 Btu . ¿Cuál
hr.pie.°F hr.pie 2 °F
será la temperatura de las superficies en ese momento?
162
SISTEMAS CON CONDICIÓN INICIAL NO UNIFORME
Solución
T 2T
2 para 0 z L, t 0 . (2.1a)
t z
2
La difusividad térmica tiene dimensiones de longitud .
tiempo
T T
En z 0, 0, t 0 z 0 0 t 0 (2.1b)
z z
T
En z L, k h T T , t 0 (2.1c)
z
2
2 para 0 z L, t 0 , (2.1a-i)
t z
En z 0, 0, t 0 , (2.1b-i)
z
163
PROCESOS EN ESTADO TRANSITORIO
En z L, k h 0, t 0 , (2.1c-i)
z
y la condición inicial:
z, t F z G t , (2.1d)
en donde F es una función exclusivamente de z y G es función solo de t . La ecuación
(2.1a-i) se escribe:
t' z, t F z G ' t , z' z, t F ' z G t , z' ' z , t F ' ' z G t .
Reemplazando en (2.1a-i):
1
F ' ' z G t F z G' t .
Dividiendo por F z G t
F "( z ) G '(t )
2 .
F ( z ) G(t )
G t C1 exp 2t . (2.1f)
F z C2 sin z C3 cos z ,
k cos z h cos z ó k sin L h cos L 0 ,
z zL
así los valores propios n son las raíces positivas de la ecuación trascendental:
hL
L tan L (2.1g-i)
k
La solución será la suma de todas las soluciones posibles así:
z , t Cn' F z G t (2.1h)
1
Donde Cn engloba las constantes C1 y C3 . Para encontrarla aplicamos la condición inicial,
que especifica que en t 0, G t 1 y 0 f z . Además usando la propiedad de
ortogonalidad de las funciones propias multiplicamos ambos lados por cos z e
integramos entre 0 y L , intercambiando la sumatoria y la integral donde es preciso.
Sabiendo que la propiedad de ortogonalidad de estas funciones propias está dada por:
L
0 cuando n m
cos n z cos m z dz N cuando n m .
0
Obtenemos
165
PROCESOS EN ESTADO TRANSITORIO
L L
L
L 1
N cos2 n z dz sin 2 n L , (2.1j)
0
2 4 n
este parámetro N , tiene dimensiones de longitud. La integral del lado izquierdo en (2.1i) la
realizamos teniendo en cuenta que en nuestro caso la distribución inicial de temperaturas
es lineal 0 az b :
L cos n L L sin n L 1 b
An az b cos n z dz a 2 sin n L . (2.1k)
0
n
2 n n n
El valor de An tiene dimensiones de longitud por temperatura.
cos n L L sin n L 1 b
a sin n L
An n
2 n n 2 n
Cn
'
, (2.1l-i)
L 1
N sin 2 n L
2 4 n
'
este coeficiente tiene dimensiones de temperatura. Reemplazando Cn en la expresión para
el perfil de temperatura (2.1h) obtenemos:
T T Cn' cos n z exp n 2t . (2.1m-i)
1
Bi
1.272 1.5 5.02 5,
de la tabla, L 1 1.3138, 1 0.8759 pie1,
0.38
An 434,96F , N 0.89 pie con z 0.75 pie, 1z 0.6569, cos 1z 0.7919.
166
SISTEMAS CON CONDICIÓN INICIAL NO UNIFORME
434.96
Ts 80
0.89
0.2542 exp 0.0116 0.859 46.02 150 F .
2
Cambiamos a variables adimensionales: n n L y z* z con Fo t 2 , escribimos:
L L
T T Cn cos n z * exp Fon 2 , (2.1m-ii)
1
cos n sin n 1 b
aL sin n
n
2 n n 2 n
Cn . (2.1l-ii)
1 1
sin 2n
2 4n
En forma más compacta:
Cn
2 aL cos n n sin n 1 nb sin n
. (2.1l-iii)
n n sin n cos n
Los valores propios vienen dados por la ecuación trascendental
n tan n Bi (2.1g-ii)
El análisis con EES se encuentra en la sección NOTAS al final del cap. En este código se
resalta la determinación de los valores propios que implica hacer variar las suposiciones
para obtener tantas raíces como se requiera. Esto se logra usando el comando
“DUPLICATE” así:
N=10
duplicate i=1;N
167
PROCESOS EN ESTADO TRANSITORIO
lowerlimit[i]=(i-1)*pi+1e-6
upperlimit[i]=lowerlimit[i]+pi/2
guess[i]=lowerlimit[i]+pi/4
end
Resultados
La primera columna indica los coeficientes de cada término, la tercera los valores propios,
quinta los valores de los términos de sumatoria. Se observa que, a pesar del elevado valor
del tiempo adimensional Fourier, los primeros tres términos de la sumatoria son necesarios
para obtener una buena precisión. Sin embargo, es interesante observar que el método
aproximado dio una solución aceptable.
T [°F] 356,1 353,8 346,9 335,6 319,9 300 276,3 249,1 218,7 185,8 151
z [pie] 0 0,15 0,3 0,45 0,6 0,75 0,9 1,05 1,2 1,35 1,5
Tabla 2.2. Tabla paramétrica de T vs posición
650
600
550 Disribución inicial de temperaturas
500
450
400
T [F]
350
300
250 Perfil de tempraturas después de 46,1 hr
200
150
100
0 0,25 0,5 0,75 1 1,25 1,5
z
Figura 2.3. Distribución inicial y perfil de temperatura
Las escalas de tiempo para los diferentes mecanismos de transferencia son útiles en la
selección de los tiempos de simulación. Para transferencia de calor se evalúan así (Tosun,
2007) p. 49:
2
L
Transferencia por conducción: tM característica .
L L
Transferencia por convección: tc característica característica .
h h
C p k
magnitud por lo que algún valor intermedio puede ser adecuado. Sin embargo, en este caso
conocemos el resultado analítico y con ese valor nos orientamos. El código de
programación se encuentra en la sección NOTAS.
46,09
46,02
tsim [hr]
45,94
45,86
45,78
Figura 2.4. Temperatura del centro contra el tiempo de simulación en centésimos de hora.
700
650 Nodo externo
Nodo interno
600
Temperatura nodos [°F]
Nodo central
550
500
450
400
350
300
250
200
150
0 5 10 15 20 25 30 35 40 45 50 55 60
Tiempo [hr]
Figura 2.5. Perfil de temperatura en cada nodo
La Tabla 2.4 es un fragmento de la tabla generada. La primera columna nos indica posición,
las otras dos columnas indican temperatura en la respectiva posición y en el tiempo j 1 ,
es decir 93 indica 92 intervalos de tiempo o 46 horas y 94 serán 46.5 horas.
171
PROCESOS EN ESTADO TRANSITORIO
700
650 Perfiles a intervalos de 2.5 hr Perfil inicial
600
Temperatura [°F]
550
500
450
400
350
300
250 Perfil después de 60 hr
200
150
100
0 0,25 0,5 0,75 1 1,25 1,5
z [pie]
Figura 2.6. Perfil de temperatura en diferentes tiempos
Se nota mejor coincidencia del resultado numérico con el analítico para el método de
líneas, que, en el caso del EES usa el comando Integral que implementa un esquema de
integración de tercer orden de precisión y usa tamaño de paso variable para minimizar el
tiempo de computación manteniendo la precisión.
Se plantea una ecuación diferencial para el caso de una placa plana sin generación en
estado inestable intercambiando calor con un medio a T . Su distribución de temperatura
inicial es lineal no uniforme. El coeficiente convectivo es variable.
172
SISTEMAS CON CONDICIÓN INICIAL NO UNIFORME
1
h 0.19 Ts T 3 Btu
hr.pie2 .°F .
0.19 T 80 13 0.25
4 0.252
15.63 hr, Bi
6 0.125 T 80 13
t
6 .
0.016 0.38
9T0t 1 8T1t 1 T0t . Figura 2.7. Placa plana sin generación en estado
inestable
Figura 2.7
9 8 0 0 0 0 0 T0t 1 T0t
4 9 4 0 0 0 0 t 1 t
T1 T1
0 4 9 4 0 0 0 T2t 1 T2t
t 1
A 0 0 4 9 4 0 0 T T3 C t T3t .
0 0 0 4 9 4 0 T t 1 T4t
4t 1
0 0 0 0 4 9 4 T5 T5t
0
0 8 9 8 Bi t 1
T6 640 Bi
t
0 0 0 T6
La matriz C se calcula en el tiempo t y provee las temperaturas de los diferentes nodos
en el tiempo t 1 a través de A C T .
1
Para la distribución inicial de temperaturas, o
sea t 0 , los valores de las Tm temperaturas las obtenemos de Tm 200 z 350 haciendo
0 0
550 550
600 600
650 1313 .33
174
SISTEMAS CON CONDICIÓN INICIAL NO UNIFORME
1
Multiplicando A (la matriz inversa de A ) por C 0 se obtienen las temperaturas Tm1 de
los diferentes nodos las que a su vez nos generan C que al multiplicarse por
1
A1
2
genera los Tm y así sucesivamente se continúa tantos incrementos de tiempo como se
requiera.
Obtenemos finalmente:
Observamos que el nodo (3) que es el central alcanza la temperatura de los 300 °F entre el
tercer y el cuarto intervalo de tiempo. Interpolando linealmente podemos estimar que esta
temperatura se alcanza después de 53.34 hr y la temperatura del nodo (6) sería 170.8 °F.
Con el programa Interactive Heat Transfer que acompaña a (Incropera, 1990), usando
z 0.25 pie, t 1 hr, Fo 0.256 se obtiene t 52 hr y Ts 171.2F después de 53
iteraciones. Si se desea mejorar el resultado se debe disminuir z pero esto se hace mejor
en Matlab que permite introducir el perfil inicial automáticamente al tiempo que permite usar
un sistema diferente del internacional.
Con este software, usando el código que se encuentra en la sección NOTAS, incrementos
de 0.0625 pie (25 nodos) e intervalos de tiempo de 0.5 horas Fo 2.048 se obtiene
500
450
400 Tiempo 15 hr
300
Tiempo 60 hr
250
200
150
100
0 0,25 0,5 0,75 1 1,25
x[ft]
Figura 2.9. Distribución de temperatura con h variable, método implícito
176
SISTEMAS CON CONDICIÓN INICIAL NO UNIFORME
Una característica atractiva de la técnica implícita es que es posible variar los intervalos de
tiempo U y los intervalos de posición N independientemente a fin de lograr la suficiente
precisión sin ser limitada por consideraciones de estabilidad
Ejemplo 2.2: Se calienta una barra de acero de 1 m de longitud hasta que la barra tiene un
gradiente lineal que va desde 300 C en un extremo hasta 600 C en el otro. La
temperatura en el extremo de 600 C disminuye súbitamente hasta 100 C. Los lados y el
otro extremo de la barra se mantienen aislados. Calcule el perfil de temperatura después de
0.27 Ms. (Sugerencia: debido a que los lados y un extremo están aislados es posible
considerar a la barra como la mitad de una placa plana con el extremo de 600 C en la
superficie de la placa). Tome las siguientes propiedades para el metal:
7820 kg 3, C p 465 J
kg.K
, k 16 W
m.K
.
m
Ts
T1 T2
Solución analítica:
2T 1 T
Ecuación de Fourier: ,
z 2 t
z
condición inicial: t 0, T T0 z T1 Ts T1 ,
L
177
PROCESOS EN ESTADO TRANSITORIO
condiciones límite:
T
z 0, 0; z L, T T2 , T1 300C, Ts 600C, L 1 m, T2 100C .
z
2 1
T T2 entonces , z 0, 0, z L, 0. (2.2a)
z 2 t z
Reemplazando en (2.2a)
1
F '' z G t F z G ' t .
Dividiendo por F z G t
F '' z G' t
2 .
F z G t
G t C1 exp 2t ,
F z C2 sin z C3 cos z ; F ' z C2 cos z C3 sin z .
z , t An FnGn An cos n z exp 2 t .
1 1
(2.2b)
z
z ,0 An cos n z 0 T0 T2 T1 Ts T1 T2 .
1 L
Para hacer uso de las propiedades de ortogonalidad de las funciones propias multiplicamos
ambos lados por cos z e integramos entre 0 y L , intercambiando la sumatoria y la
integral donde es preciso. Obtenemos
L L
z
T1 Ts T1 L T2 cos n z dz An cos n z dz .
2
(2.2c)
0 0
El lado izquierdo representa dos integrales
n 1
Ts T1 L z cos z dz T T 1 1
L n s 1 Ln 2
n
,
0
L 1n 1
T1 T2 cos z dz T1 T2
0 n
El lado derecho se reduce a:
L
L
cos n z N.
2
0
2
n 1
2 1 Ts T2 Ts T1 1n 1 T T 8 Ts T1 .
An s 2 (2.2d)
L
n Ln 2 2n 1 2n 12 2
Reemplazando en (2.2b)
4 1n 1 8 T T
T z, t T2 Ts T2 s 1
cos n z exp n 2 t . (2.2e)
1
2n 1 2n 1
2 2
2n 1
Recordar que n .
2L
Esta serie converge lentamente para valores de Fo menores que 0.2, es decir para
tiempos menores que 46000 s. Así para estimar un máximo de temperatura (383.4 °C) que
se presenta en el extremo aislado al cabo de 18600 s (5.17 h), el cuarto sumando (-0.005)
aún afecta la tercera cifra decimal. En los valores encontrados para t 54000 s (15 h) se
debió tener en cuenta el segundo sumando. En el resto de los casos la aproximación con el
primer término de la serie fue exacta hasta la sexta cifra decimal o superior.
t t [h] T0 T1 T2 T3 T4
0 0 300 375 450 525 600
1 15 317.7 301.8 255.7 184.9 100
2 30 221.8 212.5 186.1 146.6 100
3 45 167.8 162.6 147.9 125.9 100
4 60 137.7 134.8 126.7 114.4 100
5 75 121.0 119.4 114.8 108.0 100
Tabla 2.6. Temperatura y tiempo en cada nodo, solución analítica
A partir del código (ver en la sección NOTAS, Bi > 40), se crean tablas paramétricas para
intervalos de tiempo de 15 horas construimos el siguiente gráfico que nos muestra la
evolución de las temperaturas con el tiempo en el sólido.
180
SISTEMAS CON CONDICIÓN INICIAL NO UNIFORME
600
Perfil inicial
550
Perfil después de 15 hr
500
Perfl después de 75 hr
450
400
350
T [°C]
300
250
200
150
100
50 Perfiles de Temperaturas a Intervalos de 15 hr
0
0 0,1 0,2 0,3 0,4 0,5 0,6 0,7 0,8 0,9 1
z [m]
Figura 2.11. Distribución de temperatura en el sólido
Nota: Debido a lo prolongado del tiempo (75 h) parece indicado usar el método de
diferencias finitas completamente implícito, con incrementos de tiempo del orden de 15 h y
z de 20 o 25 centímetros.
Nodos internos:
FoTmt 11 1 2 Fo Tmt 1 FoTmt 11 Tmt ,
t 1
(1) 3.8T0 8.6T1t 1 3.8T2t 1 T1t .
t 1
(2) 3.8T1 8.6T2t 1 3.8T3t 1 T2t .
t 1
(3) 3.8T2 8.6T3t 1 T3t 3.8T4 con T4 100C constante y conocido.
t 1
A1C 0 ; C t 1 se diferencia de C solamente en el último
t
Invirtiendo A obtenemos T
1
término que se va modificando en la medida que se modifique T3 ; A permanece
inmodificable. Obtenemos las siguientes distribuciones de temperatura:
t t [h] T0 T1 T2 T3 T4
0 0 300 375 450 525 100
1 15 307.7 308.7 292.3 234.4 100
2 30 245.0 239.0 212.7 165.4 100
3 45 196.0 189.3 169.5 138.3 100
4 60 161.3 156.8 143.7 123.8 100
5 75 138.9 136.0 127.6 114.9 100
Tabla 2.7. Distribuciones de temperatura por nodo
Para observar la eficiencia del sistema en función del número de Fourier, presentamos los
valores obtenidos con z 0.05 m (21 nodos) y t 600 s (450 iteraciones), Fo 1.06 ,
verificado usando el software I. H. T.
t t [h] T0 T1 T2 T3 T4
0 0 300 375 450 525 100
1 15 317.8 302.0 256.1 185.3 100
2 30 222.3 2113.0 186.5 146.8 100
3 45 168.2 163.0 148.2 126.1 100
182
SISTEMAS CON CONDICIÓN INICIAL NO UNIFORME
Al observar los resultados calculados por los tres métodos descritos las curvas para Fo 1
y el análisis exacto se confunden, pero la diferencia respecto a Fo 3.8 es notable.
600
Curvas de temperatura a intervalos de 5 hr
500 t=0 hr
400
300
200
100 t=75 hr
SISTEMAS ASIMÉTRICOS
PRINCIPIO DE SUPERPOSICIÓN
u 2u
c 2 2 válido para 0 x L; t 0 , (2.2f)
t z
2v
0,
z 2
v 0 T1; v L T2 .
Resolviendo:
v z Az B; T1 v 0 B; T2 v L AL T1 entonces A
T2 T1
.
L
v z
T2 T1 z T
Entonces: 1.
L
u z, t w z, t v z .
w 2 2 w
c ,
t z 2
184
SISTEMAS CON CONDICIÓN INICIAL NO UNIFORME
T1 u 0, t w 0, t v 0 w 0, t T1 entonces w 0, t 0 ,
T2 u L, t w L, t v L w L, t T2 entonces w L, t 0 .
n cn
2 2
w z, t Bn sin z exp t,
1 L L2
L
2 n
Bn f z v z sin z dz .
L0 L
Consideramos una placa plana sólida que tiene espesor L , y en el tiempo t 0 está a
temperatura uniforme T0 . Para t 0 , la superficie en z 0 se pone en contacto con un
fluido a temperatura constante T1 mientras que la superficie contraria intercambia calor
Figura 2.13. Placa plana con h igual y temperatura diferente en ambos lados
Solución analítica
dT
C p k2T H , (2A)
dt
T
C p k2T H . (2B)
t
T 2T
C p k 2 .
t z
186
SISTEMAS CON CONDICIÓN INICIAL NO UNIFORME
T 2T
2 .
t z
T z, t w z, t u z , (2C)
T 2T 2u
0 2 entonces 0 0 z L. (2D)
t z z 2
Las condiciones límite o de frontera las hallamos por medio de un balance alrededor de un
elemento de superficie de volumen despreciable por lo que no hay en él acumulación ni
generación. En la superficie izquierda donde ubicamos el origen coordenado:
Salida – Entrada = 0,
qconducción qconvección 0 .
du
k h T1 u 0 .
dz
Es decir,
du
k h u T1 0 en z 0 . (2E)
dz
Salida – Entrada = 0,
187
PROCESOS EN ESTADO TRANSITORIO
qconvección qconducción 0 .
du
h u T 2 k 0 .
dz
du
Es decir, k h u T2 0 en z L . (2F)
dz
A partir de (2D)
du
C1 y u C1z C2 .
dz
w 2w
2 0 z L. (2G)
t z
Y como antes
w
k hw 0 en z 0 , (2H)
z
w
k hw 0 en z L . (2I)
z
T z,0 w z,0 u z f z .
Reemplazando en (2D)
F '' z G t F z G ' t .
Al dividir por F z G t , el lado izquierdo será solo función de z y el derecho será solo
función de t . Para que se mantenga la igualdad es necesario que los dos términos sean
iguales a una misma constante, pues las variables z y t son independientes entre si:
F '' z G ' t
K constante ,
F z G t
debe ser un número real negativo, . Cada igualdad nos da una ecuación diferencial
2
ordinaria:
Su solución es
G C exp 2t . (2J)
F '' z 2 F z 0 .
La solución es
F A cos z B sin z ,
AH AH 2
B , sin z A cos z 2 AH 0 .
2 H
Con A y B diferentes de cero, se impone que tan L , que se cumple para
H2
2
H
1 n
w z, t An cos n z sin n z exp 2t .
Haciendo t 0 y aprovechando la ortogonalidad de las funciones propias obtenemos, a
partir de la condición inicial w z ,0 T0 u z .
L
H T 2 T1 T1 HL 1 T 2 H
T0 z cos n z sin n z dz NAn , (2K)
0
HL 2 HL 2 n
2
L
H
N cos n z sin n z dz ,
0 n
L 2 H 2 2 H 2 sin 2n L H
N n 2 n 2 2 sin 2 n L . (2L-i)
2 n n 4n n
Llamando C la suma de los dos últimos términos y notando que sin 2 2sin cos
2 H 2 1 H 2 H
C n 2 2 sin 2 n L ; pero tan n L 2 n 2 por lo que
2n tan n L n
n n H
190
SISTEMAS CON CONDICIÓN INICIAL NO UNIFORME
2 H 2 H H 2 H 2
C n sin L cos L sin 2
L H .
2 H n n 2 2
n n n
2
n 2 n
Por lo tanto:
N
L n 2 H 2 2 H . (2L-ii)
2n 2
De otra parte por (2H) debemos calcular, para T0 constante, las siguientes integrales:
L
T1 HL 1 T 2 H
T cos z sin z dz
0 n n
0
HL 2 n
(2M)
T HL 1 T 2 1 H
T0 1 sin n L cos n z 1 .
HL 2 n n
La otra integral es:
L
H T 2 T1 H
HL 2
z cos z sin z dz
n
n n
0
H T 2 T1
L L
H T 2 T1 H
z cos n z dz
z sin n z dz.
0
HL 2 0
HL 2 n
L
H T 2 T1 H H T 2 T1 H sin n L L cos n L
z sin n z dz . 2O
0
HL 2
n
HL 2
n n
2 n
Así
(2M)-(2N)-(2O)
An .
(2L-ii)
Es decir,
191
PROCESOS EN ESTADO TRANSITORIO
T HL 1 T 2 1 H
T0 1 sin n L cos n z 1
HL 2 n n
H T 2 T1 cos n L 1 L sin n L
z
n 2
HL 2 n
H T T sin L L cos L
2 1 H n
n
HL 2 2
An n n n . (2P-i)
L n 2 H 2 2 H
2n 2
Finalmente
h
Donde H ; y los valores propios deben satisfacer la siguiente ecuación trascendental:
k
2n H
tan n L . (2R-i)
n2 H 2
2 Bi 2
Bi 2
2 Bi 2
n
2 Bi
tan n . (2R-ii)
Bi 2
2
Ejemplo 2.3: (Costa Novella p. 75 modificado). Una placa plana de 0.40 m de espesor se
encuentra inicialmente a 288 K. A partir de un momento una de sus caras se pone en
contacto con una corriente de gases a 373 K y la cara opuesta con una corriente de gases
a 353 K. La situación es tal que solo hay gradientes de temperatura perpendiculares a estas
dos caras. Las propiedades físicas de la placa son: conductividad calorífica k 15 W ;
m.K
calor específico C p 1300 J ; densidad 1700 kg ; coeficiente de transmisión
kg.K m3
de calor para ambos lados h 200 W . Usando la ecuación resultante de resolver el
m 2 .K
modelo matemático que rige la situación anterior, válida para esta configuración, determine
la distribución de la temperatura al cabo de 1800 s. Usando un método de diferencias finitas
con z 0.10 m y t 300 s , determine la distribución de temperaturas después de 30
min. Compare los resultados de ambos métodos.
0 1 2 3 4
Para la solución analítica se requiere encontrar las raíces de la ecuación trascendental (2O-
ii), encontrar los coeficientes An , ecuación (2M-ii) y calcular la serie para la temperatura,
ecuación (2D-ii).
193
PROCESOS EN ESTADO TRANSITORIO
Usando el método de diferencias finitas, por balances de energía térmica obtenemos las
siguientes expresiones dependiendo de si usamos un método implícito o explícito:
i) Método explícito
t t
t
Para estabilidad, los coeficientes del nodo actual T0 , Tm , TN , según el caso, deberán ser
mayor o igual a la unidad. En este caso, la situación más restrictiva la tienen los nodos
convectivos donde se debe cumplir Fo 1/ 2 Bi 1 que para este caso vale 0.214, lo que
equivale a un intervalo de tiempo máximo de 316 s. Por lo tanto, los valores propuestos en
el problema se ajustan a estas condiciones de estabilidad para el método explícito o de
Euler.
Los resultados de estos dos métodos se muestran en la Tabla 2.9 y Tabla 2.10:
Ambos métodos son del mismo grado de precisión pues ambas suponen constante la
velocidad de cambio de la temperatura en el intervalo de tiempo. La diferencia radica que
en el método explícito, esta velocidad de cambio se estima al comienzo del intervalo de
tiempo y en el implícito se estima al final del mismo, lo que conduce a la solución
simultánea de un sistema de ecuaciones para cada intervalo de tiempo. Sin embargo, como
observamos en las ecuaciones de los balances para los diferentes nodos, el coeficiente del
nodo m en el tiempo t actual es 1 que siempre será mayor que cero por lo que este
método es incondicionalmente estable.
Se observa de la Tabla 2.9 y Tabla 2.10 que los valores del método explicito son mayores
que los obtenidos en el método implícito. El método de Crank Nicolson combina el método
de Euler con el completamente implícito, implicando una doble estimación de la velocidad
de cambio en el intervalo de tiempo, siendo entonces de un orden superior de precisión que
cualquiera de los otros dos.
350
Explícito
Implícito
340
Crank Nicolson
Analítico
330
T [K]
320
310
290
Temperatura inicial
280
0 0,1 0,2 0,3 0,4
z [m]
Figura 2.15. Perfil de temperatura métodos explícito, implícito, Crank Nicolson y analítico
A pesar de trabajar con una malla relativamente gruesa, los resultados son satisfactorios y
debe resaltarse el que los valores del método Crank Nicolson coinciden completamente con
los analíticos.
A partir del código EES (ver en la sección NOTAS al final del capítulo) se obtuvieron la
Figura 2.15 y Figura 2.16.
196
SISTEMAS CON CONDICIÓN INICIAL NO UNIFORME
350
Placa temperaturas diferentes Analítico y Crank Nicolson
330
t=30 min
T [K]
320
310
300
t=5 min
290
Temperatura inicial
280
0 0,1 0,2 0,3 0,4
z [m]
Figura 2.16. Perfil de temperatura placa cada 5 min por método analítico y Crank Nicolson
Los códigos en MATLAB para los métodos implícitos son más laboriosos pues requieren
crear la matriz de coeficientes, de términos independientes y de incógnitas y luego obtener
la inversa de la matriz de coeficientes y multiplicarla por la matriz de los términos
independientes para obtener las temperaturas de los nodos en cada intervalo de tiempo.
Solución analítica
0 para la placa (r z)
T 1 m T
cP r k con m 1 para el cilindro .
T r m r r 2 para la esfera
T 2T k
2 donde . (2.4a-i)
t z cP
En los libros de texto esta ecuación se resuelve para condiciones iniciales uniformes y
condiciones límite simétricas. Pero cuando cualquiera de estas condiciones se altera la
complejidad de la solución analítica se hace ostensiblemente mayor y es preferible usar un
método numérico como el basado en diferencias finitas apoyado por un software como el
Matlab o EES.
198
SISTEMAS CON CONDICIÓN INICIAL NO UNIFORME
2
2 . (2.4a-ii)
t z
para t 0, 0 T0 T , 0 z L ,
k h1 0 en z = 0, (2.4b)
z
k h2 0 en z = L. (2.4c)
z
Al dividir por F z G t , el lado izquierdo será solo función de z y el derecho será solo
función de t . Para que se mantenga la igualdad es necesario que los dos términos sean
iguales a una misma constante, pues las variables z y t son independientes entre si:
F " z Gt
constante K .
F z Gt
debe ser un número real negativo, 2 . Cada igualdad nos da una ecuación diferencial
ordinaria:
G t G t 0 ,
G C exp 2t , (2.4d)
F" z F z 0 ,
F A cos z Bsen z ,
F ' A sen z B cos z .
h1h2
k sen L h1 h2 cosL 0 .
k
k 2
2 h1h2 senL k h1 h2 cosL (Carslaw, 1959) p. 127.
Es decir,
k h1 h2
tan L . (2.4e)
2 k 2 h1h2
que se cumple para infinitos n valores de n , los valores propios de esta ecuación
trascendental. Podemos agrupar las constantes de integración A, B, C en n constantes de
integración An para obtener la solución general para z, t
2
N cosn z h1 kn sen n z dz ,
L
1 h
T0 T senn L 1 cosn L 1 . (2.4i)
n kn
(2.4i)
Así An , es decir
(2.4h)
h1
T0 T 1 senn L cosn L 1
n kn
An . (2.4j)
L 2n h12 / k 2 2n h1 / k sen 2n L h1 / k
2
2 sen 2 n L
2 n2
n2
4n n
Ejemplo 2.4: Para comparar estos métodos, procedemos a un ejercicio práctico donde
tenemos una placa plana que aunque tiene temperatura inicial constante y las temperaturas
del fluido a sus lados es la misma, presenta condiciones de convección diferentes, a saber:
temperatura inicial T0 80C ; temperatura de los alrededores T 20C , conductividad
Con el código EES (ver en la sección NOTAS al final del capítulo) se obtuvieron los
siguientes resultados:
73
72
71
Crank Nicolson
Analítico
70
69
0,02 0,04 0,06 0,08 0,1
z [m]
Figura 2.17. Perfil de temperatura a lo largo de la placa plana
Consideramos a continuación un caso en el que tanto los coeficientes convectivos como las
temperaturas son diferentes a ambos lados de la placa. Sobra decir que la solución
analítica, si la hay, debe ser más difícil que para cualquiera de los dos casos anteriores.
Aquí se evidencia la utilidad de los sistemas numéricos.
, h 0.19 t
1
k 0.038 Btu 3 Btu .
hr.pie.°F hr.pie2 .°F
i) Método implícito Crank Nicolson: para efectuar el análisis, los balances son:
203
PROCESOS EN ESTADO TRANSITORIO
Para estimar el tiempo de simulación usamos la información de la tabla 4.1 del capítulo
sobre métodos numéricos:
tc Lcaracterística / h / CP 20 hr.
Con convección natural, la principal resistencia estará en la fase convectiva por lo que se
puede esperar un tiempo más cercano a las 20 hr. Con esto en mente, y suponiendo una
solución manual, sería adecuado seleccionar t 5 hr y z 0.375 pie con lo que
tendríamos 3 nodos internos, 2 nodos convectivos y serían necesarios del orden de 5 o 6
períodos de tiempo para alcanzar el resultado deseado.
0 1 2 3 4
Para usar el software EES, bastará con hacer pequeñas modificaciones al código de
cualquiera de los dos problemas anteriores debido a que las condiciones de frontera
solamente afectan a esos dos nodos superficiales, en la sección NOTAS al final del
capítulo, está dicho código.
600
550 PLACA CON T, h DIFERENTES
Perfiles cada 3 hr
500
450
400 Perfil a las 27 hr
T [°F]
350
300
250
200
150
100
50 Perfil inicial
0
0 0,15 0,3 0,45 0,6 0,75 0,9 1,05 1,2 1,35 1,5
z [ft]
Figura 2.19. Perfil de temperatura con coeficiente convectivo variable
310
305
300
T [°F]
295
290
285
1500 1530 1560 1590 1620 1650 1680
Tiempo [min]
Figura 2.20. Perfil de temperatura a las 27 horas
300,2
300
T [°F]
299,8
299,7
299,5
Tiempo [min]
Figura 2.21. Zoom del perfil de temperatura a las 27 horas
Tenemos entonces 1597 [min] o 26.62 [hr] como resultado. Para hacer una verificación de
esta solución numérica, se utilizó la ecuación analítica (2Q-ii) con un coeficiente estimado,
igual para las dos superficies de 1.0 [Btu/hr-ft-°F] obteniéndose un tiempo de 99620 [s] o
206
SISTEMAS CON CONDICIÓN INICIAL NO UNIFORME
Solución analítica
Consideremos una placa plana sólida que tiene espesor L , y en el tiempo t 0 está a
temperatura uniforme T0 . Para t > 0, la superficie en z = 0 se mantiene a una temperatura
constante T1 mientras que la superficie contraria permanece a temperatura constante T 2. En
cualquier punto z el flujo de calor y la temperatura dentro de la placa dependerán del
tiempo.
DT
CP k2T H , (1)
Dt
T
CP k2T H . (2)
t
T 2T
CP k 2 .
t z
207
PROCESOS EN ESTADO TRANSITORIO
T 2T
2 . (3)
t z
CL1: z = 0, T = T1 t > 0,
CL2: z = L, T = T2 t > 0.
T T2
. (4)
T1 T2
CL1: z = 0, =1 t > 0,
208
SISTEMAS CON CONDICIÓN INICIAL NO UNIFORME
CL2: z = L, =0 t > 0.
T = T2 + (T1 - T2).
T
0 T T ,
t t 1 2
T
0 T T ,
z z 1 2
2T 2
T1 T2 ,
z 2 z 2
Y de la ecuación (2T):
2
T1 T2 2 T T ,
z t 1 2
2
. (5)
z2 t
2 0 .
2
lim 0 (6)
t t z
209
PROCESOS EN ESTADO TRANSITORIO
d
A.
dz
Integrando nuevamente
Az B .
B = 1 y A = -1/L.
Es decir,
z
1 , independiente del tiempo. (7)
L
z , t z t z , t . (8)
Derivando una vez con respecto a t y dos veces respecto a z y reemplazando en (5) se
obtiene:
2t t
. (9)
z2 t
Condición límite 1:
z 0, T T1, t 0, 1 entonces t 0 .
Condición límite 2:
z L, T T2 , t 0, 0 entonces t 0 .
Condición inicial:
t = 0 ; T = T0 ; 0 < z L,
T0 T2
z,0 0 t z,0 .
T1 T2
t z , 0 0 .
y al comienzo. En la Figura 2.23 vemos que t es la diferencia entre las curvas para y
.
Podemos reducir (9) a dos ecuaciones diferenciales ordinarias que se resuelven por los
métodos usuales.
Para ello postulamos que una solución de la ecuación (9) puede escribirse como el
producto de dos funciones, una de las cuales, F(z), depende solo de z, y la otra, G (t),
depende sólo de t;
t z, t F z G t , (10)
211
PROCESOS EN ESTADO TRANSITORIO
t dG t
F z F z G t .
t dt
2 t d 2 F z
2 G t F " z G t .
z dz 2
Reemplazando en (9)
F '' z G t F z G ' t .
Al dividir por F(z)G(t), el lado izquierdo será solo función de z y el derecho será solo
función de t. Para que se mantenga la igualdad es necesario que los dos términos sean
iguales a una misma constante, pues las variables z y t son independientes entre si:
F " z G´(t )
K. (11)
F z G t
G ' t KG t 0 , (12)
F '' z KF z 0 . (13)
Se configura así un problema de valor propio o problema de Sturm Liouville que tendrá
solución no trivial solamente para ciertos valores de un parámetro que llamamos n , con
n 1, 2, 3,... en donde los n son los valores propios (o números característicos) y tiene
soluciones triviales (esto es F 0) cuando n no es un valor propio. Las soluciones no
triviales F( n ,z) son las llamadas funciones propias. Si F( m ,z) y F( n ,z) representan las
L
0 cuando m diferente de n
F (m , z) F (n , z) dz N cuando m igual a n .
0
F n , z dz N .
L
Suponemos K = 0,
F" + 2F= 0,
D no puede ser cero pues t varía con z. Por tanto sen( L) = 0. Sabemos que la
función seno es cero a intervalos de y habrá un número infinito de estos puntos. La
enésima raíz es n L donde n L = n ; n = 1, 2, 3,...; entonces, las funciones
n = n /L; n = 1, 2, 3 ...
G t C exp n 2 t (14)
En conclusión hay una solución de la ecuación (9) para cada valor de n, la cual tiene la
forma:
tn D senn z C exp n2 t An senn z exp n2t ,
donde An = DC.
t An Fn Gn An sen n z exp n2 t .
1 1
(15)
t z, 0 0 = 0 - (1 z/L) ; Gn (0) = 1 ;
Entonces:
z
t z,0 0 0 1 An Fn An sen n z . (16)
L 1 1
Tenemos pues que F(z) se puede expresar como una combinación lineal infinita de
funciones sen(nz/L) las cuales, como ya se vio, son las funciones propias de un problema
de Sturm Liouville y por tanto forman un sistema ortogonal en la región 0 z L. Para usar
sus propiedades multiplicamos ambos lados de la ecuación (2G.1) por Fm sen(m z) e
integramos de 0 hasta L:
L
L
0 (1 z L) Fm z dz
An Fn Fm dz .
0 1
0
L L
0 1 z L sen(m z )dz An sen(n z ) sen(m z )dz . (17)
0 10
L
A F F m dz 0... An Fn dz ...0 An ( L / 2) ,
L
2
n n 0
1 0
esto dado que la propiedad de ortogonalidad de estas funciones propias se expresa así:
L
sen(n z) sen(m z) dz
0 si n es diferente de m
L / 2 si n es igual a m ,
0
215
PROCESOS EN ESTADO TRANSITORIO
1 1 cos2n z
L
L
L
N sen 2 (n z) dz dz .
0 n 2 2
0
n .
sen(n z ) dz 1 cos(n L) 1 1 cos(n ) 1 pues n
L
n n L
0
L
L
1 1 z cos(n z ) sen(n z ) cos(n )
zsen(n z )dz 0 .
L
L n n 0
2
n
0
Reemplazando en (2H.1)
An
2
n
0 1 cos n cos n 1 cos n .
Reconociendo que cos n vale -1 cuando n es impar y vale +1 cuando n es par, igual que
(-1)n. Por tanto:
An
2
n n
0 1 1 1 .
T T2
T1 T2
z 2
1
L n1 n
0 1 1 1
n
sen
n z
L
exp
n2 2 t
L2
, (18)
T0 T2
0 .
T1 T2
El método usado para determinar An es llamado una expansión de la función (z) en una
serie de senos de Fourier con coeficientes A n.
216
SISTEMAS CON CONDICIÓN INICIAL NO UNIFORME
cA 2cA
D AB denominada la segunda ley de Fick. (19)
t z2
vx 2 vx
t z2 . (20)
Podemos hacer similitud entre los varios procesos de transporte usando las variables
adimensionales:
T T2 c c v
H D A A2 M x ,
T1 T2 c A1 c A2 V
t D t t
FoH FoD AB2 FoM 2 .
L2
L L
z*, Fo 1 z *
n 1
2
n
n
0 1 1 1 sen n z * exp n Fo .
2 2
(21)
Ejemplo 2.6 (Brodkey p 659 modificado). Un tubo de diámetro nominal 3 plg., cédula 40, de
3 pie de longitud contiene helio a una atm y 371.2 K (44 °C). Los extremos del tubo se
217
PROCESOS EN ESTADO TRANSITORIO
encuentran inicialmente cerrados. En el tiempo cero, los extremos se abren, y los extremos
del tubo quedan en contacto con corrientes de mezclas de aire y helio a la misma
temperatura y presión. En el extremo izquierdo, la corriente tiene 10% (en volumen) de He
mientras que en la derecha tiene 20%. Podemos suponer que el flujo mantiene estos
valores constantes en los extremos del tubo. Si se mantienen las condiciones isotérmicas e
isobáricas, y no hay efectos terminales asociados con las corrientes de los extremos del
tubo, use series de Fourier para calcular el perfil de composiciones (a cuatro decimales)
después de que han transcurrido 600 y 3600 s., con incrementos de espacio de 0.5 pie. El
diámetro interno de un tubo de estas características es 3.068 plg Una estimación de la
difusividad másica del He en aire a estas condiciones es DHeAire = 0.7652x10-4 m2/s. (2.9652
pie2/h).
cA 2cA
D AB ,
t z2
yA 2 yA
D AB ,
t z2
218
SISTEMAS CON CONDICIÓN INICIAL NO UNIFORME
y A y A2
D ,
y A1 y A2
será la solución. Reemplazando los valores numéricos, teniendo en cuenta que se trata de
funciones trigonométricas de números reales por lo cual los cálculos deben hacerse en
radianes, obtenemos la Tabla 2.12 de resultados.
Tiempo,
0 pie 0.5 pie 1.0 pie 1.5 pie 2.0 pie 2.5 pie 3.0 pie
s
0.0 s. 1.0000 1.0000 1.0000 1.0000 1.0000 1.0000 1.0000
1.0 s. 0.1000 1.0000 1.0000 1.0000 1.0000 1.0000 0.2000
600.0 0.1000 0.4373 0.6816 0.7767 0.7086 0.4977 0.2000
3600.0. 0.10000 0.1376 0.1696 0.1919 0.2030 0.2043 0.2000
0.10000 0.1167 0.1333 0.1500 0.1667 0.1833 0.2000
Tabla 2.12. Fracción Molar yA como función de la distancia z
En la sección NOTAS al final del capítulo se muestran los códigos para los cálculos tanto
analíticos como numéricos.
A continuación se muestran los resultados obtenidos por el método analítico y por las
siguientes técnicas en diferencias finitas: explícita, implícita, Crank-Nicolson y de líneas.
219
PROCESOS EN ESTADO TRANSITORIO
Debemos resaltar el hecho de que dos fenómenos físicos diferentes, descritos por modelos
matemáticos análogos, pueden tratarse con el mismo tipo de solución analítica o numérica.
Se observa de tablas y gráficos la estrecha coincidencia en los resultados por los diferentes
métodos, y en especial la total coincidencia entre el método de líneas y el de Crank-
Nicolson. También, a pesar de usarse un parámetro de Fourier del orden de 1/3, el método
explícito es el que da mayor porcentaje de error. Se anota además que hasta un tiempo de
aproximadamente 170 [s] se pueden calcular las concentraciones en el sistema utilizando la
correlación para sólido semi-infinito a partir de las respectivas superficies. La perturbación
no ha alcanzado el centro aún.
1
t=0 [s] t=125 [s]
0,9
t=300 [s]
0,8
0,7
0,6
yA
t=600 [s]
0,5
0,4
0,3
PLACA ASIMÉTRICA EN CONCENTRACIONES
0,2
Ejemplo 2.7: Una membrana porosa inicialmente contiene el soluto A con concentración
cAo. Un lado de la membrana de repente se pone en contacto con un gas y la concentración
de A en la .superficie se incrementa hasta c A1. La concentración de A en la otra superficie
se mantiene constante en c Ao. Plantee una solución para el perfil de concentraciones de A
en la membrana. Usando la correlación que se adecúe a la solución planteada, determine la
concentración de A en z = L/2 después de 3 h, si el espesor es L = 0.1 m y DAB = 5.75 x 10-8
m2/s. La concentración inicial es c Ao = 2.45 kgmol/m 3 y la concentración impuesta a z = 0 es
cA1 = 4.8 kgmol/m3. ¿Qué otra ecuación podría usarse?
Solución: Observe que no existe superficie impermeable ni simetría. Por tanto en ningún
límite se cumple dcA / dz 0 . Es adecuada la ecuación (21). Además, se observa que Fo =
0.0625 para un tiempo mayor a tres horas. Por tanto, el análisis como sólido semi-infinito es
viable también.
Los siguientes perfiles se obtienen con la ecuación (21) y diferentes tablas paramétricas:
221
PROCESOS EN ESTADO TRANSITORIO
4,5
CA [kgmol/m3] 4 10 h
3,5 3h
1h
3
600 s
100 s
2,5
2
0 0,01 0,02 0,03 0,04 0,05 0,06 0,07 0,08 0,09 0,1
z [m]
Figura 2.28. Perfil de concentración
Usaremos este ejemplo para explorar la opción de dibujar gráficos secuenciales con EES.
Se usa nomenclatura de temperaturas para utilizar las funciones preestablecidas que trae
EES en las librerías "Heat Transfer & Fluid Flow Transient Conduction" o en "EES library
routines transient conduction", aunque para el caso presente donde la correlación para
sólido semi-infinito es tan sencilla podemos hacerlo directamente. Comenzamos creando
los arreglos o mallas espaciales y de tiempo y luego resolvemos la ecuación en cada uno
de estos puntos, lo que nos da una tabla con los correspondientes datos. Usando esta tabla
creamos un gráfico con tantas curvas como queramos. Para el caso presente se escogieron
curvas a intervalos de 1000 s entre 500 s y 10500 s, obteniéndose la Figura 2.29 y Figura
2.30 (ver código en la sección NOTAS):
222
SISTEMAS CON CONDICIÓN INICIAL NO UNIFORME
cA(z,t) [kgmol/m3] 5
4
t=10500 [s]
t=500 [s]
2
0 0,01 0,02 0,03 0,04 0,05 0,06 0,07 0,08 0,09 0,1
z [m]
Figura 2.29. Perfil de concentración con el tiempo
223
PROCESOS EN ESTADO TRANSITORIO
Ejemplo 2.1
A[i]=2*(a*L*(cos(lambda[i])+(lambda[i])*sin(lambda[i])-1)+(lambda[i])*b*sin(lambda[i]))
B[i]=(lambda[i])*((lambda[i])+sin(lambda[i])*cos(lambda[i]))
C[i]=A[i]/B[i]
N=10
duplicate i=1;N
lowerlimit[i]=(i-1)*pi+1e-6
upperlimit[i]=lowerlimit[i]+pi/2
guess[i]=lowerlimit[i]+pi/4
end
Bi=h*L/k "k del sólido"
duplicate i=1;N
1/tan(lambda[i])=lambda[i]/Bi
end
"Vaya a Menú Options- Variable Info-Show array variables-array se le quita el v y en guess para
lambda[] se coloca guess[], y en lower y upper limit se coloca lowerlimit[] y upperlimit[]. Así se
delimitan los intervalos de cálculo para cada valor propio. De otra forma calcula todos los valores
iguales. Recuerde que cero no es un valor propio"
duplicate i=1;N
A[i]=2*(a*L*(cos(lambda[i])+(lambda[i])*sin(lambda[i])-1)+(lambda[i])*b*sin(lambda[i]))
B[i]=(lambda[i])*((lambda[i])+sin(lambda[i])*cos(lambda[i]))
C[i]=A[i]/B[i]
end
Fo=alpha*time/L^2
z_hat=z/L
225
PROCESOS EN ESTADO TRANSITORIO
duplicate i=1;N
theta[i]=C[i]*exp(-lambda[i]^2*Fo)*cos(lambda[i]*z_hat)
end
theta_zt=sum(theta[1..N])
T=T_infinity+theta_zt
"METODO DE LINEAS"
$UnitSystem Eng mass F Psi Rad Btu
$TABSTOPS 0.2 0.4 0.6 0.8 3.5 in
T_infinity=80 [F]: alpha=0,016 [ft^2/hr]: k=0,38 [Btu/hr-ft-F]: h=1,272 [Btu/hr-ft^2-F]
L=1,5 [ft]: T_o1=350 [F]: T_o2=650 [F]
"Setup grid"
N=11 [-] "number of nodes"
DELTAx=L/(N-1) "distance between adjacent nodes"
{t_sim=46 [hr]}
duplicate i=1;N
x[i]=(i-1)*DELTAx
end
Bi=h*DELTAx/k "Biot para diferencias finitas"
duplicate i=1;N
T_ini[i]= T_o1 + (T_o2 - T_o1)*(x[i]/L) "initial condition"
end
dTdt[1]=2*alpha*(T[2]-T[1])/DELTAx^2 "adiabático"
duplicate i=2;(N-1)
dTdt[i]=alpha*(T[i-1]+T[i+1]-2*T[i])/DELTAx^2 "interior"
end
dTdt[N]=2*alpha/DELTAx^2*(T[N-1]-T[N]+Bi*(T_infinity-T[N])) "convectivo"
duplicate i=1;N
T[i]=T_ini[i]+INTEGRAL(dTdt[i];time;0;t_sim)
End
$IntegralTable time:1;T[1..N]
Con esta orden se genera una tabla con la variación de la temperatura en cada nodo a intervalos de
1 hora.
"Setup grid"
N=25 [-] "number of nodes"
DELTAx=L/(N-1) "distance between adjacent nodes"
duplicate i=1;N
226
SISTEMAS CON GENERACIÓN
Solución implícita:
"Setup grid"
N=25 [-] "number of nodes"
DELTAx=L/(N-1) "distance between adjacent nodes"
duplicate i=1;N
x[i]=(i-1)*DELTAx "position of each node"
end
duplicate i=1;N
T[i;1]= T_o1 + (T_o2 - T_o1)*(x[i]/L) "initial condition"
end
Usando MATLAB
%Ejemplo resuelto por el método implícito para la conducción en una placa con o sin generación y
condiciones convectivas, distribución inicial arbitraria.
disp.(‘El Método implícito para la ‘)
disp.(‘ conducción en una barra con o sin generación y condiciones convectivas.’)
clear all
lon=input(‘longitud de media placa simétrica [m].‘);
alfa=input(‘difusividad térmica [m^2/s].‘);
ko=input(‘conductividad térmica [W/m*K].‘);
%h=input(‘coeficiente convectivo [W/m^2*K].‘);
fio=input(‘generación inicial por unidad de volumen [W/m^3].‘);
fi=input(‘generación (cambio repentino) por unidad de volumen [W/m^3].‘);
Tinfi=input(‘temperatura de fluido [°C].‘);
nid=input(‘número de divisiones en la placa.‘);
tt=input(‘tiempo total.[s]‘);
dt=input(‘Introduzca intervalo de tiempo<s>=’);
Ts1=input(‘temperatura inicial de superficie[°C].‘);
Tin=input(‘temperatura inicial del extremo aislado [°C]’);
ci=input(‘ingrese 1 si h es constante o 2 si h es variable’);
%disp(‘Número de Biot=’);
228
SISTEMAS CON GENERACIÓN
%disp(Bi);
%Programa para calcular del perfil de temperaturas usando la matriz tridiagonal que ofrece Matlab.
M=length(To);
L=Fo;
di;%Matriz [A].
C(1,:) =[(1+2*Fo) -2*Fo disp.(1,m-2)];
Ts=Ts1 ;
Tant=To ;
t=0 ;
tiempo(1)=t;
if ci==1
h=input(‘ingrese el valor del coeficiente convectivo‘);
Bi=h*del/ko;%número de biot para las diferencias finitas.
C(m,:)=[228isp.(1,m-2) -2*Fo (2*Bi*Fo+2*Fo+1)];
a=Tant+(fi*alfa*dt/ko) ;
a(m)=2*Bi*Fo*Tinfi+Tant(m) ;
Tant=C\a ;
T( :,k)=[Tant] ;
end
%-------------------------------------------------%
else
ci==2
h=input(‘ecuación coeficiente convectivo 0.19*(Ts-Tinfi)^(1/3) h=’);
a=Tant+(fi*alfa*dt/ko) ;
a(m)=2*Bi*Fo*Tinfi+Tant(m) ;
Tant=C\a ;
Ts=Tant(m) ;
T(:,k)=[Tant];
end
229
PROCESOS EN ESTADO TRANSITORIO
end
Tf=[To T];
x=[1:1:m-1];
xp=del.*x;
X=[0 xp]’;
Tfz=Tf’;
disp.(‘Tabla resumen de las temperaturas’);
disp.(Tfz);
disp.(‘enter para continuar’);
pause
%Tinf11=Tinf’;
plot(X,Tf,’b’);xlabel(‘ancho de la placa [m]’);ylabel(‘Temperaturas [°C]’);
text(1,600,’Tiempo 0’);
text(0.007,180,’Tiempo infinito’);
pause
close
%------------------------------------------------------%
Ejemplo 2.2
Usando EES
SOLUCIÓN ANALÍTICA
METODO IMPLICITO
"Setup grid"
DELTAx=L/(N-1) "distance between adjacent nodes"
N=11 [-] "number of nodes"
duplicate i=1;N
x[i]=(i-1)*DELTAx "position of each node"
end
Ejemplo 2.3
SOLUCION ANALITICA
"Vaya a Menú Options- Variable Info-Show array variables-array se le quita el v y en guess para
lambda[] se coloca guess[], y en lower y upper limit se coloca lowerlimit[] y upperlimit[]. Así se
delimitan los intervalos de cálculo para cada valor propio. De otra forma calcula todos los valores
iguales. Recuerde que cero no es un valor propio"
z_hat=z/L
Duplicate i=1;M
theta[i]=A[i]*exp(-lambda[i]^2*Fo)*(cos(lambda[i]*z_hat)+Bi/lambda[i]*sin(lambda[i]*z_hat))
End
theta_zt=sum(theta[1..M])
T=Tf+theta_zt
Tf=(T1*(Bi+1)+T2+(T2-T1)*Bi*z_hat)/(Bi+2)}
"Setup grid"
N=5 [-] "number of nodes"
DELTAx=L/(N-1) "distance between adjacent nodes"
Duplicate i=1;N
x[i]=(i-1)*DELTAx "position of each node"
End
Duplicate i=1;N
T[i;1]= To "initial condition"
End
"EXPLÍCITO"
Duplicate i=1;N
TE[i;1]= To "initial condition"
End
"node 1"
Duplicate j=1;(U-1)
TE[1;j+1]=2*Fod*TE[2;j]+(1-2*Fod-2*Bid*Fod)*TE[1;j]+2*Bid*Fod*T1
"internal nodes"
Duplicate i=2;(N-1)
TE[i;j+1]=Fod*TE[i-1;j]+(1-2*Fod)*TE[i;j]+Fod*TE[i+1;j]
End
"node N"
TE[N;j+1]=2*Fod*TE[N-1;j]+(1-2*Fod-2*Bid*Fod)*TE[N;j]+2*Bid*Fod*T2
End
"IMPLÍCITO
"Duplicate i=1;N
TI[i;1]= To "initial condition"
End
"node 1"
Duplicate j=1;(U-1)
TI[1;j]=-2*Fod*TI[2;j+1]+(1+2*Fod+2*Bid*Fod)*TI[1;j+1]-2*Bid*Fod*T1
"internal nodes"
Duplicate i=2;(N-1)
TI[i;j]=-Fod*TI[i-1;j+1]+(1+2*Fod)*TI[i;j+1]-Fod*TI[i+1;j+1]
End
"node N"
TI[N;j]=-2*Fod*TI[N-1;j+1]+(1+2*Fod+2*Bid*Fod)*TI[N;j+1]-2*Bid*Fod*T2
End
233
PROCESOS EN ESTADO TRANSITORIO
Usando MATLAB
Solución analítica:
e=1;
while e>0.000001
J=ln;
ln = ln-(((ln^2-H^2)*tan(ln*L)-2*ln*H) / ((2*ln*tan(ln*L)+(ln^2-H^2)*((1+(tan(ln*L))^2)*L))-2*H
));
e=abs(J-ln);
end
A=(To-(T1*(H*L+1)+T2)/(H*L+2))*(1/ln)*(sin(ln*L)-((H/ln)*(cos(ln*L)-1)));
B=H*(T2-T1)/(H*L+2)*((cos(ln*L)-1)/ln^2+L*sin(ln*L)/ln);
C=H*(T2-T1)/(H*L+2)*(H/ln)*(sin(ln*L)/ln^2-L*cos(ln*L)/ln);
D=(L*(ln^2+H^2)+2*H)/(2*ln^2);
An=(A-B-C)/D;
N=An*(cos(ln*Z)+((H/ln)*(sin(ln*Z))))*exp(-alpha*ln^2*t);
suma=suma+N;
Nn=abs(N);
ln=ln+6;
end
E=(H*(T2-T1)/(H*L+2)*Z)+((T1*(H*L+1)+T2)/(H*L+2));
total=suma+E;
if Z==0.2001
Z=0.2;
else
234
SISTEMAS CON GENERACIÓN
end
S= [Z total t];
disp (S)
SS=[ SS total ];
EE=[EE Z];
end
i=tt+1;
figure(i)
plot(EE,SS,'g')
hold on
EE=[];
SS=[];
End
Solución implícita:
alfa=k/ro/cp;
dx=L/nx; %Incremento de espacio n
x=[0:dx:L]; %Vector con los valores de los nodos espaciales
dt=tt/nt; %Incremento de tiempo
Fod=alfa*dt/dx^2;
%Verificación de estabilidad
if Fod>1/(2*(1+Bid)) %Verificación de la primera condición de
estabilidad
mensaje={'Se recomienda aumentar las divisiones del tiempo y/o del espacio'};
titulo='ATENCION¡¡¡¡ Inestabilidad Fod>1/(2*(1+Bid))';
warndlg(mensaje,titulo)
break
elseif (1-2*Fod-2*Bid*Fod)<0 %Verificación de la segunda condición de
estabilidad
mensaje={'Se recomienda aumentar las divisiones del tiempo y/o del espacio'};
titulo='ATENCION¡¡¡¡ Inestabilidad (1-2*Fod-2*Bid*Fod)<0)';
warndlg(mensaje,titulo)
break
end
%Cálculo de los perfiles de temperatura
T=ones(nt+1,nx+1); %Crea una matriz para almacenar todos los perfiles de
temperaturas
%NOTA: el tamaño es nt+1 por nx+1 ya que n divisiones son n+1 nodos
Fodr t=1:nt
T(t+1,1)=2*Fod*T(t,2)+(1-2*Fod-2*Bid*Fod)*T(t,1)+2*Bid*Fod*Tizq; %Temperatura del nodo
izquierdo para un mismo tiempo
Fodr m=2:nx %Ciclo para los nodos internos dentro de un mismo tiempo
T(t+1,m)=Fod*T(t,m-1)+(1-2*Fod)*T(t,m)+Fod*T(t,m+1);
end
% Propiedades y datos
Ti=288; % Temperatura inicial de la placa (K)
Tinf1=353; % Temperatura del gas al lado izquierdo de la placa (K)
Tinf2=373; % Temperatura del gas al lado izquierdo de la placa (K)
h=200; % Coeficiente convectivo del gas (W/m^2 K)
K=15; % Conductividad térmica del material (W/m K)
d=1700; % Densidad del gas (kg/m^3)
cp=1300; % Calor específico (J/kg K)
L=0.4; % Longitud de la placa
alfa=K/(d*cp);
% Especificaciones
dz=input('Incremento de los nodos '); % Incremento de los nodos
t=1800; % Tiempo
Bi=(h*dz)/K; % Biot
Fo1=1/(2*(1+Bi));
dt=(Fo1*dz^2)/alfa
dt=input('Aproximar incremento a número entero más cercano '); %Incremento del tiempo
Fo=(alfa*dt)/(dz^2); % Fourier
n=t/dt; % Número de tiempos para los que se hacen los cálculos
m=(L/dz)+1; % Número de nodos
m=floor(m);
To=ones(1,m);
To=Ti*To; % Distribución inicial de temperaturas en la placa (t=0)
z=(0:dz:L);
t=(dt:dt:t);
237
PROCESOS EN ESTADO TRANSITORIO
r=1/300;
j=0;
for i=1:n
for k=1:1
T(i,k)=(1-2*Fo-2*Fo*Bi)*To(k)+2*Fo*To(k+1)+2*Bi*Fo*Tinf1;
end
for n=2:m-1
T(i,n)=Fo*To(n-1)+(1-2*Fo)*To(n)+Fo*To(n+1);
end
for c=m:m
T(i,c)=2*Fo*To(c-1)+(1-2*Fo-2*Fo*Bi)*To(c)+2*Bi*Fo*Tinf2;
end
T1=T(i,:);
To=T1;
figure (1)
plot(z,To,'color',[1 1-r*j 0]),ylabel('Temperatura (°C)'),xlabel('Longitud de la placa (m)'),...
title('Distribución de temperaturas en una placa plana (L=0.4)')
hold on
j=j+1;
end
% Propiedades y datos
Ti=288; % Temperatura inicial de la placa (K)
Tinf1=353; % Temperatura del gas al lado izquierdo de la placa (K)
Tinf2=373; % Temperatura del gas al lado derecho de la placa (K)
h=200; % Coeficiente convectivo del gas (W/m^2 K)
K=15; % Conductividad térmica del material (W/m K)
d=1700; % Densidad del gas (kg/m^3)
cp=1300; % Calor específico (J/kg K)
L=0.4; % Longitud de la placa
alfa=K/(d*cp);
% Especificaciones
dz=input('Incremento de los nodos '); % Incremento de los nodos
t=1800; % Tiempo
Bi=(h*dz)/K; % Biot
Fo1=1/(2*(1+Bi));
dt=(Fo1*dz^2)/alfa
dt=input('Aproximar incremento a número entero más cercano '); %Incremento del tiempo
Fo=(alfa*dt)/(dz^2); % Fourier
n=t/dt; % Numero de tiempos para los que se hacen los cálculos
m=(L/dz)+1;
m=floor(m);
To=ones(1,m);
To=Ti*To;
tol=ones(1,m);
238
SISTEMAS CON GENERACIÓN
tol=0.00001*tol;
z=(0:dz:L);
t=(dt:dt:t);
r=1/300;
j=0;
for i=1:n
T0=ones(1,m);
T0=Ti*T0;
while 1
for k=1:1
T(i,k)=(To(k)+2*Bi*Fo*Tinf1+2*Fo*T0(k+1))/(1+2*Fo+2*Bi*Fo);
end
for n=2:m-1
T(i,n)=(To(n)+Fo*T0(n+1)+Fo*T0(n-1))/(1+2*Fo);
end
for c=m:m
T(i,c)=(To(c)+2*Bi*Fo*Tinf2+2*Fo*T0(c-1))/(1+2*Fo+2*Bi*Fo);
end
if abs (T(i,:)-T0)<= tol
break
else
T0=T(i,:);
end
end
T1=T(i,:);
To=T1;
figure (1)
plot(z,To,'color',[1 1-r*j 0]),ylabel('Temperatura (°C)'),xlabel('Longitud de la placa (m)'),...
title('Distribución de temperaturas en una placa plana (L=0.4)')
hold on
j=j+1;
end
Ejemplo 2.4
SOLUCION ANALITICA
lowerlimit[i]=(i-1)*pi+1e-6
upperlimit[i]=lowerlimit[i]+pi
guess[i]=lowerlimit[i]+pi/2
end
Bi_1=h_1*L/k
Bi_2=h_2*L/k
"k del sólido"
duplicate i=1;M
(lambda[i]^2-Bi_1*Bi_2)*sin(lambda[i])=lambda[i]*(Bi_1+Bi_2)*cos(lambda[i])
end
"Vaya a Menú Options- Variable Info-Show array variables-array se le quita el v y en guess para
lambda[] se coloca guess[], y en lower y upper limit se coloca lowerlimit[] y upperlimit[]. Así se
delimitan los intervalos de cálculo para cada valor propio. De otra forma calcula todos los valores
iguales. Recuerde que cero no es un valor propio"
"Setup grid"
N=11 [-] "number of nodes"
DELTAx=L/(N-1) "distance between adjacent nodes"
duplicate i=1;N
x[i]=(i-1)*DELTAx "position of each node"
end
duplicate i=1;N
240
SISTEMAS CON GENERACIÓN
Para construir el gráfico en Plot New Plot XY se selecciona arrays para hacer la curva originada en
los datos del método numérico y se selecciona x[i] para abscisas y T[i;11] para la décima iteración
que representa 100 [s]. Recordar que para la iteración j la temperatura es T[i;j+1]. La curva para el
resultado de la solución analítica se obtiene construyendo una tabla paramétrica variando z y T. Si se
seleccionan 11 puntos se obtienen abscisas de cm en cm iniciando en cero. Luego de "calculate
solve table", en "plot overlay" para que se dibuje sobre el gráfico ya construido.
Usando MATLAB
Bi1_cn=h1*dz/k;
Bi2_cn=h2*dz/k;
[Temps]=Implicito(mmm, nnn);
t=[0:dt:tt];
zz=[0:dz:L];
figure(1)
plot(zz,Temps)
xlabel('Longitud de la placa')
ylabel('Temperatura')
title('Solución Método de diferencias finitas Implícito')
grid on
itermax=500;
Lamd_sup=1.1; Lamd_sup3=1.1;
[Lamda1]=allLamdas(Lamd_sup, itermax);
[Lamdass3]=allLamdas3(Lamd_sup3, itermax);
for nn=1:length(t)
Fo=alpha*t(nn)/(L^2);
for mm=1:length(zz)
% Solución Analítica
Z=zz(mm)/L;
[Teta(nn,mm), termi,Teta_med(nn,mm),iter(nn,mm)]=Analítica(Fo,Z, Lamda1);
T(mm,nn)=Tinf+(Teta(nn,mm)*(To-Tinf));
Tmed(mm,nn)=Tinf+(Teta_med(nn,mm)*(To-Tinf));
[Teta2(nn,mm), termi2,iter2(nn,mm)]=Analitica02(t(nn),zz(mm), Lamdass3);
T2(mm,nn)=Tinf+(Teta(nn,mm)*(To-Tinf));
end
Fos(nn)=Fo;
end
figure(2)
plot(zz,T)
xlabel('Longitud de la placa')
ylabel('Temperatura')
title('Solución Analítica, Tosun')
grid on
figure(3)
plot(zz,T2)
xlabel('Longitud de la placa')
ylabel('Temperatura')
title('Solución Analítica, Profe')
grid on
for ss=1:nnn
figure(3+ss)
plot(zz,T(:,ss),zz,T2(:,ss),zz,Temps(:,ss))
xlabel('Longitud de la placa')
ylabel('Temperatura')
legend('Solución Analítica, Tosun','Solución Analítica, Profe','Solución Implícito' )
title(['Tiempo: ' num2str(t(ss)) ' seg'])
grid on
end
for ll=1:nnn
figure(3+ss+ll)
plot(zz,T(:,ll),zz,Temps(:,ll))
xlabel('Longitud de la placa')
ylabel('Temperatura')
legend('Solución Analítica, Tosun','Solución método implícito' )
title(['Tiempo: ' num2str(t(ll)) ' seg'])
242
SISTEMAS CON GENERACIÓN
grid on
end
dif_ambos=Temps-T;
disp('Resultados Solución Analítica')
disp(T)
disp('Resultados Solución Numérica')
disp(Temps)
disp('Diferencia entre los resultados (Numérico - Analítico)')
disp(dif_ambos)
toc
MULTINEWTON01
function [X0,F0,iter]=multinewton01(F,X0,itermax,tol,h,varargin)
NN = 10 + tol;
iter=0;
while (iter<itermax)&(NN>tol)
iter = iter + 1;
[J,F0] = jacobiana01(F,X0,h,varargin{:});
dX = -J\F0;
NN = sqrt(dX.'*dX);
X0 = X0 + dX;
if X0<0
X0=(X0.^2).^(1/4);
end
end
if iter==itermax
warning('Número máximo de iteraciones alcanzado en el método de Newton')
end
JACOBIANA01
function [J,F0]=jacobiana01(F,X0,h,varargin)
n = length(X0);
J = zeros(n);
F0 = feval(F,X0,varargin{:});
u = 1/h;
for k=1:n
X1 = X0;
X1(k) = X1(k)+h;
F1 = feval(F,X1,varargin{:});
J(:,k) = u*(F1-F0);
end
IMPLICITO
function [Temps]=Implicito(mmm, nnn)
global To Tinf Bi1_cn Bi2_cn Fo_cn
T0_t=linspace(To,To,mmm)';
Temp=T0_t;
Temps(:,1)=Temp;
for nn=2:nnn
MatA=zeros(mmm,mmm);
MatB=zeros(mmm,mmm);
MatC=zeros(mmm,1);
for mm=1:mmm
if mm==1
243
PROCESOS EN ESTADO TRANSITORIO
EIGENVALUES01
function [Fobj]=eigenvalues01(lamd)
global h1 h2 L k
Func1=lamd*k*(h1+h2)/(((lamd^2*k^2))-(h1*h2));
Func2=tan(lamd*L);
Fobj=abs(Func1-Func2);
EIGENVALUES
function [Fobj]=eigenvalues(lamd)
global Bi1 Bi2
Func1=lamd*(Bi1+Bi2)/((lamd^2)-(Bi1*Bi2));
Func2=tan(lamd);
Fobj=abs(Func1-Func2);
CRANKNICOLSON
function [Temps]=CrankNicolson(mmm, nnn)
global To Tinf Bi1_cn Bi2_cn Fo_cn
T0_t=linspace(To,To,mmm)';
Temp=T0_t;
Temps(:,1)=Temp;
%% Comprobar la estabilidad
Estab1=(Bi1_cn+1)*Fo_cn;
Estab2=(Bi2_cn+1)*Fo_cn;
if Estab1>1 | Estab2>1
disp('Comprobar estabilidad')
disp(['Fo*(Bi1+1) = ' num2str(Estab1)])
disp(['Fo*(Bi2+1) = ' num2str(Estab2)])
end
for nn=2:nnn
MatA=zeros(mmm,mmm);
MatB=zeros(mmm,mmm);
MatC=zeros(mmm,1);
for mm=1:mmm
if mm==1
% Nodo izquierdo: Convectivo (0)
MatA(mm, mm)=1+Fo_cn+(Bi1_cn*Fo_cn);
244
SISTEMAS CON GENERACIÓN
MatA(mm, mm+1)=-Fo_cn;
MatC(mm)=(Fo_cn*Temp(mm+1))+((1-Fo_cn-
(Bi1_cn*Fo_cn))*Temp(mm))+(2*Bi1_cn*Fo_cn*Tinf);
elseif mm==mmm
% Nodo derecho: Convectivo (N)
MatA(mm, mm-1)=-Fo_cn;
MatA(mm, mm)=1+Fo_cn+(Bi2_cn*Fo_cn);
MatC(mm)=(Fo_cn*Temp(mm-1))+((1-Fo_cn-
(Bi2_cn*Fo_cn))*Temp(mm))+(2*Bi2_cn*Fo_cn*Tinf);
else
% Nodos internos
MatA(mm, mm-1)=-Fo_cn;
MatA(mm, mm)=2+(2*Fo_cn);
MatA(mm, mm+1)=-Fo_cn;
MatC(mm)=(Fo_cn*Temp(mm-1))+((2-(2*Fo_cn))*Temp(mm))+(Fo_cn*Temp(mm+1));
end
end
Temp=inv(MatA)*MatC;
Temps(:,nn)=Temp;
end
ANALITICA02
function [Suma, termi,iter]=Analitica02(t,z, Lamdass3)
global h1 h2 Lamd_sup3 L To Tinf k alpha itermax
termis=1; Suma=0;
tol=1e-6;
iter=0;
itermax3=itermax;
ANALITICA
Suma=sum(termi);
function [Suma, termi,Teta_med,iter]=Analitica(Fo, Z, Lamda1)
245
PROCESOS EN ESTADO TRANSITORIO
ALLLAMDAS3
function [Lamdass3]=allLamdas3(Lamd_sup3, itermax3)
Lamdaa3=multinewton01('eigenvalues01', Lamd_sup3,100,1e-6,1e-5);
while Lamdaa3<1e-6
Lamd_sup3=Lamd_sup3+1;
% Lamda=fsolve('eigenvalues', Lamd_sup);
Lamdaa3=multinewton01('eigenvalues01', Lamd_sup3,100,1e- 6,1e-5);
end
iter3=1;
Lamdass3(iter3)=Lamdaa3;
su3=1;
for ii=1:itermax3
difLam3=0;
while abs(difLam3)<1e-6
Lamd_sup3=Lamdaa3+su3;
% Lamda=fsolve('eigenvalues', Lamd_sup);
Lamdaa3=multinewton01('eigenvalues01', Lamd_sup3,100,1e-6,1e-5);
difLam3=Lamdass3(iter3)-Lamdaa3;
su3=su3+1;
end
iter3=iter3+1;
Lamdass3(iter3)=Lamdaa3;
end
ALLLAMDAS
function [Lamdass]=allLamdas(Lamd_sup, itermax)
Lamdaa=multinewton01('eigenvalues', Lamd_sup,100,1e-6,1e-5);
iter2=1;
Lamdass(iter2)=Lamdaa;
246
SISTEMAS CON GENERACIÓN
su1=1;
for ii=1:itermax
difLam=0;
while abs(difLam)<1e-6
Lamd_sup=Lamdaa+su1;
% Lamda=fsolve('eigenvalues', Lamd_sup);
Lamdaa=multinewton01('eigenvalues', Lamd_sup,100,1e-6,1e-5);
difLam=Lamdass(iter2)-Lamdaa;
su1=su1+1;
end
iter2=iter2+1;
Lamdass(iter2)=Lamdaa;
end
Ejemplo 2.5
"Setup grid"
N=19 [-] "number of nodes"
DELTAx=L/(N-1) "distance between adjacent nodes"
Duplicate i=1;N
x[i]=(i-1)*DELTAx "position of each node"
End
Duplicate i=1;N
T[i;1]= T_o "initial condition"
End
h_2[N;j]=0,19*(abs(T[N;j]- T_infinity2))^(1/3)
Bi_1d[1;j]=h_1[1;j]*DELTAx/k "Biot para diferencias finitas superficie 1"
Bi_2d[N;j]=h_2[N;j]*DELTAx/k "Biot para diferencias finitas superficie 2"
(1+Fo_d+Bi_1d[1;j]*Fo_d)*T[1;j+1]-Fo_d*T[2;j+1]=2*Bi_1d[1;j]*Fo_d*T_infinity1+&
(1-Fo_d-Bi_1d[1;j]*Fo_d)*T[1;j]+Fo_d*T[2;j]
"internal nodes"
Duplicate i=2;(N-1)
-Fo_d*T[i-1;j+1]+(2+2*Fo_d)*T[i;j+1]-Fo_d*T[i+1;j+1]=Fo_d*T[i-1;j]+(2-2*Fo_d)*T[i;j]+Fo_d*T[i+1;j]
End
"node N"
(1+Fo_d+Bi_2d[N;j]*Fo_d)*T[N;j+1]-Fo_d*T[N-1;j+1]=2*Bi_2d[N;j]*Fo_d*T_infinity2+&
(1-Fo_d-Bi_2d[N;j]*Fo_d)*T[N;j]+Fo_d*T[N-1;j]
End
Ejemplo 2.6
"Analítico"
D_AB=2,9652 "[ft^2/hr]"
L=3 "[ft]"
Nterm=5
Fo_a=D_AB*t_sim/L^2
t_sim=600/3600
theta_0=(T_0-T_2)/(T_1-T_2)
T_0=1
T_1=,1: T_2=,2
x=1 "parámetro a cambiar"
x_hat=x/L
Duplicate i=1;Nterm
theta[i]=(1-theta_0+(-1)^i*theta_0)*sin(i*pi*x_hat)*exp(-i^2*Fo_a*pi^2)/i
End
T=T_1+(T_2-T_1)*(x_hat+2/pi*sum(theta[1..Nterm]))
tol=theta[Nterm] "último término de la sumatoria"
"Numérico"
"Información previa"
T_ini=1
DELTAx= ,25 "[ft]" : DELTAtime= 25/3600 "[hr]"
M=t_sim/DELTAtime+1: N=L/ DELTAx+1: alpha=2,9652 [ft^2/hr]
Fo=alpha*DELTAtime/DELTAx^2:
End
"Condición inicial"
Duplicate i=2;(N-1) "los nodos extremos están siempre en el valor de la perturbación"
T[i;1]=T_ini
End
"Controlar para DELTAtime máximo Fo< 1/2 ó Fo < 1/[2(1+Bi)]. En este caso, como no hay
convección se usa la primera condición y se obtiene tmax= 151.8 s = 0.042 hr"
"Condición inicial"
Duplicate i=2;(N-1)"los nodos extremos están siempre en el valor de la perturbación"
Y[i;1]=T_ini
End
"Condición inicial"
Duplicate i=2;(N-1) "los nodos extremos están siempre en el
valor de la perturbación"
249
PROCESOS EN ESTADO TRANSITORIO
Z[i;1]=T_ini
End
"Nodos internos"
Duplicate i=2;(N-1)
dTdt[i]=D_AB*(T[i-1]+T[i+1]-2*T[i])/DELTAx^2
T[i]=T_ini+integral(dTdt[i];time;0;t_sim)
End
Ejemplo 2.7
duplicate i=1;N
theta[i]=A[i]*exp(-(i*pi)^2*Fo)*sin(i*pi*z_hat)
end
theta_t= sum(theta[1..N])
T=T_2+(T_1- T_2)*(1-z_hat-theta_t)
Fo=D_AB*time/L^2
D_AB=5,75e-8 [m^2/s] "propiedades del sólido"
z_hat=z/L
L=0,1 [m]: T_1=4,8: T_2=2,45
time=3600: z=L/2
250
SISTEMAS CON GENERACIÓN
Se nota que durante la operación, el sólido se puede analizar como sólido semiinfinito pues la
penetración de la perturbación zP 4 DABtsimulación no supera el espesor de la membrana, así:
alpha=5,75e-8 [m^2/s]
T_s=4,8 [kgmol/m^3]
T_i=2,45 [kgmol/m^3]
x_sim=0,1 [m]
DELTAx=x_sim/(n-1)
n=11
duplicate i=1;n
x[i]=(i-1)*DELTAx
end
t_sim=10500
m=21
DELTAt=t_sim/m "500 [s] para este caso"
duplicate j=1;m
t[j]=j*DELTAt
end
duplicate j=1;m
duplicate i=1;n
{T[i;j]=SemiInf1(T_i;T_s;alpha;x[i];t[j])} "comando incluido en EES"
T_s-T[i;j]=(T_s-T_i)*erf(x[i]/(2*sqrt(alpha*t[j])))
end
end
Cuando todos los términos del balance microscópico unidimensional son diferentes de cero,
el modelo matemático es una ecuación diferencial parcial no homogénea. Además, las
condiciones iniciales y de frontera pueden agregar más inhomogeneidades haciendo aún
más complicadas las soluciones analíticas. Como ilustración presentamos cuatro
situaciones de aplicación práctica.
Plantee una ecuación diferencial para el caso de una placa plana con generación en estado
inestable intercambiando calor con un medio a T constante. Su distribución de
temperatura inicial es parabólica. Sugerencia: Use el método de superposición para
resolver la ecuación diferencial parcial resultante.
2T H 1 T
, (3.1a)
z 2 k t
z 2 z
2
t 0 ; T T0 a 1 TS 0 b a ; 0 z L ,
L L
b a TSO ,
2 2 F H 1
,
z 2 z 2 k t
t 0, 0 z L, T0 F ,
F
t 0, z L , k h F T .
z z
Se puede decir:
F
k h z L ; k hFL T .
z zL z zL
2F H
0. (3.1b)
z 2 k
Esto implica
2 1
, (3.1c)
z 2 t
dF
H z C1 ,
dz k
dF
CL1: z 0, 0 entonces C1 0 .
dz
Integrando nuevamente
H z2
F C2 ,
2k
dF
CL2: z L, k h FL T ,
dz zL
L L2
k H h H C 2 T ,
k 2k
H 2 2 H L
F
2k
L z h T . (3.1d)
( z , t ) ( z )G (t ) ,
1 dG 1 d 2
2 ,
G dt dz 2
donde es un número real. Se iguala a esta constante, ya que siendo cada lado función de
una variable diferente debe ser una constante. Esta constante es un número real y debe ser
una cantidad negativa para que no produzca soluciones triviales. De otra parte, este valor
es lógico pues la temperatura debe tener un valor finto cuando t aumenta indefinidamente.
Tenemos entonces dos ecuaciones diferenciales ordinarias lineales con coeficientes
constantes. La primera, de primer orden se resuelve por separación de variables:
dG
G
2dt entonces G C1 exp 2 t , (3.1e)
d 2 2
0.
dz 2
Condición límite 1:
d
C2 cos z C3 sin z C2 0 entonces C2 0 .
dz z 0 z 0
Condición límite 2:
k h entonces k h ya que G no depende de z .
z z L zL z z L zL
256
SISTEMAS CON GENERACIÓN
Reemplazando:
h L
kC3 sin z h L entonces C3 .
zL k sin z
Calculando la ecuación para en z L con los valores hallados para C2 y C3 :
h L cos L h
L entonces tan L por lo tanto L tan L Bi . (3.1g)
k sin L k
Todos los valores de que satisfagan la ecuación trascendental (3.1g) constituyen solución
particular de (3.1f). La solución más general se obtiene por superposición de las soluciones
particulares, a saber:
n z n t
2
z ,t An cos exp , (3.1h)
1 L L2
L
L
L
n z H L2 H L L n z H a 2 z
0 L 2k
T F cos dz b T cos dz 2 z cos n dz.
2k L
0 h 0 L L
257
PROCESOS EN ESTADO TRANSITORIO
n n
L
L
2 n z L cos 2u 1 L sin 2u u n
L n
cos udu du
2
cos dz
0 0 n 0
2 n 4 2 0
1
La integral de cos cz es sin cz . La integral restante deberá hacerse por partes y de
c
manera recurrente:
L z2 L
2
z cos cz dz c sin cz c z sin cz dz ,
2
0 0
L L
z 1
z sin cz dz c cos cz c cos cz dz .
0 0
L
n z L3 2 L3 2 L3 2 L3 L3 2L3
3 sin n .
2
z cos dz sin n 2 cos n 3 sin n 2 cos n
0 L
n
n
n
n
n n
Teniendo en cuenta los valores de las integrales anteriores, las constantes An son:
L L2 2a 4 L2 H a
2 Ts 0 T H H 2 2 sin n cos n
h k n n n 2k L2
An .
sin n cos n n
n z n t H 2 2 H L
2
T z ,t An cos exp L z T . (3.1j)
1 L L2 2k h
258
SISTEMAS CON GENERACIÓN
Solución analítica
2T H
0,
z 2 k
T
CL1: 0 ; z = 0 plano de simetría o superficie adiabática,
z
T
CL2: k hT T z = L superficie convectiva.
z
dT
H z C1 ,
dz k
H z2
T C2 ,
2k
H L H L H L H L2
2
CL2: k
h C T entonces C T ,
k 2k
2 2
h 2 k
H L2 z H L
2
T 1 T
2k L h
z 2
T1 16.667 1- 340.91 C , (3.2a)
0.01
z 2
T2 33.334 1 431.82 C . (3.2b)
0.01
Se observa que el origen coordenado se toma en el plano de simetría por lo cual la longitud
característica L es el semiespesor (10 mm).
z
T ( z, t ) An cos n exp 0.05n2t 3.333 105 z 2 465.15 , (3.2c)
n 1 0.01
Solución numérica
Solución: Para resolver este ejercicio usaremos el método de diferencias finitas según
Crank – Nicolson. Para comenzar, la distribución inicial de temperaturas debe conocerse.
Para placa plana con generación, simétrica y en estado estable. Del capítulo 1 tenemos
tomando como origen coordenado el plano central de la placa, de donde para z = 0, dT/dz =
0.
L2 z
2
T H 1 1 TS , (3.2d)
2k L
H1L
hTS T TS T
dT
k .
dz zL h
7
H Az L hAz (TS T ) TS 250 (10 )(0.01) 340.91 °C.
1100
z 2
T 0 ( z ) 16.67 1 340.91 .
0.01
Calculamos Biot
hz (1100 )(0.0025)
Bi = = 0.0917 .
k 30
1
Fo = 0.916.
1.0917
Entonces
(0.916)(0.0025) 2
tmax = = 1.145 s.
5x10 6
H t / k 2.5 C .
La matriz [C] se calcula en el tiempo (t) y provee las temperaturas de los diferentes nodos
en el tiempo (t+1). Para la distribución inicial de temperaturas, o sea t = 0 los valores de las
263
PROCESOS EN ESTADO TRANSITORIO
Tm0 temperaturas las obtenemos de la ecuación (3.2d) para estado estable haciendo z = 0,
2.5, 5, 7.5 y 10 mm respectivamente. Se obtienen los siguientes valores:
Multiplicando [A]-1 (la matriz inversa de [A]) por [C]0 se obtienen las temperaturas Tm1 de los
1 -1
diferentes nodos las que a su vez nos generan [C] que al multiplicarse por [A] genera los
Tm2 y así sucesivamente se continúa tantos incrementos de tiempo como se requiera.
Obtenemos finalmente:
A partir de la solución usando EES (ver código en sección NOTAS al final del capítulo) se
obtienen la Figura 3.2 solución analítica y Figura 3.3 solución numérica.
264
SISTEMAS CON GENERACIÓN
500
Placa con Generación
Tiempo 500 [s]
400
Tiempo 3 [s]
350
300
0 0,001 0,002 0,003 0,004 0,005 0,006 0,007 0,008 0,009 0,01
z [m]
Figura 3.2. Solución analítica de la placa con generación
500
Plate with generation
Time 300 [s] Crank Nicolson
Time 270 [s]
Time 90 [s]
T [°C]
Time 60 [s]
400
Time 30 [s]
Time 3 [s]
300
0 0,001 0,002 0,003 0,004 0,005 0,006 0,007 0,008 0,009 0,01
z [m]
Figura 3.3. Solución numérica (Crank Nicolson) de la placa con generación
265
PROCESOS EN ESTADO TRANSITORIO
Los valores obtenidos para dos tiempos diferentes se observan en la Tabla 3.3.
z T [°C] T [°C]
[m] t=3 [s] t=500[s]
0 362,6 465,1
0,001 362,4 464,8
0,002 361,9 463,8
0,003 361 462,1
0,004 359,9 459,8
0,005 358,3 456,8
0,006 356,5 453,1
0,007 354,2 448,8
0,008 351,7 443,8
0,009 348,7 438,1
0,01 345,4 431,8
Tabla 3.3. Valores a diferentes tiempos
El presente es un ejercicio académico que pretende dos objetivos: primero mostrar como
dos fenómenos físicos pueden describirse por un mismo modelo matemático creando
situaciones de similitud que permiten eventualmente obtener conclusiones sobre un sistema
experimentando con el otro. En segundo lugar, acentuar el hecho según el cual, aunque
podamos obtener el modelo matemático de un sistema real, es decir la ecuación diferencial
y las condiciones iniciales y de frontera que lo describen, no siempre se puede resolver
analíticamente, y aun pudiéndose, la ecuación resultante es engorrosa de usar y poco
flexible. Surge entonces como alternativa el uso de métodos numéricos que, poco
aplicables para cálculo manual, se convierten en un poderoso auxiliar con la ayuda de la
programación de computadores.
c A 2c A
DAB 2 k ' c A , (3.3a)
t z
266
SISTEMAS CON GENERACIÓN
t = 0 , z 0 ,cA = cAo = 0.
t > 0 , z = 0 : cA = cAs = constante.
t > 0 , z = ∞ : cA = 0 = cA∞.
Esta situación corresponde a muchos casos reales entre los que mencionamos la
contaminación atmosférica con NO2 y su destrucción por reacción fotoquímica, o el
consumo de CO2 en el seno de un cuerpo de agua por fotosíntesis.
d 2 f s
DAB k ' Lc A t , z sLc A t , z ,
dz 2
d 2 f s s k '
f s 0 .
dz 2 D AB
f s C1 exp z K C2 exp z K ,
s k'
con K ; C1 y C2 constantes de integración a determinar.
D AB
Lim z f s Lim z e st c A t , z dt .
0
1
Colaboración del Profesor Omar E. Ospina A. oeospinaa@unal.edu.co
267
PROCESOS EN ESTADO TRANSITORIO
Lim z f s e st Lim z c A t , z dt 0 .
0
Lim z0 f s e st Lim z0 c A t , z dt
c As
,
0 s
s k ' c As z
f s
c As
exp z exp s k' .
s DAB s DAB
0 0
Haciendo entonces:
z
g s g t 1 y h s exp
1 s k' .
s DAB
L1 exp m s m
2 t 3/ 2
exp
m2
, siendo m una constante, en este caso z/(DAB)0.5.
4t
Entonces:
L1 exp m s z
D AB 2t
1
3/ 2
exp
z2 1
.
D AB 4t
Si
Lht H s L e at ht H s a .
Entonces:
z2 1
exp
z z z
L 1 s k ' exp k ' t
exp
D
D AB D AB 2 D AB t 3
AB 4t
z2 .
= ht z
exp k ' t
2 DAB t 3 4 DABt
c z t
L1 As exp s k ' hu g t u du , con g(t- u) = 1,
D 0
s AB
t
z z2
c A c As exp k ' u du .
2 DAB u 4 D AB
u
3
z z z2
Cambio de variable: haciendo entonces d du , u .
2 DABu 4 DABu 3 4 D AB 2
Si u 0 entonces .
z
Si u t entonces n.
2 DABt
269
PROCESOS EN ESTADO TRANSITORIO
La integral queda:
cA 2 2 k' z2
exp
d ,
c As 4D AB2
n
a a
reconociendo que: 2 1
2
1 ,
2 22
k' z
con a z y n , llegamos a:
D AB 2 D ABt
cA k '
a 1 k' z
2
exp z 1 exp d
c As DAB 2 2 2 DAB
n
(3.3b)
k '
a 1 k' z
2
exp z 1 exp d
DAB 2 2 2 DAB
n
Si n entonces v n k ' t .
Si entonces v .
Si n entonces w n k ' t .
Si entonces w .
Por lo tanto:
270
SISTEMAS CON GENERACIÓN
cA 1 a v 2 a
w2
e e dv e e dw .
c As n k 't n k 't
Reemplazando en (3.3b):
cA 1 k' z 1 k' z
exp z erfc k ' t exp z
2 erfc k 't .
3.3b-i
c AS 2 DAB 2 DABt DAB 2 DABt
c A e k 't
NA D AB c As DAB k ' erf k't . (3.3c)
z 0
z z 0 k ' t
Además, los moles totales del compuesto A absorbidos por el líquido B en un tiempo t0 por
unidad de área:
M A c As DABt0 k ' t0
1 erf k ' t0 1 exp k ' t0 . (3.3c-i)
2 k ' t0
cA k'
exp z ,
(3.3b-ii)
c As DAB
N As N A z 0 c As k ' DAB ,
t0
1
M A N As dt c As k ' DAB t0 . (3.3c-ii)
2k '
0
Ejemplo 3.2: (Problema 7.14 en Cutlip, p. 310, ejemplo 7.5-3 en Geankoplis p. 513,
modificado). Se absorbe CO2 puro gaseoso a 101325 Pa de presión en una solución
amortiguadora alcalina diluida que contiene un catalizador. El soluto CO 2 absorbido y
1 9
diluido experimenta una reacción de primer orden con k’ = 35 s y DAB = 1.5x 10 m2/s. La
7
solubilidad está dada por la ley de Henry con H = 2.961x 10 kgmol/m3.Pa. La superficie
271
PROCESOS EN ESTADO TRANSITORIO
Esta es el área bajo el perfil de concentraciones. Para métodos numéricos puede aproximar
este valor teniendo en cuenta que el nodo cero tiene concentración constante y actúa solo
sobre z .
2
Solución analítica: se usa la ecuación (3.3c-i) del desarrollo anterior teniendo presente que
la concentración en la superficie, c As se obtiene a partir de la ley de Henry y la presión
parcial del soluto en la fase gaseosa: cAs = PAH = 0.03 kgmol/m3.
c_As=0,03 D_AB=1,500E-09
H=2,961E-07 k_hat=35 [1/s]
M_A=1,472E-07 [kgmol/m^2] P=101325
t_o=0,01
Al graficar estos datos se obtiene la Figura 3.4. Se destaca el uso de la técnica para
generar múltiples curvas en forma simultánea, sin necesidad de crear previamente la tabla
paramétrica.
0,035
0,03
Dt=0.002 [s]
cA (z,t) [kgmol/m3]
0,025
0,02
t=0.01 [s]
0,015
0,01
t=0.002 [s]
0,005
0
0 0,000005 0,00001 0,000015
z [m]
Figura 3.4. Perfil de concentración sistema semi-infinito
2T PhT T 1 T
La ecuación , (3.5a)
z 2 kAz t
273
PROCESOS EN ESTADO TRANSITORIO
con condiciones
2 Ph Ph
2 m ; m , constante. (3.5b)
t z kA z CP A z
t = 0 , z : T = T0 = T 0 T T = 0,
t > 0 , z = 0 : T = TS S TS T ,
t > 0 , z = ∞ : T = T T T = 0.
1 m z m z
2 exp z erfc mt exp z erfc mt . (3.5c)
S
2 t 2 t
Para aletas finitas y diferentes condiciones iniciales y de frontera, (Carslaw, 1959) trae
varias soluciones (sección 4.7, p. 144 – 146). Sin embargo, estas y otras soluciones, como
hemos visto, son bastante laboriosas, por lo que es una buena opción recurrir a las
soluciones por métodos numéricos.
Nodo interno:
Tmt 11 2Tmt 1 Tmt 11 Ph Tmt 1 T
1 Tmt 1 Tmt
.
z 2 kAz t
Reorganizando:
FoTmt 11 1 2Fo BiFoL* Tmt 1 FoTmt 11 BiFoL*T Tmt ,
Donde
t hz L* S / A
Fo 2 ; Bi ; z ; S Pz
z k
k z
Bi .
DAB
hAz T
t 1
T T
t 1
T 0.
z t
M M
2 2
Reorganizando:
Para transferencia de masa, comparando las ecuaciones (3.3a) y (3.5b), T se sustituye por
cA, por DAB y
k' Ph
.
DAB kAz
Para estabilidad, Fo 1/ 2 BiL* .
Nodo extremo, M:
Para estabilidad, Fo 1/ 2 2Bi BiL , más restrictivo que los otros nodos.
*
Ejemplo 3.5: (Ejemplo 4.10 en Holman, modificado). Una varilla de acero (k = 50 W/m.K)
de 3 mm de diámetro y 10 cm de largo, se encuentra inicialmente a 40 °C. En el tiempo
cero, se sumerge en un fluido con h = 50 W/m2.s y T∞ = 40 °C, mientras que uno de sus
extremos se mantiene a 200 °C. Determine la distribución de temperaturas en la varilla
después de 40 s. Las propiedades del acero son = 7800 kg/m3 y CP = 470 J/kg.K. Tome
z = 2.5 cm, t = 10 s. Use el método implícito. ¿Cuál será el tiempo necesario para
alcanzar el estado estacionario?
z
2
Ts 200C
1 2 3 4
T 40C
z z z z
z 2.5cm
Figura 3.5. Ej 3.5: Nodos varilla de acero
MÉTODO ANALÍTICO
A partir de la solución usando EES (ver código en la sección NOTAS al final del capítulo) se
obtienen los T[i;j] en la Tabla 3.5, la Figura 3.6 y los siguientes resultados:
200
Intervalos de 10 [s]
150
T(z) [°C]
100
50
Perfil a los 10 [s]
0
0 0,025 0,05 0,075 0,1
z [m]
Figura 3.6. Perfil de temperatura método analítico
Se observa que la onda de temperatura comienza a alcanzar el extremo para este tiempo.
277
PROCESOS EN ESTADO TRANSITORIO
MÉTODO IMPLÍCITO
Usando un método numérico se hace el cálculo para una aleta finita (ver código en la
sección NOTAS), haciendo incrementos de tiempo de 1 [s] y de espacio de 1 [cm] se
obtiene la Tabla 3.6 para los T[i;j+1]:
Para determinar el tiempo necesario para alcanzar el estado estable, se toma un tiempo de
simulación de 600 s, obteniéndose los siguientes resultados:
Bi=0,025 Fo=0,2182
L_car=8,333 p_f=600 [s]
q=18,26 [1/m]
200
100
Perfil a los 50 [s]
50
Intervalos de 50 [s]
0
0 0,02 0,04 0,06 0,08 0,1
z [m]
Figura 3.7. Perfil de temperatura método implícito
278
SISTEMAS CON GENERACIÓN
Se hace notar que para el método explícito Fo debe ser menor que 0.44. Con el análisis
numérico se concluye que para tiempos mayores a 500 [s] los perfiles prácticamente se
superponen con el perfil de estado estable por lo que este valor del tiempo puede aceptarse
como el necesario para alcanzar el estado estable.
El flujo de calor en cualquier instante debe evaluarse aplicando la “Ley de Newton del
enfriamiento” a cada nodo, teniendo en cuenta que para el nodo cero el área para
P z P z
convección es y para el nodo cuatro es Az .
2 2
Se analiza el caso de un sistema con simetría esférica con generación uniforme de calor y
condición inicial no uniforme. Este análisis se hace resolviendo el modelo matemático, una
ecuación diferencial parcial no homogénea, tanto analítica como numéricamente. Como
aplicación práctica se aplica al manejo de materiales biológicamente activos como frutas y
verduras. Las ecuaciones resultantes en ambos casos se resuelven con ayuda del software
EES. Se adiciona un código en el software Matlab al final del capítulo.
Solución analítica
Una esfera transfiriendo calor en estado transitorio con generación está descrita por el
siguiente modelo matemático:
1T 1 2T
.
t r 2 r r k
r (3.6a)
2 2 R
T0 T 0
6k
R r 3h . (3.6b)
0
T
k h T T . (3.6c)
r
1 Te 1 2 Te
0 ,
t r 2 r r k
r (3.6d)
por lo cual
2 R
Te T
6k
R r2
3h
. (3.6e)
1 Tt 1 2 Tt
t r 2 r r
r . (3.6f)
1 u 2u
. (3.6g)
t r 2
Esta ecuación tiene condiciones de frontera homogéneas por lo que puede resolverse por
el método de separación de variables. Suponemos que su solución es de la forma
u r , t F r G t . Al reemplazar en (3.6g) y reorganizando se tiene
1 dG 1 d 2 F
2 , (3.6h)
G dt F dr 2
donde es un número real. Se iguala a esta constante pues siendo cada lado función de
una variable diferente debe ser una constante. Esta constante es un número real y debe ser
una cantidad negativa para que no produzca soluciones triviales. De otra parte, este valor
es lógico pues la temperatura debe tener un valor finito cuando t aumenta indefinidamente.
Tenemos entonces dos ecuaciones diferenciales ordinarias lineales con coeficientes
constantes. La primera, de primer orden se resuelve por separación de variables:
280
SISTEMAS CON GENERACIÓN
dG
2 dt G C1 exp( 2t ) . (3.6i)
G
d 2F
2F 0 . (3.6j)
dr 2
Condición límite 2: en r = R,
F hR
F R F ya que G no depende de r.
r rR k rR
Reemplazando:
C2 sin R RC2 cos R BiC2 sin R ,
Simplificando
1 n R cot n R Bi . (3.6l)
Todos los valores de n que satisfagan la ecuación trascendental (3.6l) constituyen una
solución particular de (3.6k). La solución más general se obtiene por superposición de las
soluciones particulares, a saber:
r 2 t
u r , t Cn sin n exp n 2 (3.6m)
n 1 R R
es decir
281
PROCESOS EN ESTADO TRANSITORIO
sin n r / R
Tt r , t Cn exp n2 Fo . (3.6n)
n 1 r
R
R
Te T0 r sin n r / R dr Cn sin 2 n r / R dr . (3.6o)
0
0
R 1 1
Te T0 T T 0 A0 ,
3 h h0
T r , t Te r Tt r , t , (3.6q)
R2 r 2 R
sin n sin n r *
T T 2BiA0 exp n2 Fo . (3.6r-i)
6k 3h n 1 sin cos n r *
sin n r *
Hemos introducido r* r / R . Cuando r* 0, 1 .
n r *
2 A0 RBi
Cn
Bi Bi 1 sin n
2
. (3.6p-i)
n
2 2 R
Si la condición inicial es T0
6k
R r , A0 T
3h
, entonces (Carslaw, 1959) p.
246.
Esta es la distribución de temperatura en estado estable para una esfera con temperatura
cero en la superficie (lo que hace T 0 0 y h0 ), y en la superficie se intercambia
calor por convección con un medio a T .
sin n r *
Por L’Hopital cuando r → 0, n .
r*
Para usar la solución analítica, empleamos el código en EES (ver en sección NOTAS al
final del capítulo) y se obtuvieron los siguientes resultados:
Bi=1,17 Fo=0,3817
PHI=38,89 T=-5,895 [C]
time=3600 [s]
5
4
3 t=900 [s]
2
1
0 t=1800 [s]
-1
-2
T [C]
-3 t=2700 [s]
-4
-5
-6 t=3600 [s]
-7
-8
-9
6
Esfera con Generación
r* = 0
4 Cálculo analítico con 60 términos
2
r* = 0,5
0
T °C
r* = 1,0
-2
-4
-6
-8
-10
0 600 1200 1800 2400 3000 3600
time [s]
Figura 3.9. Distribución de temperatura en la manzana (esfera con generación) a según el r*
Por el método de Crank Nicolson se utilizan las ecuaciones (4.22), (4.23) y (4.24) del
capítulo de métodos numéricos (ver código en la sección NOTAS al final del capítulo) y se
obtiene la Figura 3.10 con los siguientes resultados:
10
Intervalos de 10 [min]
Perfil inicial
T [°C] 5
-5
Perfil a 60 [min]
-10
0 0,01 0,02 0,03 0,04
r [m]
Figura 3.10. Perfil de temperatura método Crank Nicolson
Para el método explícito, el numero máximo de Fourier viene dado por la condición de
estabilidad del nodo central que en este caso es 0.1667, razón por la cual la selección del
paso de tiempo y espacio asumida en este ejemplo no se deben utilizar en el método
explícito.
R 2 sin n
Cn 2 Bi 2 T0 T
k n n sin n cos n
A este resultado se llega después de un laborioso proceso similar al que nos llevó a las
ecuaciones (3.6r-i y 3.6 r-ii). Sin embargo, para los métodos numéricos basta modificar los
valores en el tiempo cero y el mismo código nos da los resultados requeridos.
"Vaya a Menú Options- Variable Info-Show array variables-array se le quita el v y en guess para
lambda[] se coloca guess[],
y en lower y upper limit se coloca lowerlimit[] y upperlimit[]. Así se delimitan los intervalos de cálculo
para cada valor propio.
De otra forma calcula todos los valores iguales. Recuerde que cero no es un valor propio"
"Inputs"
T_infinity=250 [C]: PHI_1=1e7 [W/m^3]: PHI_2=2e7 [W/m^3]: k=30 [W/m-C]: h=1100 [W/m^2-C]
L=0,01 [m]: alpha=5e-6 [m^2/s]
T_so=PHI_1*L/h+T_infinity
a=PHI_1/2/k
G=PHI_2*alpha*DELTAtime/k
"Setup grid"
N=11 [-] "number of nodes"
DELTAx=L/(N-1) "distance between adjacent nodes"
duplicate i=1;N
x[i]=(i-1)*DELTAx "position of each node"
end
"alpha=k/rho/Cp"
duplicate i=1;N
T[i;1]= a*(L^2-(x[i])^2)+T_so "initial condition"
end
Ejemplo 3.2
"Datos"
P=101320 [Pa] "Presion parcial del CO_2"
k'=35 [1/s] "Reaccion de primer orden"
D_AB=1,5e-9 [m^2/s] "Difusividad"
H=2,961e-7 [kgmol/m^3-Pa] "Constante de Henry"
M=5
t_sim=0,01 [s]
DELTAt=t_sim/M "Intervalo de tiempos"
duplicate j=1;M
t[j]=j*DELTAt
end
M_CO_2=C_s*sqrt(D_AB*t_sim)*(((sqrt(k*t_sim)+1/(2*sqrt(k*t_sim)))*erf(sqrt(k*t_sim))+&
(1/sqrt(pi)*exp(-k*t_sim)))) "ecuación (3.3c-i)"
"ecuación (3.3b-i)"
duplicate j=1;M
duplicate i=1;N
C[i;j]/C_s*2=exp(-x[i]*sqrt(k/D_AB))*erfc((x[i]/(2*sqrt(D_AB*t[j]))-
sqrt(k*t[j])))+exp(x[i]*sqrt(k/D_AB))*erfc((x[i]/(2*sqrt(D_AB*t[j]))+sqrt(k*t[j])))
end
end
Ejemplo 3.3
ALETA TRANSITORIA
Método analítico
Se generan las curvas con una sola orden que puede servir para la creación de gráficos
secuenciales.
289
PROCESOS EN ESTADO TRANSITORIO
"malla de nodos"
N=5[-] "numero de nodos"
duplicate i=1;N
x[i]=(i-1)*DELTAx
end
"tiempo"
U=5[-] "numero de pasos de tiempo"
t_sim=40 [s]
DELTAtime=t_sim/(U-1) "Intervalo de tiempo"
duplicate j=1;U
time[j]=j*DELTAtime
end
"Perfil de temperaturas"
duplicate j=1;U
duplicate i=1;N
"ecuación (2c)"
Theta[i;j]/Theta_s*2=exp(-x[i]*sqrt(m/alpha))*erfc((x[i]/(2*sqrt(alpha*time[j]))-&
sqrt(m*time[j])))+exp(x[i]*sqrt(m/alpha))*erfc((x[i]/(2*sqrt(alpha*time[j]))+sqrt(m*time[j])))
Theta[i;j]=T[i;j]-T_infinity
end
end
Theta_s=T_s-T_infinity
Método implícito
"METODO IMPLICITO"
"Datos del sistema"
T_inicial=40 [C]*convert(C;K) "temperatura inicial"
T_s=200 [C]*convert(C;K) "temperatura de la base"
h=50[W/m2*K] "conductividad del fluido"
T_infinity=40 [C]*convert(C;K) "temperatura del fluido"
p_f=600 [s] "tiempo de simulacion"
k=50[W/m*K] "conductividad varilla de acero"
rho=7800 [kg/m3] "densidad del acero"
290
NOTAS SISTEMAS CON GENERACIÓN
Ejemplo 3.4
291
PROCESOS EN ESTADO TRANSITORIO
MANZANA TRANSITORIA
Método analítico
"Función que contiene el condicional que si r_hat~=0 se use la ecuación modificada para evitar la
indeterminación"
function theta(C;lambda;Fo;r_hat)
if r_hat<1e-6 Then
theta=C*exp(-lambda^2*Fo)
Else
theta=C*exp(-lambda^2*Fo)*sin(lambda*r_hat)/(lambda*r_hat)
endif
end
N=5
duplicate i=1;N
lowerlimit[i]=pi*(i-1)+1e-6 "cero no es un valor propio"
upperlimit[i]= lowerlimit[i]+pi
guess[i]= lowerlimit[i]+pi/2
end
duplicate i=1;N
lambda[i]=(1-Bi)*tan(lambda[i])
end
"Menú Options- Variable Info-Show array variables-array se le quita el v y en guess para lambda[] se
coloca guess[]. De otra forma calcula todos los valores iguales. Recuerde que cero no es un valor
propio"
duplicate i=1;N
C[i]=sin(lambda[i])/(lambda[i]-sin(lambda[i])*cos(lambda[i]))
end
duplicate i=1;N
theta[i]=theta(C[i];lambda[i];Fo;r_hat) "se llama a la función"
end
theta_rt= sum(theta[1..N])
Ao=(T_infinity-T_infinityo)+PHI*Rs/3*(1/h-1/ho)
T-T_infinity=FI*(Rs^2-r^2)/6/k+PHI*Rs/3/h-2*Bi*Ao*theta_rt
292
NOTAS SISTEMAS CON GENERACIÓN
theta_rt=sum
duplicate i=2;N
r_m[i]=DELTAr*(i-1)
a_1[i]= (1- (DELTAr/r_m[i])+(DELTAr^2)/(4*r_m[i]^2))
a_2[i]=(1+(DELTAr/r_m[i])+(DELTAr^2)/(4*r_m[i]^2))
b[i]= (1+(DELTAr^2)/(4*r_m[i]^2) )
end
"Malla de tiempo"
duplicate j=1;M
t[j]=(j-1) * DELTAt
end
"Malla de nodos"
duplicate i=1;N
x[i]= (i-1) * DELTAr
end
"condicion inicial"
duplicate i=1;N
T[i;1]=T_s+(gen/3)*((r/h_inf)+(r^2-x[i]^2)/(2*K))
end
"Nodo interno"
duplicate j=1;M-1
duplicate i=2;(N-1)
-Fo*a_1[i]*T[i-1;j+1]+(2+2*b[i]*Fo)*T[i;j+1]-Fo*a_2[i]*T[i+1;j+1]=Fo*a_1[i]*T[i-1;j]+(2-
2*b[i]*Fo)*T[i;j]+Fo*a_2[i]*T[i+1;j]+(2*(gen*DELTAt)/(C_p*rho))
end
end
duplicate j=1;(M-1)
(1+3*Fo)*T[1;j+1]-3*Fo*T[2;j+1]=(1-3*Fo)*T[1;j]+3*Fo*T[2;j]+(gen*DELTAt)/(C_p*rho)
end
"Nodo convectivo"
duplicate j=1;(M-1)
(1+Fo*a_1[N]+Bi*Fo)*T[N;j+1]-Fo*a_1[N]*T[N-1;j+1]=Fo*a_1[N]*T[N-1;j]+(1-Fo*a_1[N]-
Bi*Fo)*T[N;j]+2*Bi*Fo*T_inf+(gen*DELTAt)/(C_p*rho)
end
m=length(To);
L=Fo;
dc;%Matriz [A].
W=C;
Tant=To;
t=0;
tiempo(1)=t;
for k=1:nit
t=t+dt;
tiempo(k+1)=t;
L=-Fo;
dc;%Matriz [C].
B=C;
a=2*(fi*alfa*dt/ko)+B*Tant;
a(1)=Tant(1)*(1-Fo)+Fo*Tant(2)+fi*alfa*dt/ko;
a(m)=2*Bi*Fo*Tinf+(1-Bi*Fo-Fo)*Tant(m)+Fo*Tant(m-1)+fi*dt*alfa/ko;
Tant=W\a;
T(:,k)=[Tant];
end
Tf=[To T];
x=[1:1:m-1];
xp=del.*x;
X=[0 xp]';
%Escoger los perfiles a graficar
%nn=0;
%kk=2;
%Tr(:,1)=Tf(:,1);
%for i=1:length(Tf(1,:))
% if nn==4
% Tr(:,kk)=Tf(:,i);
% tg(kk)=tiempo(i);
% kk=kk+1;
% nn=0;
% end
% nn=nn+1;
%end
%H=num2str(tg');
hold on
plot(X,Tf,'b',X,Tfinal,'r');
xlabel('ancho de la placa [m]');
ylabel('Temperaturas [°C]')
text(0.001,352,'Tiempo 0');
295
PROCESOS EN ESTADO TRANSITORIO
text(0.004,465,'Tiempo infinito');
pause
plot(delt,T);xlabel('tiempo <seg>');ylabel('Temperatura <°C>');
%------------------------SOLUCION-ANALÍTICA------------------------%
%Bio=h*lon/ko;%número de biot para la solución analítica.
%lamda=[0.5711 3.2539 6.3410 9.4635];
%sols;
%A=[-107.79 0.216 -0.0167 0.00304];
%lam=lam';
%cr;
%coa;
%u=0;
%for f=1:length(X)
% u=u+1;
% Tana=A.*cos(lam.*X(f)/0.01).*exp(-0.05.*(lam.^2).*tt);
% com=-(3.333e5*X(f)^2)+465.15;
% Tzt=sum(Tana)+com;
% Tan(u,1)=Tzt;
% end
% plot(X,Tan,'y*:')
% hold off
%-----------------------------------
CODIGO EN MATLAB PARA EL EJEMPLO ALETA TRANSITORIA:
Programa “aletao”
3. Se creará el vector de incrementos en longitud, constituido por cada una de las distancias
correspondientes a cada nodo.
z = 0:del:lon = [0 0.0250 0.05 0.075 0.1].
4. Entonces, en el command window aparecerá el siguiente mensaje:
La ecuación del perfil inicial en función de z debe de escribirse
con un punto (.) antes de cualquier multiplicación o división.
Puesto que el perfil inicial de Temperaturas es una función dependiente de la longitud y para generar
el conjunto total de temperaturas se requieren cada una de las distancias correspondientes a cada
296
NOTAS SISTEMAS CON GENERACIÓN
t = [0 10 20 30 40] s.
Por cada corrida de dicha subrutina ella opera realizándole la inversa de la multiplicación entre dos
matrices:
“a” (términos constantes de las ecuaciones en diferencias finitas para cada nodo) y “W”
(correspondiente al la matriz tridiagonal).
De la forma: To = (W .* a)^ (-1).
clear all
lon=input('longitud de la aleta [m]. ');
diam=input('diametro de la varilla [m]. ');
rho=input('Densidad del acero [kg/m^3]. ');
Cp=input('Capacidad calorifica del acero [J/kg.K]. ');
ko=input('conductividad térmica [W/m*K]. ');
h=input('coeficiente convectivo [W/m^2*K]. ');
Tinterna=input('Temperatura constante en la base de la placa [°C]. ');
Tinfi=input('temperatura de fluido [°C]. ');
nid=input('número de divisiones en la placa. ');
tt=input('tiempo total.[s] ');
297
PROCESOS EN ESTADO TRANSITORIO
Tant=To;
t=0;
tiempo(1)=t;
for k=1:nit
t=t+dt;
tiempo(k+1)=t;
a=Tant+(Bi*Fo*Laz*Tinfi);
a(1)=Tant(1)+(Bi*Fo*Laz*Tinfi)+200*Fo;
a(m)=(2*Bi*Fo+Bi*Fo*Laz)*Tinfi+Tant(m);
Tant=W\a;
T(:,k)=[Tant];
Tg(:,k)=[Tinterna;Tant];
end
Too=[Tinterna;To];
Tf=[Too Tg];
x=[1:1:m];
xp=del.*x;
X=[0 xp]';
Tfz=Tf';
disp('Tabla resumen de las temperaturas');
disp(Tfz(2:end,:));
disp('enter para continuar');
%pause
298
NOTAS SISTEMAS CON GENERACIÓN
Usando este programa, podemos fácilmente resolver el problema de la aleta transitoria finita o infinita
con diferentes condiciones iniciales. El siguiente gráfico se obtiene para 100 nodos a intervalos de
tiempo de 5 segundos, mostrando además la tendencia teórica para un tiempo infinito.
[T(jj)]=perfil(Tinf0,Tinf,k,ro,Cp,h,Lc,Genera,t(jj),z(ii),h0);
Ts(ii,jj)=T(jj);
end
figure(1)
plot(t,T)
A=num2str(z(ii));
zetica=['r = ' A];
B=ceil(length(t)/2);
text(t(B),T(1,B),zetica)
hold on
end
xlabel('tiempo <segundos>')
ylabel('Temperatura °C')
title('Solución Analítica')
grid on
disp('La temperatura es:')
disp(Ts)
disp('para z=')
disp(z)
disp('y para t=')
disp(t)
toc;
disp('El tiempo usado por el programa una vez se ingresan todos los valores es de: <seg> ')
disp(toc)
%% :::::::::::::::::::::::::::::::::::::::::::::::::::::: Solución numérica
%:::::::::::::::::::::::::::::::::::::::::::::::::::::: Valores solicitados
prompt={'Número de nodos para el radio ','Tiempo total','Número de nodos para el tiempo'};
title1='Por favor ingrese los valores requeridos:';
numlines=1; defaultanswer={'9','3600','100'};
options.Resize='on'; options.WindowStyle='normal'; options.Interpreter='tex';
F2=inputdlg(prompt,title1,1,defaultanswer,options);
mmm=str2num(F2{1});
t=str2num(F2{2});
nnn=str2num(F2{3});
dt=t/(nnn-1);
dr=Lc/(mmm-1);
alpha=k/(ro*Cp);
Fo=alpha.*dt./(dr.^2);
Bi=h*dr/k;
rs=[0:dr:Lc];
ts=[0:dt:t];
a_mas_s=1+(dr./rs)+(dr^2./(4.*rs.^2));
a_menos_s=1-(dr./rs)+(dr^2./(4.*rs.^2));
bs=1+(dr^2./(4.*rs.^2));
%% ::::::::::::::::::::::::::::::::: Método de diferencias finitas: Explicito
[Temps]=Explicito(mmm, nnn);
for ii=1:length(rs)
figure(2)
plot(ts, Temps(ii,:),'b')
hold on
text(ts(ceil(nnn/2)),Temps(ii,ceil(nnn/2)),['r = ', num2str(rs(ii))])
end
xlabel('Tiempo (seg)')
ylabel('Temperatura (°C)')
title('Método de diferencias finitas: Explicito')
grid on
300
NOTAS SISTEMAS CON GENERACIÓN
figure(3)
plot(rs,Temps(:,1),'b', rs,Temps(:,ceil(nnn/2)),'g', rs,Temps(:,end),'r');
hold on
text(rs(ceil(mmm/2)),Temps(ceil(mmm/2),1),['t = ', num2str(ts(1))])
text(rs(ceil(mmm/2)),Temps(ceil(mmm/2),ceil(nnn/2)),['t = ', num2str(ts(ceil(nnn/2)))])
text(rs(ceil(mmm/2)),Temps(end,ceil(nnn/2)),['t = ', num2str(ts(end))])
xlabel('Radio (m)')
ylabel('Temperatura (°C)')
title('Método de diferencias finitas: Explicito')
grid on
for jj=1:length(ts)
figure(31)
plot(rs, Temps(:,jj),'b')
hold on
text(ts(ceil(mmm/2)),Temps(ceil(mmm/2),jj),['t = ', num2str(ts(jj))])
end
xlabel('Radio (m)')
ylabel('Temperatura (°C)')
title('Método de diferencias finitas: Explicito')
grid on
%% ::::::::::::::::::::::::::::::::: Método de diferencias finitas: Implicito
[Temps2]=Implicito(mmm, nnn);
for ii=1:length(rs)
figure(4)
plot(ts, Temps2(ii,:),'g')
hold on
text(ts(ceil(nnn/2)),Temps2(ii,ceil(nnn/2)),['r = ', num2str(rs(ii))])
end
xlabel('Tiempo (seg)')
ylabel('Temperatura (°C)')
title('Método de diferencias finitas: Implicito')
grid on
figure(5)
plot(rs,Temps2(:,1),'b', rs,Temps2(:,ceil(nnn/2)),'g', rs,Temps2(:,end),'r');
hold on
text(rs(ceil(mmm/2)),Temps2(ceil(mmm/2),1),['t = ', num2str(ts(1))])
text(rs(ceil(mmm/2)),Temps2(ceil(mmm/2),ceil(nnn/2)),['t = ', num2str(ts(ceil(nnn/2)))])
text(rs(ceil(mmm/2)),Temps2(end,ceil(nnn/2)),['t = ', num2str(ts(end))])
xlabel('Radio (m)')
ylabel('Temperatura (°C)')
title('Método de diferencias finitas: Implicito')
grid on
for jj=1:length(ts)
figure(41)
plot(rs, Temps2(:,jj),'b')
hold on
text(ts(ceil(mmm/2)),Temps2(ceil(mmm/2),jj),['t = ', num2str(ts(jj))])
end
xlabel('Radio (m)')
ylabel('Temperatura (°C)')
title('Método de diferencias finitas: Implicito')
grid on
%% :::::::::::::::::::::::::::: Método de diferencias finitas: Crank Nicolson
[Temps3]=CrankNicolson(mmm, nnn);
for ii=1:length(rs)
301
PROCESOS EN ESTADO TRANSITORIO
figure(6)
plot(ts, Temps3(ii,:),'r')
hold on
text(ts(ceil(nnn/2)),Temps3(ii,ceil(nnn/2)),['r = ', num2str(rs(ii))])
end
xlabel('Tiempo (seg)')
ylabel('Temperatura (°C)')
title('Método de diferencias finitas: Crank Nicholson')
grid on
figure(7)
plot(rs,Temps3(:,1),'b', rs,Temps3(:,ceil(nnn/2)),'g', rs,Temps3(:,end),'r');
hold on
text(rs(ceil(mmm/2)),Temps3(ceil(mmm/2),1),['t = ', num2str(ts(1))])
text(rs(ceil(mmm/2)),Temps3(ceil(mmm/2),ceil(nnn/2)),['t = ', num2str(ts(ceil(nnn/2)))])
text(rs(ceil(mmm/2)),Temps3(end,ceil(nnn/2)),['t = ', num2str(ts(end))])
xlabel('Radio (m)')
ylabel('Temperatura (°C)')
title('Método de diferencias finitas: Crank Nicholson')
grid on
for jj=1:length(ts)
figure(51)
plot(rs, Temps3(:,jj),'b')
hold on
text(ts(ceil(mmm/2)),Temps3(ceil(mmm/2),jj),['t = ', num2str(ts(jj))])
end
xlabel('Radio (m)')
ylabel('Temperatura (°C)')
title('Método de diferencias finitas: Crank Nicholson')
grid on
%% :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: Comparación
for ii=1:length(rs)
figure(8)
plot(ts, Temps(ii,:),ts, Temps2(ii,:),ts, Temps3(ii,:))
hold on
text(ts(ceil(nnn/2)),Temps(ii,ceil(nnn/2)),['r = ', num2str(rs(ii))])
end
legend('Explicito','Implícito','Crank Nocholson','Location','Best')
xlabel('Tiempo (seg)')
ylabel('Temperatura (°C)')
grid on
figure(9)
plot(rs,Temps(:,1),'b',rs,Temps2(:,1),'g',rs,Temps3(:,1),'r', rs,Temps(:,ceil(nnn/2)),'b',
rs,Temps(:,end),'b', rs,Temps2(:,ceil(nnn/2)),'g', rs,Temps2(:,end),'g',...
rs,Temps3(:,ceil(nnn/2)),'r', rs,Temps3(:,end),'r');
hold on
legend('Explicito','Implícito','Crank Nocholson','Location','Best')
text(rs(ceil(mmm/2)),Temps(ceil(mmm/2),1),['t = ', num2str(ts(1))])
text(rs(ceil(mmm/2)),Temps(ceil(mmm/2),ceil(nnn/2)),['t = ', num2str(ts(ceil(nnn/2)))])
text(rs(ceil(mmm/2)),Temps(end,ceil(nnn/2)),['t = ', num2str(ts(end))])
xlabel('Radio (m)')
ylabel('Temperatura (°C)')
title('Método de diferencias finitas')
grid on
302
MÉTODOS NUMÉRICOS EN PROCESOS NO ESTABLES
Las soluciones analíticas son convenientes porque proveen resultados válidos para todos
los puntos de un sistema. Sin embargo, muchos problemas de interés práctico son muy
complicados para obtener una solución analítica. En muchos procesos que dependen del
tiempo, la distribución inicial de temperaturas puede presentar características no uniformes,
o la temperatura ambiente, los coeficientes convectivos o las difusividades pueden variar.
Estos casos complejos pueden evaluarse empleando técnicas numéricas.
Las soluciones numéricas son solo aproximaciones a la solución real, pero pueden ser muy
buenas aproximaciones si se hacen correctamente. Es relativamente sencillo resolver
incluso problemas complicados usando técnicas numéricas.
Los pasos a seguir para realizar una solución numérica usando la técnica de las diferencias
finitas permanecen iguales, aunque el problema se haga más complejo. El resultado de un
modelo numérico no es una relación funcional entre temperatura y posición sino una
aproximación a las temperaturas en varias ubicaciones discretas.
Las ecuaciones fundamentales en diferencias finitas pueden obtenerse por dos vías:
matemáticamente, reemplazando en las ecuaciones diferenciales básicas las derivadas por
sus expresiones en función de incrementos finitos, o por balances de energía en cada
punto del sistema en el que se desea conocer la temperatura. Este último es más intuitivo y
favorable en especial para los nodos frontera o centrales donde puedan aparecer
singularidades.
303
PROCESOS EN ESTADO TRANSITORIO
d f ( z) f z z f ( z )
lim . (4.1)
dz z 0 z
Si no se toma el límite se tendrá una aproximación a la derivada, más precisa entre menor
sea z . También se puede obtener esta aproximación al escribir la expansión en series de
Taylor de la función f z alrededor del punto z :
f ( z ) (z )2 2 f ( z ) (z )3 3 f ( z ) (z) 4 4 f ( z)
f ( z z ) f ( z ) (z )
z 2 z 2 6 z 3 24 z 4
Al despreciar todos los términos de la expansión menos los dos primeros, obtenemos la
misma expresión aproximada:
df z f z f z z f ( z )
, (4.2)
dz z z
z
y más exacta la solución.
z
T0 T1 T2 Tm 1 Tm Tm 1 Tm 1 Tm
z
z
0 1 2 m 1 m m 1 M 1 M
z0 m 12 m 12 zL
z m z
Figura 4.1. Distribución de nodos
En los cálculos numéricos, el término error se refiere generalmente a la diferencia entre una
solución aproximada y la solución exacta de la ecuación original en derivadas parciales.
Existen dos tipos de errores que afectan dicha diferencia. El primero de ellos es el debido a
la sustitución de las derivadas por incrementos finitos y se denomina error de truncamiento
el cual depende de la distribución inicial de temperaturas en el sólido, de las condiciones
límite, del esquema de desarrollo del método de incrementos finitos y de la magnitud del
número de Fourier, del que dependen los incrementos de espacio y tiempo elegidos para el
cálculo. El grado en el cual la solución aproximada se acerca a la exacta al decrecer los
intervalos de espacio y tiempo se denomina convergencia del método.
ECUACIONES
1 T 2T
, (4.3)
t z 2
T T ( z, t t ) T ( z, t ) Tmt 1 Tmt
. (4.4)
t t t
Aquí hemos introducido una notación abreviada donde el subíndice indica el punto o nodo
donde se mide la variable, y el superíndice el momento en el cual se hace tal medición.
Notando que t / z
2
es un número de Fourier en términos de la distancia
incremental z y el intervalo de tiempo t , reordenamos la ecuación anterior así:
dT T
Qz kAz kAz T Tsalida Tentrada .
dz z
De esta manera el balance alrededor del nodo interno m , teniendo presente que este lo
hacemos con el algoritmo: flujo neto de calor hacia el nodo por conducción más generación,
igual a acumulación se escribe como:
Tm1 Tm T T dT
kAm-1m kAmm1 m m1 H Am z CP Am z . (4.8)
z z dt
Aquí, los subíndices para A indican el área entre los nodos adyacentes o el área en el
nodo m .
Para el caso de placa plana, las áreas entre nodos son iguales. Dividiendo por CP Am z
dT
2 m 1
T 2Tm Tm 1 H , (4.9)
dt (z ) CP
k t
Como y Fo
(z )2
,
C P
Entonces
H H H Fo(z ) 2
. (4.10)
CP k k t
Un nodo adiabático se puede considerar como un nodo interno simétrico respecto a los dos
nodos adyacentes. Por ejemplo, si se trata del nodo 0, en la ecuación (ii) Tm 1 Tm 1 :
dT
2 Tm 1 Tm H . (4.11)
dt (z ) 2
CP
Para el caso de un nodo convectivo el volumen para acumulación es la mitad del que le
corresponde a un nodo interno. El balance se escribe:
308
MÉTODOS NUMÉRICOS EN PROCESOS NO ESTABLES
kA TM 1 TM z z dT
hA TM T H A CP A . (4.12)
z 2 2 dt
Reorganizando:
dT 2 TM 1 TM 2h TM T H
. (4.13)
dt z
2
CP z CP
Si cambiamos signo a los términos que restan, cambiando también el orden de las variables
de los respectivos paréntesis hallamos la simplificación usual de los textos de transferencia
de calor que asumen que todo el flujo de calor es hacia el nodo en cuestión facilitando la
escritura como una sumatoria. Las superficies entre los nodos las tomamos a la distancia
intermedia entre ellos teniendo en cuenta que en simetrías diferentes a la plana pueden
variar en la dirección del flujo de calor.
Las expresiones (4.9), (4.11) y (4.13) proveen la relación de cambio de la temperatura con
el tiempo. Son útiles cuando se usa el método de líneas con ayuda del comando "Integral"
del EES.
Es una técnica para resolver ecuaciones diferenciales parciales (PDE) utilizando diferencias
finitas para las derivadas espaciales y ecuaciones diferenciales ordinarias para la derivada
respecto al tiempo (Cutlip, 2008).
La solución del método numérico se logra reemplazando "Integrand" con la relación que
especifica la velocidad de cambio de la temperatura en cada nodo. Las ecuaciones (4.9) y
(4.11) para un sistema sin generación se escriben así:
dT1 2 T2 T1
. (4.11a)
x
2
dt
Entonces surgen dos posibilidades para el tiempo en el que se miden las temperaturas de
los lados derechos de las ecuaciones (4.9), (4.11) y (4.13). Si están en el tiempo presente,
dan origen a un método explícito, de fácil manejo, pero con problemas de estabilidad. Si
están el tiempo t t , dan origen al método completamente implícito, de precisión
comparable al explícito, pero incondicionalmente estable. Su manejo es más complicado
que el anterior porque se deben resolver tantas ecuaciones simultáneas como nodos en
cada intervalo de tiempo. La mezcla de los dos anteriores da origen a métodos mixtos que
mejoran la precisión y tienen mayor estabilidad que el método explícito, pero son métodos
implícitos. El más usado de estos es el método de Crank Nicolson que consiste en la
semisuma de los dos métodos anteriormente mencionados. Por ser un método de segundo
orden es más exacto que los anteriores.
Los tiempos de simulación se pueden estimar a partir de las escalas de tiempo propuestas
por (Tosun, 2007).
Nodo interno:
310
MÉTODOS NUMÉRICOS EN PROCESOS NO ESTABLES
T
t 1
m Tmt
k
Tmt 1 2Tmt Tmt 1 H , (4.15a)
t CP (z ) 2
CP
H t
Tmt 1 FoTmt 1 1 2 FoTmt FoTmt 1 . (4.15b)
C P
Nodo adiabático:
Haciendo en la ecuación (4.15b) Tm1 Tm1 se obtiene
t t
H t
Tmt 1 1 2 FoTmt 2 FoTmt 1 . (4.16)
CP
t
Para estabilidad el coeficiente de Tm debe ser mayor o igual a cero. En estos dos
casos Fo 1
2 .
Nodo convectivo M :
H t
TMt 1 2 FoTMt 1 1 2 Fo 2 BiFo TMt 2 BiFoT . (4.17a)
CP
H t
T0t 1 2 FoT1t 1 2 Fo 2 BiFo T0t 2 BiFoT . (4.17b)
CP
ht
BiFo , (4.10b)
CP z
311
PROCESOS EN ESTADO TRANSITORIO
Este método de diferencias finitas para régimen no estacionario es, a diferencia del anterior,
estable para todas las magnitudes de los intervalos de espacio y tiempo z y t , es decir
para todos los valores de los números de Fourier y Biot, aunque los resultados serán tanto
más precisos cuanto menores sean dichos intervalos, al reducirse los errores de
truncamiento y redondeo.
Nodo interno
Tt 1
m Tmt
k
Tmt 11 2Tmt 1 Tmt 11 H , (4.19a)
t C P (z ) 2
CP
312
MÉTODOS NUMÉRICOS EN PROCESOS NO ESTABLES
H t
FoTmt 11 1 2 FoTmt 1 FoTmt 11 Tmt . (4.19b)
C P
t
El coeficiente de Tm es la unidad por lo que este sistema es incondicionalmente
estable.
Nodo adiabático:
Incondicionalmente estable
H t
2 FoTMt 11 1 2 Fo 2 BiFo TMt 1 TMt 2 BiFoT .
CP
(4.21a)
H t
2 FoT1t 1 1 2 Fo 2 BiFo T0t 1 T0t 2 BiFoT .
CP
(4.21b)
t
Como el coeficiente de TM es independiente de Bi o Fo será incondicionalmente
estable.
Nodo interno:
Tmt 1 Tmt Tmt 1 2Tmt Tmt 1 Tmt 11 2Tmt 1 Tmt 11 H
, (4.22a)
t 2 (z )2 (z )2 CP
313
PROCESOS EN ESTADO TRANSITORIO
H t
FoTmt 11 2 2 FoTmt 1 FoTmt 11 FoTmt 1 2 2 FoTmt FoTmt 1 2 . (4.22b)
k
Nodo adiabático:
BiFo Fo 1 TMt 1 FoTMt 11 2BiFoT 1 BiFo Fo TMt FoTMt 1 H t / CP . (4.24a)
2L
Fo . (4.24c)
z
2tqS H t
T0t 1 1 2 Fo T0t 2 FoT1t ; Fo 1 . (4.25b)
CP z CP 2
314
MÉTODOS NUMÉRICOS EN PROCESOS NO ESTABLES
T t 1 T1t 1 z T t 1 T0t z
k 0 q S C P 0 H , (4.26a)
z 2 t 2
2qS t H t
1 2 FoT0t 1 2 FoT1t 1 T0t , (4.26b)
CP z CP
Siempre estable
T0t 1 T0t H 2q S Fo t
t
T0 T1t T0t 1 T1t 1 . (4.27a)
k kz t
Nota: Si existe una densidad de flujo de calor constante qs hacia el nodo se agrega al lado
derecho del balance el término 2qs t / CP z .
d
r sin
q d
r d
q
dr qr dr
z
q
r y
x
Figura 4.2. Simetría esférica
r
2
A m1m rm senz . (4.28)
2
r r 2 r r 2 r 2
a 1 , a 1 , b 1 2 ,
rm 4rm2 rm 4rm2 4rm
rm mr , (4.30)
1 1 1
a b , (4.31) a b , (4.32) b 1 2 . (4.33)
m m m
316
MÉTODOS NUMÉRICOS EN PROCESOS NO ESTABLES
Nodo interno:
H t
Tmt 1 Foa Tmt 1 1 2bFoTmt Foa Tmt 1 , (4.34)
C P
1
para estabilidad Fo .
2b
Nodo adiabático:
H t ,
T0t 1 1 2bFoT0t 2Foa T1t (4.35)
C P
1
para estabilidad Fo .
2b
Nodo convectivo:
H t
TMt 1 2 Foa TMt 1 1 2a Fo 2 BiFo TMt 2 BiFoT , (4.36)
CP
1
para Fo
2 a Bi
.
Nodo central:
H t
T0t 1 1 6 Fo T0t 6 FoT1t , (4.37)
CP
1
para estabilidad Fo .
6
Nodo interno:
317
PROCESOS EN ESTADO TRANSITORIO
H t
Foa Tmt 11 1 2bFoTmt 1 Foa Tmt 11 Tmt . (4.38)
C P
Nodo convectivo:
H t
2 Foa TMt 11 1 2a Fo 2 BiFo TMt 1 TMt 2 BiFoT . (4.40)
CP
Nodo central:
H t
1 6 Fo T0t 1 6 FoT1t 1 T0t (4.41)
CP
Nodo interno:
H t
Foa Tmt 11 2 2bFo Tmt 1 Foa Tmt 11 Foa Tmt 1 2 2bFo Tmt Foa Tmt 1 2 . (4.42)
k
H t
1 bFo T0t 1 Foa T1t 1 1 bFo T0t Foa T1t . (4.43)
k
Nodo convectivo:
BiFo Foa
1 TMt 1 Foa TMt 11 2BiFoT 1 BiFo Foa TMt FoaTMt 1 H t / CP . (4.44)
Nodo central:
318
MÉTODOS NUMÉRICOS EN PROCESOS NO ESTABLES
H t
1 3Fo T0t 1 3FoT1t 1 1 3Fo T0t 3FoT1t . (4.45)
CP
Observe que en los balances de los nodos internos se usó como resistencia r kA ,
desconociendo así la curvatura. Si se tiene en cuenta la curvatura, la resistencia es
r / 4 kr[i 1]r[i] y la correspondiente modificación en los nodos de frontera.
qz dz r
A m 1m rm z , (4.46)
r d
2
qr
q d
en radianes.
dr
q qr dr
qz El volumen correspondiente es:
y
V rm zr . (4.47)
x
Figura 4.4. Simetría cilíndrica
r r
rm a 1 , a 1 ,
2rm 2rm
y
x
rm mr . (4.48)
1 1
a 1 , (4.49) a 1 . (4.50)
2m 2m
Nodo interno:
H t
Tmt 1 a FoTmt 1 1 2 Fo Tmt a FoTmt 1 , (4.51)
CP
1
para estabilidad Fo .
2
H t
T0t 1 1 2 Fo T0t 2a FoT1t , (4.52)
CP
1
para estabilidad Fo .
2
Nodo convectivo:
H t
TMt 1 2 Foa TMt 1 1 2a Fo 2 BiFo TMt 2 BiFoT , (4.53)
CP
1
para Fo
2 a Bi
.
320
MÉTODOS NUMÉRICOS EN PROCESOS NO ESTABLES
Nodo central:
H t
T0t 1 1 4 Fo T0t 4 FoT1t . (4.54)
CP
1
para estabilidad Fo .
4
Nodo interno:
H t
Foa Tmt 11 1 2 Fo Tmt 1 Foa Tmt 11 Tmt . (4.55)
CP
H t
1 2 Fo T0t 1 2 Foa T1t 1 T0t . (4.56)
CP
Nodo convectivo:
H t
2 Foa TMt 11 1 2a Fo 2 BiFo TMt 1 TMt 2 BiFoT . (4.57)
CP
Nodo central:
H t
1 4 Fo T0t 1 4 FoT1t 1 T0t . (4.58)
CP
Nodo interno:
H t
Foa Tmt 11 2 2Fo Tmt 1 Foa Tmt 11 Foa Tmt 1 2 2Fo Tmt Foa Tmt 1 2 . (4.59)
k
321
PROCESOS EN ESTADO TRANSITORIO
H t
1 Fo T0t 1 FoaT1t 1 1 Fo T0t FoaT1t . (4.60)
k
Nodo convectivo:
BiFo Foa
1 TMt 1 Foa TMt 11 2BiFoT 1 BiFo Foa TMt FoaTMt 1 H t / CP . (4.61)
Nodo central:
H t
1 2 Fo T0t 1 2FoT1t 1 1 2Fo T0t 2FoT1t . (4.62)
CP
Observe que en los balances de los nodos internos se usó como resistencia r / kA ,
desconociendo así la curvatura. Si se tiene en cuenta la curvatura, las resistencias son
ln r[i] / r[i 1] / 2 kL y ln r[i 1] / r[i] / 2 kL y la correspondiente modificación en los
nodos de frontera.
Es una técnica para resolver ecuaciones diferenciales parciales (PDE) utilizando diferencias
finitas para las derivadas espaciales y ecuaciones diferenciales ordinarias para la derivada
respecto al tiempo (Cutlip, 2008).
La solución del método numérico se logra reemplazando "Integral" con la relación que
especifica la velocidad de cambio de la temperatura en cada nodo. De las ecuaciones (4.4)
y (4.6) se puede escribir:
dT1 2 T2 T1
.
x
2
dt
La ecuación (4.13) nos da la expresión para el nodo convectivo derecho sin generación:
Al resolver el problema por este método no son necesarios los arreglos bidimensionales
pues EES guarda los valores integrados a medida que cambia el período de tiempo.
323
PROCESOS EN ESTADO TRANSITORIO
Para aplicar las ecuaciones anteriores se debe tener presente que EES no acepta el
subíndice 0 por lo que tomamos una malla de N M 1 nodos. Mientras M va de 0 a M ,
N va de 1 a M 1 .
"Setup grid"
N= # [-] "number of nodes"
DELTAx=L/(N-1) "distance between adjacent nodes"
duplicate i=1;N
x[i]=(i-1)*DELTAx "position of each node"
end
"Setup time steps"
U= # [-] "number of time steps"
t_sim= # [s] "simulation time"
DELTAtime=t_sim/(U-1) "time step duration”"
duplicate j=1;U
time[j]=(j-1)*DELTAtime
end
"malla espacial"
N=11 [-] "numero de nodos"
DELTAx=L/(N-1) "distancia entrenodos"
duplicate i=1;N
x[i]=(i-1)*DELTAx "posición de cada nodo"
end
"malla temporal"
U= 101 [-] "numero de veces que se hace el cálculo"
324
NOTAS MÉTODOS NUMÉRICOS EN PROCESOS NO ESTABLES
"Definiciones"
alpha=k/rho/Cp
Fo_df=alpha*DELTAtime/(DELTAx)^2 "Fourier para diferencias finitas"
Bi_df=h*DELTAx/k "Biot para diferencias finitas"
Fo_critico=2*L/pi/DELTAx
"Cálculos"
duplicate i=1;N
T[i;1]= T_o "condición inicial"
end
"nodos internos"
duplicate i=2;(N-1)
-Fo_df*T[i-1;j+1]+(2+2*Fo_df)*T[i;j+1]-Fo_df*T[i+1;j+1]=&
Fo_df*T[i-1;j]+(2-2*Fo_df)*T[i;j]+Fo_df*T[i+1;j]
end
"nodo N"
(1+Fo_df+Bi_df*Fo_df)*T[N;j+1]-Fo_df*T[N-1;j+1]=2*Bi_df*Fo_df*T_infinity+(1-Fo_df-
Bi_df*Fo_df)*T[N;j]+Fo_df*T[N-1;j]
end
"Setup grid"
N=11 [-] "number of nodes"
DELTAr=R/(N-1) "distance between adjacent nodes"
duplicate i=1;N
r[i]=(i-1)*DELTAr "position of each node"
end
325
PROCESOS EN ESTADO TRANSITORIO
"Definiciones"
alpha=k/rho/Cp
Fo_df=alpha*DELTAtime/(DELTAr)^2 "Fourier para diferencias finitas"
Bi_df=h*DELTAr/k "Biot para diferencias finitas"
Fo_critico=2*R/pi/DELTAr
a_L=(b-1/i)
a_R=(b+1/i)
b=(1+1/i^2)
"Calculations"
duplicate i=1;N
T[i;1]= T_o "initial condition"
end
"Nodo Central"
(1+3*Fo_df)*T[1;j+1]-3*Fo_df*T[2;j+1]=(1-3*Fo_df)*T[1;j]+3*Fo_df*T[2;j]+Fi*DELTAt/rho/Cp
"Nodos internos"
-Fo_df*a_L*T[i-1;j+1]+(2+2*b*Fo_df)*T[i;j+1]-Fo_df*a_R*T[i+1;j+1]=&
Fo_df*a_L*T[i-1;j]+(2-2*b*Fo_df)*T[i;j]+Fo_df*a_R*T[i+1;j]+2*Fi*alpha*DELTAt/k
end
"Nodo Convectivo"
(Bi*Fo_df*a_L+1)*T[N;j+1]-Fo_df*a_L*T[N-1;j+1]=2*Bi*Fo_df*T_infinity+&
(1-Bi*Fo_df-Fo_df*a_L)*T[N;j]+&Fo_df*a_L*T[N-1;j]+Fi*alpha/k
end
"Setup grid"
N=11 [-] "number of nodes"
DELTAr=R/(N-1) "distance between adjacent nodes"
duplicate i=1;N
326
NOTAS MÉTODOS NUMÉRICOS EN PROCESOS NO ESTABLES
"Definiciones"
alpha=k/rho/Cp
Fo_df=alpha*DELTAtime/(DELTAr)^2 "Fourier para diferencias finitas"
Bi_df=h*DELTAr/k "Biot para diferencias finitas"
Fo_critico=2*R/pi/DELTAr
a_L=(b-1/i)
a_R=(b+1/i)
b=(1+1/i^2)
"Calculations"
duplicate i=1;N
T[i;1]= T_o "initial condition"
end
"Nodo Central"
(1+3*Fo_df)*T[1;j+1]-3*Fo_df*T[2;j+1]=(1-3*Fo_df)*T[1;j]+3*Fo_df*T[2;j]+Fi*DELTAt/rho/Cp
"Nodos internos"
-Fo_df*a_L*T[i-1;j+1]+(2+2*b*Fo_df)*T[i;j+1]-Fo_df*a_R*T[i+1;j+1]=&
Fo_df*a_L*T[i-1;j]+(2-2*b*Fo_df)*T[i;j]+Fo_df*a_R*T[i+1;j]+2*Fi*alpha*DELTAt/k
end
"Nodo Convectivo"
(Bi*Fo_df*a_L+1)*T[N;j+1]-Fo_df*a_L*T[N-1;j+1]=2*Bi*Fo_df*T_infinity+&
(1-Bi*Fo_df-Fo_df*a_L)*T[N;j]+&Fo_df*a_L*T[N-1;j]+Fi*alpha/k
end
a_L=(1-1/2/i)
a_R=(1+1/2/i)
"Nodo Central"
(1+2*Fo_df)*T[1;j+1]-2*Fo_df*T[2;j+1]=(1-2*Fo_df)*T[1;j]+2*Fo_df*T[2;j]+Fi*DELTAt/rho/Cp
"Nodo interno"
-Fo_df*a_L*T[i-1;j+1]+(2+2*Fo_df)*T[i;j+1]-Fo_df*a_R*T[i+1;j+1]=&
Fo_df*a_L*T[i-1;j]+(2-2*Fo_df)*T[i;j]+Fo_df*a_R*T[i+1;j]+2*Fi*alpha*DELTAt/k
"Nodo Convectivo"
(Bi*Fo_df*a_L+1)*T[N;j+1]-Fo_df*a_L*T[N-1;j+1]=2*Bi*Fo_df*T_infinity+&
(1-Bi*Fo_df-Fo_df*a_L)*T[N;j]+Fo_df*a_L*T[N-1;j]+Fi*alpha/k
327
PROCESOS EN ESTADO TRANSITORIO
NOTA: El símbolo & (ampersand) se usa para darle continuidad a una expresión que debe
escribirse en más de un renglón.
Información previa
Fo=alpha*DELTAtime/DELTAx^2:
Bi=h*DELTAx/k
duplicate i=1;N
x[i]=(i-1)*DELTAx
end
duplicate j=1;M
time[j]=(j-1)*DELTAtime
end
Condición inicial
duplicate
T[i,1]=T_ini
end
duplicate i=2;(N-1)
T[i;j+1]=Fo*T[i-1;j]+(1-2*Fo)*T[i;j]+Fo*T[i+1;j]
end
T[N;j+1]=2*Fo*T[N-1;j]+(1-2*Fo-2*Bi*Fo)*T[N;j]+2*Bi*Fo*T_infinity
end
Puede haber nodo convectivo izquierdo, nodo 1, con Bi igual o diferente al derecho y
también con T_infinity igual o diferente:
T[1;j+1]=2*Fo*T[2;j]+(1-2*Fo-2*Bi*Fo)*T[1;j]+2*Bi*Fo*T_infinity
duplicate i=2;(N-1)
T[i;j]=-Fo*T[i-1;j+1]+(1+2*Fo)*T[i;j+1]-Fo*T[i+1;j+1]
end
T[N;j]=-2*Fo*T[N-1;j+1]+(1+2*Fo+2*Bi*Fo)*T[N;j+1]-2*Bi*Fo*T_infinity
end
Si existe nodo conectivo izquierdo, la modificación es simple. Son válidas las observaciones
hechas en el párrafo correspondiente para el método explícito.
T[1;j]=-2*Fo*T[2;j+1]+(1+2*Fo+2*Bi*Fo)*T[1;j+1]-2*Bi*Fo*T_infinity
329
PROCESOS EN ESTADO TRANSITORIO
Combina los dos métodos anteriores y tiene mayor precisión que estos porque involucra
dos estimaciones de la velocidad de cambio en cada nodo en cada intervalo de tiempo.
duplicate i=2;(N-1)
-Fo*T[i-1;j+1]+(2+2*Fo)*T[i;j+1]-Fo*T[i+1;j+1]=Fo*T[i-1;j]+(2-2*Fo)*T[i;j]+Fo*T[i+1;j]
end
(1+Fo+Bi*Fo)*T[N;j+1]-Fo*T[N-1;j+1]=2*Bi*Fo*T_infinity+(1-Fo-Bi*Fo)*T[N;j]+Fo*T[N-1;j]
end
(1+Fo+Bi*Fo)*T[1;j+1]-Fo*T[2;j+1]=2*Bi*Fo*T_infinity+(1-Fo-Bi*Fo)*T[1;j]+Fo*T[2;j]
dTdt[1]=2*alpha*(T[2]-T[1])/DELTAx^2 "adiabático"
duplicate i=2;(N-1)
dTdt[i]=alpha*(T[i-1]+T[i+1]-2*T[i])/DELTAx^2 "interior"
end
dTdt[N]=2*alpha*(T[N-1]-T[N])/DELTAx^2+2*Bi*Fo*(T_infinity-T[N])/DELTAtime "N"
duplicate i=1;N
T[i]=T_ini+INTEGRAL(dTdt[i],time,0,t_sim)
end
dTdt[1]=2*alpha*(T[2]-T[1])/DELTAx^2+2*Bi*Fo*(T_infinity-T[1])/DELTAtime "1"
$IntegralTable VarName:Interval;x;y;z
Para obtener una tabla integral que contiene los valores de todas las temperaturas nodales
a intervalos de 1 s, se agrega la siguiente orden:
Después de correr el código (solve), se puede generar una tabla integral. Estos valores se
pueden usar para crear gráficas de la misma manera como se usan los datos de una tabla
paramétrica o de un arreglo.
331
PROCESOS EN ESTADO TRANSITORIO
CONCLUSIONES
A lo largo del desarrollo de este trabajo se evidenció el que el software utilizado es una
herramienta versátil, de alta confiabilidad y de fácil utilización.
Aunque este software originalmente fue desarrollado para apoyar cursos de termodinámica,
ha tenido un gran desarrollo en subrutinas que apoyan operaciones con transferencia de
calor.
Se solucionaron problemas que sin la ayuda de este software no hubiera sido posible
plantearlos a nivel de pregrado. Los alumnos conceptualizan más fácilmente el sentido de
las variables que intervienen en un problema y prácticamente visualizan la evolución de las
temperaturas o concentraciones en el sistema estudiado.
De hecho, muchos de los alumnos del curso comenzaron a utilizarlo para presentar sus
trabajos de otras asignaturas del semestre.
RECOMENDACIONES
Se hace recomendación para que otros docentes exploren la posibilidad de introducir este
software en sus clases, en especial los cursos de termodinámica y transferencia de calor.
La versión profesional del software es más poderosa y permite gran cantidad de actividades
adicionales, las que pueden ser consultadas en la página de los creadores:
http://fchart.com/ees/pro-comm-versions.php
333
ANEXOS
334
TABLA A.1: Coeficientes usados en la aproximación a un término de la solución en series de Fourier para la
conducción transitoria unidimensional con convección. Bi = hL/k para la pared plana simétrica y hR/k para el
cilindro infinito y la esfera (kcL/mDAB y kcR/mDAB en transferencia de masa) (Incropera et al [39] p 227)
Pared Cilindro Esfera
Plana Infinito
Bi 1 (rad) C1 1 (rad) C1 1 (rad) C1
0.01 0.0998 1.0017 0.1412 1.0025 0.1730 1.0030
0.02 0.1410 1.0033 0.1995 1.0050 0.2445 1.0060
0.03 0.1732 1.0049 0.2439 1.0075 0.2989 1.0090
0.04 0.1987 1.0066 0.2814 1.0099 0.3450 1.0120
0.05 0.2217 l.0082 0.3142 1.0124 0.3852 1.0149
0.06 0.2425 1.0098 0.3438 1.0148 0.4217 1.0179
0.07 0.2615 1.0114 0.3708 1.0173 0.4550 1.0209
0.08 0.2791 1.0130 0.3960 1.0197 0.4860 1.0239
0.09 0.2956 1.0145 0.4195 1.0222 0.5150 1.0268
0.10 0.3111 1.0160 0.4417 1.0246 0.5423 1.0298
0.15 0.3779 1.0237 0.5376 1.0365 0.6608 1.0445
0.20 0.4328 1.0311 0.6170 1.0483 0.7593 1.0592
0.25 0.4801 1.0382 0.6856 1.0598 0.8448 1.0737
0.30 0.5218 1.0450 0.7465 1.0712 0.9208 1.0880
0.4 0.5932 1.0580 0.8516 1.0932 1.0528 1.1164
0.5 0.6533 1.0701 0.9408 1.1143 1.1656 1.1441
0.6 0.7051 1.0814 1.0185 1.1346 1.2644 1.1713
0.7 0.7506 1.0919 1.0873 1.1539 1.3525 1.1978
0.8 0.7910 1.1016 1.1490 1.1725 1.4320 1.2236
0.9 0.8274 1.1107 1.2048 1.1902 1.5044 1.2488
1.0 0.8603 1.1191 1.2558 1.2071 1.5708 1.2732
2.0 1.0769 1.1795 1.5995 1.3384 2.0289 1.4793
3.0 1.1925 1.2102 1.7887 1.4191 2.2889 1.6227
4.0 1.2646 1.2287 1.9081 1.4698 2.4556 1.7201
5.0 1.3138 1.2402 1.9898 1.5029 2.5704 1.7870
6.0 1.3496 1.2479 2.0490 1.5253 2.6537 1.8334
7.0 1.3766 1.2532 2.0937 1.5411 2.7165 1.8674
8.0 1.3978 1.2570 2.1286 1.5526 2.7654 1.8921
9.0 1.4149 1.2598 2.1566 1.5611 2.8044 1.9106
10.0 1.4289 1.2620 2.1795 1.5677 2.8363 1.9249
20.0 1.4961 1.2699 2.2881 1.5919 2.9857 1.9781
30.0 1.5202 1.2717 2.3261 1.5973 3.0372 1.9898
40.0 1.5325 1.2723 2.3455 1.3993 3.0632 1.9942
50.0 1.5400 1.2727 2.3572 1.6002 3.0788 1.9962
100 1.5552 1.2731 2.3809 1.6015 3.1102 1.9990
1.5707 1.2733 2.4050 1.6018 2.0
Bi = implica que la concentración en el medio ( ) es igual a la de la superficie ( S ).
335
TABLA A.3 Primeras seis raíces n de n tan C .Las raíces son todas reales si C > 0. Se usa en
placas con convección. n en radianes. Aquí C equivale a Bi (Necati [53] pp 484-485).
C 1 2 5
0 0 3.1416 6.2832 A9.4248 12.5664 15.7080
0.001 0.0316 3.1419 6.2833 9.4249 12.5665 15.7080
0.002 0.0447 3.1422 6.2835 9.4250 12.5665 15.7081
0.004 0.0632 3.1429 6.2838 9.4252 12.5667 15.7082
0.006 0.0774 3.1435 6.2841 9.4254 12.5668 15.7083
0.008 0.0893 3.1441 6.2845 9.4256 12.5670 15.7085
0.01 0.0998 3.1448 6.2848 9.4258 12.5672 15.7086
0.02 0.1410 3.1479 4.2864 9.4269 12.5680 15.7092
0.04 0.1987 3.1543 4.2895 9.4290 12.5696 15.7105
0.06 0.2423 3.1606 6.2927 9.4311 12.5711 15.7118
0.08 0.2791 3.1668 6.2959 9.4333 12.5727 15.7131
0.1 0.3111 3.1731 6.2991 9.4354 12.5743 15.7143
0.2 0.4328 3.2039 6.3148 9.4459 12.5823 15.7207
0.3 0.5218 3.2341 6.3305 9.4565 12.5902 15.7270
0.4 0.5932 3.2636 6.3461 9.4670 12.5981 15.7334
0.5 0.6533 3.2923 6.3616 9.4775 12.6060 15.7397
0.6 0.7051 3.3204 6.3770 9.4879 12.6139 15.7460
0.7 0.7506 3.3477 6.3923 9.4983 12.6218: 15.7524
0.8 0.7910 3.3744 6.4074 9.5087 12.6296 15.7587
0.9 0.8274 3.4003 6.4224 9.5190 12.6375. 15.7650
1.0 0.8603 3.4256 6.4373 9.5293 12.6453 15.7713
1.5 0.9882 3.5422 6.5097 9.5801 12.6841 15.8026
2.0 1.0769 3.6436 6.5783 9.6296 12.7223 15.8336
3.0 1.1925 3.8088 6.7040 9.7240 12.7966 15.8945
4.0 1.2646 3.9352 6.8140 9.8119 12.8618 15.9536
5.0 1.3138 4.0336 6.9096 9.8928 12.9352 16.0107
6.0 1.3496 4.1116 6.9924 9.9667 12.9938 16.0654
7.0 1.3766 4.1746 7.0640 10.0339 13.0504 16.1177
8.0 1.3978 4.2264 7.1263 10.0949 13.1141 16.1675
9.0 1.4149 4.2694 7.1806 10.1502 13.1660 16.2147
10.0 1.4289 4.3058 7.2281 10.2003 13.2142 16.2594
15.0 1.4729 4.4255 7.3959 10.3898 13.4078 16.4474
20.0 1.4961 4.4915 7.4954 10.5117 13.5420 16.5864
30.0 1.5202 4.5615 7.6O57 10.6543 13.7085 16.7691
40.0 1.5325 4.5979 7.6647 10.7334 13.8048 16.8794
50.0 1.5400 4.6202 7.7012 10.7832 13.8666 16.9519
60.0 1.5451 4.6353 7.7259 10.8172 13.9094 17.0026
80.0 1.5514 4.6343 7.7573 10.8606 13.9644 17.0686
100.0 1.5552 4.6658 7.7764 10.8871 13.9981 17.1093
1.5708 4.7124 7.8540 10.9956 14.1372 17.2788
(n-1/2)
337
TABLA A.4: Primeras seis raices de cot C 0 . Se usa en sitemas esféricos con
convección. en radianes. Aquí el equivalente es C Bi 1 (Necati [53] pp 484-485)
C 1 2 3 4 5 6
-1.0 0 4.4934 7.7253 10.041 14.0662. 17.2208
-0.995 0.1224 4.4945 7.7259 10.9046 14.0666 17.2210
-0.99 0.1730 4.4956 7 7265 10.9050 14 0669 17.2213
-0.98 0.2445 4.4979 7.7278 10.9060 14 0676 17.2219
-0.97 0.2991 4.5001 7.7291 10.9069 14.0683 17.2225
-0.96 0.3450 4.5023 7.7304 10.9078 14.0690 17.2231
-0.95 0.3854 4.5045 7.7317 10.9087 1 4.0697 17.2237
-0.94 0.4217 4.5068 7.7330 10.9096 14.0705 17.2242
-0.93 0 4551 4.5090 7.7343 10.9105 14.0712 17.2248
-0.92 0.4860 4.5112 7.7356 10.9115 14.0719 17.2254
-0.91 0.5150 4.5134 7.7369 10.9124 14.0726 17.2260
-0.90 0.5423 4.5157 7.7382 10.9133 14.0733 17.2266
-0.85 0.6609 4.5268 7.7447 10.9179 14.0769 17.2295
-0.8 0.7593 4.5423 7.7511 10.9225 14.0804 17.2324
-0.7 0.9208 4.5601 7.7641 10.9316 14.0875 17.2382
-0.6 1.0528 4.5822 7.7770 10.9408 14.0946 17.2440
-0.5 1.1656 4.6042 7.7899 10.9499 14.1017 17.2498
-0.4 1.2644 4.6261 7.8028 10 9591 14.1088 17.2556
-0.3 1.3525 4.6479 7.8156 10.9682 14.1159 17.2614
-0.2 1.4320 4.6696 7.8284 10.9774 14.1230 17.2672
-0.1 1.5044 4.6911 7.8412 10.9865 14.1301 17.2730
0 1.5708 4.7124 7.8540 10.9956 14.1372 17.2788
0.1 1.6320 4.7335 7.8667 11.0047 14.1443 17.2845
0.2 1.6887 4.7544 7.8794 11.0137 14.1513 17.2903
03 1.7414 4.7751 7.8920 11.0228 14.1584 17.2961
0.4 1.7906 4.7956 7.9046 11.0318 14.1654 17.3019
05 1.8366 4.8158 7.9171 11.0409 14.1724 17.3076
0.6 1.8798 4.8358 7.9295 11.0498 14.1795 17.3134
0.7 1.9203 4.8556 7.9419 11.0588 14.1865 17.3192
0.8 1.9586 4.8751 7.9542 11.0677 14.1935 17.3249
0.9 1.9947 4.8943 7.9665 11.0767 14.2005 17.3306
1.0 2.0288 4.9132 7.9787 11.0856 14.2075 17.3364
1.5 2.1746 5.0037 8.0385 11.1296 14.2421 17.3649
2.0 2.2889 5.0870 8.0962 11.1727 14.2764 17.3932
30 2.4557 5.2329 8.2045 11.2560 14.3434 17.4490
4.0 2.5704 5.3540 8.3029 11.3349 14.4080 17.5034
5.0 2.6537 5.4544 8.3914 11.4086 14.4699 17.5562
6.0 2 7165 5.5378 8.4703 11.4773 14.5288 17.6072
7.0 2.7165 5.6078 8.5406 11.5408 14.5847 17.6562
8.0 2.8044 5.6669 8.6031 11.5994 14.6374 17.7032
9.0 2.8363 5.7172 8.6587 11.6532 14.6870 17.7481
10.0 2.8628 5.7606 8.7083 11.7027 14.7335 17.7908
15.0 2.9476 5.9080 8.8898 11.8959 14.9251 17.9742
20.0 2.9930 5.9921 9.0019 12.0250 15.0625 18.1136
30.0 3 0406 6.0831 9.1294 12.1807 15.2380 18.3018
40.0 3.0651 6.1311 9.1987 12.2688 15.3417 18.4180
50.0 3.0801 6.1606 9.2420 12.3247 15.4090 18.4953
60.0 3.0901 6.1805 9.2715 12.3632 15.4559 18.5497
80.0 3.1028 6.2058 9.3089 1.4124 15.5164 18.6209
100.0 3.1105 6.2211 9.3317 12.4426 15.5537 18.6650
2 3 4 5 6
n
338
TABLA A.5: TRANSFORMADA INVERSA DE LAPLACE (Arpaci [4] pp 344-348). En esta tabla q p a
12
, a y x son reales positivos,
, , no tienen restricciones, k es un numero entero finito, n es un numero entero finito o cero, es un número fraccionario;
1 2 3 n n!
1 3 5 2n 1 2n 1!! ; n n n 1 n ! ; 1 0! 1; 12 1 2
1 sin
1 t 1
7
p
1
8 p1 2
2 12 32
t
3
9 p3 2
4 t 12 52
339
10 p k 1 2
1k 2k 1!!
2k 1 2 t k 1 2
t n 1
11 p n
n
1
12
p et
1 e t e t
p p
13
1
te t
p
14 2
1 e t e t e t
p p p
15
1 e t e t 1 t
p p
16 2
2
1 1 2 t
t e
p
17 3
2
1 t k 1 e t
p
18
k 1!
k
p e t e t
p p
19
p
1 t e t
p
20 2
340
p e t e t e t
p p p
21
p t e t e t
p p
22 2
2
p 1
t 1 t e t
p
23 3
2
24 sin t
p 2
2
p
25 cos t
p 2
2
26 sinh t
p 2
2
p
27 cosh t
p 2
2
2
x x 4 at
e
e q x
28 1
2 at 3 2
1
e q x a 2 2
x 4 at
29 e
q t
e q x x
30 erfc
2 at 2
1
p
e q x
1 2
at 2 x 4 at x
31 2 e x erfc
2 at 2
1
qp
341
e q x x2 x 1
t 2 x2 4 at
32 t erfc x e
2
1
p2 2 a 2 at a
e q x x
4 t 2 i n erfc
n
33
p1 2 2 at 2
n 1
1
e q x 1 x x2 8 at x2
2
34 e K 1
2ta 12
3
p 4
4 8at
e q x
1
a 2 x2 4 at x
x a 2t
1
35 e a e erfc at 2
q t 2 at 2
1
e q x x
x a 2t
at
1
ae erfc 2
q q
36
2 at 2
1
e q x 1 x 1 x
x a 2t
1
erfc e erfc at 2
p q
37
2 at 2
1
2 at 2
1
2 at 2 x2 4 at 1 x
1
x
e erfc
e q x 2 2 at 2
1
q p q
38
1 x
2 e x a t erfc
2 1
2
at
2 at 2
1
342
a x
x a 2t
at
1
e erfc 2
n 2 at 2
1
e q x
q n 1 q
39
a n 1
r x
2 r
1
2 at i erfc
n n 0 2 at 2
1
1
a3t 2 x2 4 at
2 e
e q x
40
q
2
x
a 1 x 2a 2t e x a t erfc
2 1
2
at
2 at 2
1
1 x 2 at 2 x2 1
erfc e 4 at
2 at 2
2 1
e q x
41
p q
2
x
1
2 1 x 2a 2t e x a t erfc
2 1
2
at
2 at 2
1
1 t x a 2 x
1
1
e e erfc t 2
2 at 2
1
2
e q x
42
p x a 2
1
x
2
1
e erfc t
2 at 2
1
343
x 12 x
a
1
1 t a 2
1
e e erfc t 2
2 2 at 2
1
e q x
q p
43
x a 2
1
x
2
t
1
e erfc
2 at 2
1
1 t x x a 2 x
1
1
e t e erfc t 2
e q x 2 2 at 12 2 at 2
1
44
p
2
x x a 2
1
x
2
1
t e erfc t
2 at 2 2 at 2
1 1
1 t x a 2 x
1 1
a 2
1
e 1 e erfc t 2
2 a 2 12 2 at 2
1
e q x
,
p q 1
a 2 x a 2
1
x
2
t
1
45 1 e erfc
2 at 2
1 1
a 2 2
a 2
a x
x a 2t
at
1
2 e erfc 2
a 2 at 2
1
1
x 2 2
I1 2 xt
x 1
46 e 1 p
t
1 xp
I 0 2 xt 2
1
47 e
p
344
1
1 xp t
I 1 2 xt 2
2 1
48 e
p
x
1 x2 4 at
49 K0 q x e
2t
1 1 2
x 8 at x2
50 1 K 2 qx e K
2 t
1
p2 2
8at
1
51 p
2 1
K qx x a 2 2
e u u 1du
x2
4 at
2
x x 4 at
p K qx
52 2
e
a 2
2t 1
p p2 x2 2
x
I xt
1
53
t
t
x e I1 12 t t 4x
1 1
2 2 2
54 x p
12
p
1 2 2
e
1
t 4x
1 1
2
t 2
x p p p 1 2
12
t x
I 0 12 t t 2x 2
e 1 1
55 e 2 2
p p
1
2
1
2
1 2 2 t
I 12 t 2 t 4 x 2
x p
12
p 1 1
t 2e 2
e
56 2
p p p p 2 t 4 x
1 1 1 1
2 2 2
2
345
INTRODUCCIÓN
Estas son solo algunas de las funciones con las cuales el EES cuenta en su software, que
sirven de gran utilidad ya que con él se pueden reducir tiempo y esfuerzo respecto a los
cálculos que posiblemente podrían hasta tomar el doble o el triple de tiempo, realmente
esto solo es un poco y a grandes rasgos de lo que se puede hacer en el programa, pero sin
duda es una herramienta que ya sea estudiante o profesionista debe de saber manejar y
tener a la mano
La interfaz está compuesta por una Equations Window y una toolbar o barra de
herramientas.
Como se puede ver en la imagen anterior, para realizar algún comentario debe estar entre comillas,
de otra forma el programa dirá que hay un error.
Ahora que se tiene escrito el primer sistema de ecuaciones a resolver, se debe verificar que haya el
mismo número de ecuaciones e incógnitas, para encontrar la solución e igualmente elegir el sistema
347
Como se ve en la figura anterior, el programa nos dice que tenemos 2 ecuaciones y 3 variables, por lo
tanto debemos verificar que variable no se encuentra especificada, de lo contrario EES no podrá
encontrar la solución al problema.
Si se desea ver las ecuaciones de forma más clara, se le da formato, como se muestra en la siguiente
imagen o por Windows Equations Formatted
348
EES también ofrece la posibilidad de linealizar las gráficas dando la opción de regresiones
lineales y no lineales; para esto seleccionamos el menú Plots comando Curve Fit
generando el siguiente cuadro
349
En la siguiente imagen se dan valores a la variable z, para poder resolver el sistema que se muestra.
2. Los comentarios deben escribirse entre llaves {} o dentro de comillas" " rectas.
Lo que facilita mucho el uso del programa es que prácticamente es como si se estuvieran
escribiendo las ecuaciones en una calculadora. Para mayor estética con respecto a algunas
variables que tengan algún sufijo estas pueden escribirse de la siguiente manera por
ejemplo al escribir en nuestra ventana “Equation Window” T_1 al cargar el programa este
automáticamente lo colocara como T1.
Existen varias figuras que también podemos utilizar en el programa tales como “𝜟α∞”
utilizando comandos como los siguientes:
Para obtener las letras griegas estas deben escribirse correctamente a saber: lambda ,
rho , PHI , distinguiendo entre la letra mayúscula y la minúscula. Algunos símbolos
adicionales se obtienen así: x_dot x , x_ddot x , x_hat x̂ , x_bar x , x|alpha x . Cuando una
ecuación es muy larga, se puede dividir en la escritura en diferente renglón, pero EES
comprende que es la misma ecuación usando el signo & (ampersand o y comercial).
352
Para la colocación de unidades estas deben ir entre corchetes “[ ]” para que el programa las
pueda leer y aparezcan en el momento de calcular el sistema de ecuaciones por ejemplo:
Así como este ejemplo el programa EES cuenta con todo tipo de unidades tanto en el SI
como en el inglés, con las cuales se pueden realizar estos comandos siempre y cuando
sean consistentes.
Convert temp Para las conversiones de temperatura EES utiliza un comando diferente
conocido como converttemp el cual se usa como se muestra a continuación:
Converttemp(‘From’,’To’,’valor’)
Por ejemplo: TF=converttemp (C, F,100) da el equivalente a 100 °C en °F.
Para poder acceder a la base de datos que contiene las propiedades termodinámicas y
termo físicas de las sustancias e incluirlas en la ventana “Equation Window”, se deben de
hacer los siguientes pasos:
353
Primero se puede acceder a ella por desde el uso del comando antes mencionado que
se encuentra en la parte superior de la ventana principal o por medio de (Ctrl+Alt+F).
También entrando por la pestaña Options.
La cual contiene todas las propiedades así como los fluidos y las unidades en las que se
quiera emplear ahí el usuario selecciona el fluido que necesita y en la parte inferior le
aparecerá el código con las especificaciones que el usuario selecciono de la siguiente
manera:
Para este ejemplo se seleccionó buscar la capacidad calorífica del agua donde uno puede
manipular la temperatura como la presión para obtener el dato que se necesita por ejemplo:
354
Estos valores pueden ser manejados a las condiciones en las que se necesitan en el
sistema de ecuaciones para este ejemplo obtenemos que:
De esta manera se puede introducir cualquier tipo de comentario para así saber tanto para
el usuario como para otras personas que significa cada variable o para que se realizó algún
sistema de ecuaciones.
Otra función puede ser de gran utilidad a la que se puede acceder desde la ventana
“Equation Window” es el de integrar en un intervalo de algo por ejemplo se quiere integrar
desde un tiempo 0 min a un tiempo 5min con intervalos de 0.01 min con respecto a otra
función, para crear esta función se deberá colocar un código de la siguiente manera:
Símbolos:
Open: abrir documentos guardados
Save: guardar documentos
Variable info: brinda información sobre las variables introducidas
Function info: nos muestra todas las funciones con las que cuenta el programa. Ej.:
Bessel, erf, integral, sum…
Unit system: sistema de unidades en el que se desea trabajar
Check equations: verifica que haya igual # de ecuaciones y de incógnitas
Check unit: verifica unidades
355
Manejo de unidades
La herramienta para ajustar las unidades la podemos encontrar en el menú de opciones y
seleccionar unit system, y el programa abrirá una ventana que permite seleccionar las
unidades que el usuario desea trabajar, se debe tener en cuenta que inicialmente el
programa trabaja en sistema internacional.
Sin embargo, la manera más segura de que su programa siempre corra en las unidades
predeterminadas es dar una directiva al comienzo del código:
$UnitSystem SI Mass Rad (o Deg) Pa K J o los que se deseen. En sistema inglés
$UnitSystem Eng Mass Rad psia F Btu como ejemplo.
TABLAS Y GRÁFICOS:
Una de las características más utilizadas de EES es la capacidad de proporcionar estudios
de parámetros. Por ejemplo puede resultar de interés, ver cómo una variable cambia
respecto a otra, para ello es necesario el uso de tablas y gráficos.
Para realizar una tabla en EES se debe seleccionar en la toolbar new parametic table, la
cual se encuentra representada así
Para ello se tomó un ejercicio del curso.
357
En el recuadro que sale, se seleccionan lógicamente las variables de interés, éstas deben
estar previamente definidas en la Equations window. Como Ca depende de z, el valor de
ésta última debe colocarse entre comillas o corchetes en el equation windows.
Nota: No importa que en el check Equations salgan más ecuaciones que variables. (Para
el ejemplo serían 9 ecuaciones y 10 variables).
Después de dar click en add y ok se llega a lo siguiente:
358
Se seleccionan las variables que deben ir en el eje x e y. Luego se realizan los ajustes
estéticos y finalmente se obtiene el gráfico del problema a analizar.
Si se quiere añadir más gráficas sobre una misma se busca el overlay Plot que se
encuentra al lado derecho de New Plot Window o en Plots. El overlay se encuentra en la
barra de herramientas así:
360
Nota: el overlay se activa después de haber añadido la primera gráfica con new Plot
window
Para añadir una leyenda o añadir algún texto se selecciona en el recuadro derecho el botón
Ciclos o bucles: son de gran utilidad a la hora de programar algún código o algoritmo,
especialmente para métodos numéricos. Es de uso frecuente en ellos variables de orden o
matrices. Los resultados con matrices se organizan en la arrays table
362
DIAGRAM WINDOW
“Diagram Window” es una herramienta que brinda EES de gran ayuda para el usuario, ya
que esta permite mostrar un diagrama (o texto) que puede ayudar en la interpretación de
las ecuaciones del problema a resolver, además, ésta puede usarse para suministrar
entradas y salidas de información y/o generar informes.
El diagrama puede diseñarse en programas externos al EES y luego debe ser llevado a la
ventana Diagram Window (Ctrl + D), o desde el menú Windows comando Diagram
Windows.
Al hacer clic sobre el botón Add/edit text se abrirá el siguiente cuadro que permite el
ingreso de texto al diagrama y
brinda la opción de seleccionar las
variables de entrada y salida del
sistema.
364
El comando Duplicate: Las ecuaciones que vayan a ser duplicadas están encerradas entre las
palabras de comando DUPLICATE y END:
N=12
D_AB=7,5e-9
C_Ao=0,04
R=0,2154e-3
duplicate i=0;N
t[i]=(1/640)*i [s]
365
Fo[i]=D_AB*t[i]/R^2
end
Es necesario advertir sobre las opciones dadas en PDFLATEX ya que puede borrar las
imágenes, los gráficos que tenga el programa en EES, y el archivo .tex que crea MinTex;
generando un PDF erróneo que en un futuro no puede modificarse.
SUGERENCIAS
367
Es común que EES no corra el algoritmo o arroje resultados inconsistentes debido a que
ocurre un error en la Equations window. Para ello lo mejor es seguir los siguientes pasos:
1. Leer y entender bien el problema o ejercicio para el que se está planteando el
algoritmo.
2. Revisar las variables y ecuaciones. Para facilitar esto visualice las ecuaciones en
notación matemática con Formatted Equations.
3. Hay casos en los que el software arroja una ventana con un error en la que aparece:
this equation attempts to raise a negative number to a non- integer power. Para
solucionar esto dirigirse a variable info y cambiar el lower limit por cero en la variable que
está fallando. Si sigue apareciendo lo mismo use valor absoluto en la ecuación que marca
error sin deshacer lo anteriormente dicho.
BIBLIOGRAFIA:
RESUMEN MANUAL EES
368
PALABRAS DELJURADO
Pero esto no es gratuito, ya que su trabajo representa, en síntesis, el de toda una vida
académica y científica dedicada al estudio y enseñanza de temas fundamentales en I.Q.
Gracias por compartir con nosotros todo su conocimiento y esfuerzo investigativo.
De otra parte, es usual en estas circunstancias que los jurados hagan preguntas sobre la
tesis que se defiende, sin embargo, no le haré ninguna, pues todas las que me surgieron,
ya fueron respondidas en el documento que soporta su tesis. Por lo demás, la Dra. Francy
Nelly ya le hizo las preguntas relevantes acerca de su trabajo.
Finalmente, profesor Betancourt, tome estas palabras, que creo también los demás aquí
presentes estarán de acuerdo, como un modesto homenaje a su trayectoria académica al
servicio de nuestro programa de I.Q. Ud. se lo merece.
Gracias
REFERENCIAS BIBLIOGRÁFICAS
[1] Abramowitz, M., Stegun, I.A., “Handbook of Mathematical Functions with Formulas,
Graphs, and Mathematical Tables”, New York, 1965, Dover Publications, Inc.
[2] Adams, J. A. and D. F. Rogers, “Computer Aided Heat Transfer Analysis”, Tokio,
Kogakusha, 1973, McGraw-Hill.
[3] Adebiyi, G. A., “A Single Expression for the Solution of the One Dimensional Transient
Conduction Equation for the Simple Regular Shaped Solids”, J. Heat Transfer, pp 117,
158–160, 1995.
[4] Arpaci, V. S., “Conduction Heat Transfer”, Massachusetts, 1966, Addison Wesley
Publishing Company.
[5] Baehr, H.D., Stephen, K., “Heat and Mass Transfer”, 2da edición, Berlín, Springer
(2006), 3ra edición (2011).
[6] Basmadjian, Diran., “Mass Transfer : Principles and Applications”, CRC Press LLC
Boca Raton, 2004.
[7] Barrante, J. R., “Applied Mathematics for Physical Chemistry”, 3ra edición, NJ, Pearson
Prentice Hall, 2004.
[8] Bejan, A., “Heat Transfer”, New York, 1993, John Wiley & Sons.
[9] Bennett, C. O., Myers, J.E., “Momentum, Heat and Mass Transfer”, 2da edición, New
Delhi, 1975, McGraw-Hill.
[13] Brodkey, R.S., Hershey, H.C., “Transport Phenomena: A Unified Approach”, McGraw-
Hill, 1998.
[14] Brokaw, R. S., Ind. Eng. Chem. Proc. Des. Dev. 8:240, 1969.
[15] Campbell, G. A., Foster, R. M., “Fourier Integrals for Practical Applications”, Princeton
Van Nostrand, 1948.
[17] Carslaw, H. S., J. C. Jaeger. “Conduction of Heat in Solids”, Oxford University Press,
1959, 2da edición.
[18] Cengel, Y., “Transferencia de Calor y Masa, Un Enfoque Práctico”, McGraw Hill, 2007.
[19] Chapman, A.J., “Fundamentals of Heat Transfer”, New York, 1987, Macmillan
Publishing Company.
[20] Chen, R. Y., Kuo, T. L., “Closed Form Solutions for Constant Temperature Heating of
Solids", Mech, Eng. News, Vol. 16, No. 1, Feb. 1979, p. 20.
[21] Churchill, S. W., Usagi, R., “A General Expression for the Correlation of Rates of
Transfer and Other Phenomena”, AIChE J., Vol. 18, pp. 1121-1132, 1972.
[22] Constantinides, A., Mostoufi, N, “Numerical Methods for Chemical Engineers with
Matlab Aplications”, Prentice Hall, 2000.
372
[23] Costa, N (editor), “Ingeniería Química”, Editorial Alhambra, vol. 4, pp. 75 – 77, 1986.
[24] Crank, J., “The Mathematics of Diffusion”, Oxford University Press, 1964.
[25] Cutlip, B., Shacham, M., “Problems Solving in Chemical Engineering with Numerical
Methods”, Prentice Hall, 2008.
[26] Cutlip, B., Shacham, M., “The Numerical Method of Lines”, Schieser, W. E., Prentice
Hall, 2008, p. 113.
[27] Dwivedi, P. N., Upadhyay, S. N., “Particle-fluid Mass Transfer in Fixed and Fluidized
Beds”, Ind. Eng. Chem. Process Des. Dev. 16, 157, 1977.
[28] Eckert, E. R. G., Drake, R. M., “Analysis of Heat and Mass Transfer”, McGraw Hill,
1972.
[29] Erdélyi, A., “Tables of Integral Transforms I”, New York, 1954, McGraw Hill.
[30] Grigull, U., Sandner, H., “Heat Conduction”, New York, 1984, Hemisphere Publishing
Corporation.
[31] Gröber, H., Erk, S., Grigull, U., “Fundamentals of Heat Transfer”, New York, 1961,
McGraw-Hill.
[32] Holman, J. P., “Heat Transfer”, New York, 1990, 6ta edición, McGraw Hill Publishing
Company.
[34] Hottel, H. C, Sarofim, A. F., “Radiative Transfer”, Nueva York, 1967, McGraw-Hill
Book Company.
[36] Incropera, F. C., DeWitt, D. P., “Introduction to Heat Transfer”, 3ra edición, John Wiley
& Sons, 1990.
[37] Incropera, F.P., DeWitt, D.P., Bergman, T. L., Lavien, A. S., “Fundamentals of Heat
and Mass Transfer”, 7ma edición, John Wiley & Sons, 2011.
[38] Jakob, M., “Heat Transfer”, New York, 1949, Wiley & Sons.
[39] Langston, L. S., “Heat Transfer from Multidimensional Objects Using One-Dimensional
Solutions for Heat Loss”, Int. J. Heat Mass Transfer, Vol. 25, 1982, pp. 149-150.
[40] Lapple, C. E., Shepherd, C. B., “Calculation of Particle Trayectories”, Ind. Eng. Chem.
32:5, 605 – 617, 1940.
[41] Lee, H.J., Schiesser, W. E., “Ordinary and Partial Differential Equation Routines in C,
C++, Fortran, Java, Maple, and MATLAB”, Washington, 2004, Chapman & Hall/CRC.
[42] Lienhard, J. H., “A Heat Transfer Text Book”, Cambridge, Massachusetts, 2011, 4ta
edición, Phlogiston Press.
[43] Liukov, A.V., “Analytical Heat Difusion Theory”, New York, 1968, Academic Press.
[49] Mickley, H. S., Sherwood, T. K., Reed, C.E., “Applied Mathematics in Chemical
Engineering”, 1957, McGraw Hill Book Co.
[50] Mikhailov, M. D., Özişik, M. N., “Unified Analysis and Solutions of Heat and Mass
Diffusion”, New York, Dover Publications, 1994.
[52] Murthy J. Y., Mathur S.R., “Numerical Methods in Heat, Mass and Momentum
Transfer”, Purdue University, 2002.
[54] Nellis, G., Klein, S., “Heat Transfer”, New York, 2009, Cambridge University Press.
[55] Perry, R. C., Chilton, C. H., “Chemical Engineers Handbook”, New York, 1973, 5ta
edición, McGraw Hill.
[56] Reid, R. C., Prausnitz, J. M., Sherwood, T. K., “Properties of Gases and Liquids”, New
York, 1977, 3ra edición, McGraw Hill.
[57] Rohsenow, W. M., Hartnett, J. P., “Handbook of Heat Transfer”, McGraw-Hill Co,
1973.
[58] Smith, G. D., “Numerical Solution of Partial Differential Equations. Finite Difference
Methods”, 3ra edición, Oxford Clarendon Press, 1986.
[60] Treybal, R. E., “Mass Transfer Operations”, Singapur, 1981, 3ra edición, McGraw Hill.
[61] Thirumaleshwar, M., “Fundamentals of Heat and Mass Transfer with Mathcad”, India,
2006, Pearson Education.
375
[62] Tosun, I., “Modeling in Transport Phenomena”, Ankara, Turquía, 2007, Elsevier
Science & Technology Books.
[63] Whitaker, S., “Forced Convection Heat Transfer Correlations for Flow in Pipes, Past
Flat Plates, Single Cylinders, Single Spheres, and for Flow in Packed Beds and Tube
Bundles”, 1972, AIChE Journal 18, 361.
[64] White, F. M., “Heat and Mass Transfer”, Addison Wesley, Reading, MA. 1988.
[66] Yovanovich, M. M., "Simple Explicit Expressions for Calculation of the Heisler-Grober
Charts", Houston, TX, August 3-6, 1996, AIAA-96-3968, National Heat Transfer
Conference.
[67] Souders, M., "Manual de Ingeniería", Mexico, 1975, Editorial Limusa
[68] McCabe, W. L., Smith, J. C., Harriott, P., "Operaciones Básicas de Ingeniería
Química", 4a Ed., McGraw-Hill, Madrid, 1991
[69] Welty, J. R., Wucks, Ch. E., Wilson, R. E., Rorrer, G. L., Fundamentals of Momentum,
Heat and Mass Transfer 5a Ed. 2008 John Wiley & Sons, Inc. USA.
[70] Geankoplis, J. Ch., "ProcesosdeTransporte y Principios de Procesos de Separación"
4a Ed. CECSA México 2006