ECUACIÓN DEL CALOR

De MateWiki
Revisión del 23:18 5 mar 2024 de Rekkit17 (Discusión | contribuciones) (. Cambio de condición inicial)

Saltar a: navegación, buscar
Trabajo realizado por estudiantes
Título Ecuación del calor. Grupo ABMR
Asignatura EDP
Curso 2023-24
Autores Arturo Barrena y Mario Ríos
Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura


1 . Introducción

La visualización de soluciones de la ecuación del calor en una dimensión constituye una herramienta poderosa para desentrañar los intricados patrones de propagación térmica en sistemas unidimensionales. En este estudio, nos sumergimos en la riqueza matemática que rodea la representación gráfica de soluciones, explorando la diversidad de comportamientos térmicos que emanan de este modelo fundamental. A través de la creación visual, buscamos capturar la esencia dinámica de la ecuación del calor y ofrecer una perspectiva única sobre cómo la temperatura evoluciona en función del tiempo y la posición.

La ecuación del calor en una dimensión sirve como un punto de partida teórico sólido para comprender la difusión térmica en estructuras lineales. Al trazar diferentes soluciones, nos sumergimos en el tejido mismo de la propagación térmica, revelando detalles intrincados que, de otra manera, podrían escapar a una descripción puramente analítica. Este enfoque gráfico no solo ilustra la dinámica temporal de la temperatura, sino que también destaca la influencia de condiciones iniciales y parámetros en la evolución térmica a lo largo del espacio unidimensional.

2 . Planteamiento del sistema

Se considera una varilla metálica que ocupa el intervalo [0, 1] y que se encuentra aislada por su superficie lateral, de manera que la conducción de calor sólo se produce en la dirección longitudinal. La temperatura inicial de la varilla es 0 grados. En el extremo izquierdo se consigue mantener la temperatura a 0 grados mientras que en el derecho la temperatura es siempre de 1 grado. De acuerdo con todas estas indicaciones, el sistema de EDP que modeliza el comportamiento de la temperatura es el siguiente:

[math]\left \{ \begin{array}{ll} \frac{\partial u}{\partial t}- \frac{\kappa}{c} \frac{\partial ^2 u}{\partial x^2}=0, & \quad 0 \lt x \lt 1, t \gt 0, \\ u(x,0)=0, & \quad 0 \lt x \lt 1, \\ u(0,t)=0, & \quad t \geq 0, \\ u(1,t)=1, & \quad t \geq 0, \end{array} \right. [/math]

donde [math]u(x,t)[/math] es la temperatura en la posición [math]x[/math] en el tiempo [math]t[/math], [math]\kappa\gt0[/math] es la constante de conductividad térmica y [math]c[/math] es el calor específico del material, el cual también se considera constante. Las constantes [math]\kappa[/math] y [math]c[/math] provienen de las relaciones:

[math] \begin{array}{ll} q=-\kappa \frac{\partial u}{\partial x}, \\ e=cu, \end{array} [/math]

donde [math]q[/math] es el flujo de calor y [math]e[/math] es la energía calorífica. Cabe destacar que por simplificar el problema se suelen tomar los valores [math]\kappa[/math] y [math]c[/math] como constantes tal y como se ha hecho en este caso, ya que en bastantes casos de interés es razonable ignorar su variación. Si simplificamos aún más, suponiendo que ambas constantes son igual a 1, se tiene el siguiente sistema:

[math]\left \{ \begin{array}{ll} \frac{\partial u}{\partial t}-\frac{\partial ^2 u}{\partial x^2}=0, & \quad 0 \lt x \lt 1, t \gt 0, \\ u(x,0)=0, & \quad 0 \lt x \lt 1, \\ u(0,t)=0, & \quad t \geq 0, \\ u(1,t)=1, & \quad t \geq 0. \end{array} \right. [/math]

3 . Deducción de la Solución estacionaria

Antes de tratar de resolver el sistema, intentemos conjeturar qué podría suceder. Dado que la temperatura en el lado derecho es mayor que la del lado izquierdo según las condiciones frontera, el calor comenzará a fluir desde el extremo más caliente, aumentando la temperatura dentro de la barra y causando una salida de calor hacia el lado frío. Por otro lado, el aumento interior de la temperatura hace que el flujo de entrada de calor disminuya con el tiempo (ya que el flujo de entrada es exactamente la derivada de la temperatura con respecto a x cambiada de signo), mientras que el flujo de salida aumenta. Esperamos que tarde o temprano los dos flujos se equilibren entre sí y que la temperatura eventualmente alcance una distribución de estado estacionario. Por tanto, es razonable suponer que si se hace el límite cuando el tiempo tiende a infinito de la función temperatura [math]u[/math], se obtendrá una función que tan sólo depende de [math]x[/math], ya que la temperatura debe haber llegado al estado estacionario mencionado en algún momento. Por tanto, bajo esta suposición, la siguiente función [math]v[/math] está bien definida (depende sólo de x):

[math] v(x)=\lim_{{t \to \infty}} u(x,t). [/math]

Además, cumple el sistema de EDO:

[math]\left \{ \begin{array}{ll} \frac{\partial ^2 v}{\partial x^2}=0, & \quad 0 \lt x \lt 1, \\ v(0)=0, \\ v(1)=1. \\ \end{array} \right. [/math]

Si resolvemos este problema de valor inicial obtendremos:

[math]v(x)=x. [/math]

Es decir, que una vez que la temperatura se estabilice y deje de variar con el tiempo, seguirá el comportamiento de esta función lineal [math]v[/math]. Dicho resultado será muy importante ya que nos permitirá homogeneizar el sistema planteado en la anterior sección.

[math][/math]

4 . Resolución de la parte no estacionaria

Para comenzar a resolver el sistema de EDP inicial, homogeneizamos las condiciones frontera utilizando la solución estacionaria que hemos obtenido en el anterior apartado, planteando un problema equivalente con condiciones de frontera homogéneas. Para ello, es conveniente introducir la función:

[math] w(x,t)=u(x,t)-v(x) [/math]

De esta forma, la solución se compondrá de dos partes, la parte estacionaria y la parte no estacionaria, es decir que la podemos escribir de la siguiente forma:

[math]u(x,t)= v(x) + w(x,t) [/math]

donde [math]w(x,t)[/math] corresponde a la parte no estacionaria de la solución que es la abordaremos en esta sección. Veamos como podemos obtener las nuevas condiciones frontera y condiciones iniciales:

[math]\begin{array}{ll} w(x,0)=u(x,0)-v(x)=-x, \\ w(0,t)=u(0,t)-v(0)= 0 - 0 = 0,\\ w(1,t)=u(1,t)-v(1)= 1 - 1 = 0. \end{array} [/math]

La función [math]w[/math] introducida nos permite llegar al sistema homogéneo, que será de la forma:

[math]\left \{ \begin{array}{ll} \frac{\partial w}{\partial t}-\frac{\partial ^2 w}{\partial x^2}=0 & \quad 0 \lt x \lt 1, t \gt 0, \\ w(x,0)=-x, & \quad 0 \lt x \lt 1, \\ w(0,t)=0, & \quad t \geq 0, \\ w(1,t)=0, & \quad t \geq 0. \end{array} \right. [/math]

Ahora procedemos a la resolución del sistema por medio del método de separación de variables, es decir suponiendo que la solución es de la forma [math]w(x,t)=X(x)T(t)[/math]. De esta suposición, se obtienen dos problemas de valor inicial uno asociado a la parte espacial de la solución X(x) y el otro asociado a la parte temporal T(t). El primero de ellos será:

[math] \left \{ \begin{array}{ll} X'' + \lambda X=0,\\ X(0)= 0, X(1)= 0. \\ \end{array} \right. [/math]

Para este problema tendremos como solución cualquiera de las siguientes auto-funciones [math]X_k=B\sin{(k \pi x)} [/math] para [math]k \in N [/math], con [math]B[/math] constante. Por otro lado, para el problema [math] T'+ \lambda T= 0 [/math] obtendremos como solución cualquiera de las siguientes auto-funciones [math] T_k= Ce^{-k^2\pi^2t} [/math] para [math]k \in N [/math], con [math]C[/math] constante. Sin embargo, el producto entre cualquiera de estas auto-funciones nos da una función solución de la ecuación diferencial y las condiciones frontera, que sin embargo, no cumple con la condición inicial. Para tratar de conseguir una solución que cumpla también la condición inicial proponemos la siguiente solución resultante de hacer una suma infinita del producto de las auto-funciones y hacer el desarrollo en serie de Fourier de la condición inicial del sistema para elegir los coeficientes que multiplican a los productos:

[math] w(x,t)=\sum_{k=1}^{\infty} \frac{2(-1)^{k}}{k \pi}\sin{(k \pi x)} e^{-k^2\pi^2t}. [/math]

De modo que la expresión para la solución final será:

[math] u(x,t)=x + \sum_{k=1}^{\infty} \frac{2(-1)^{k}}{k \pi}\sin{(k \pi x)} e^{-k^2\pi^2t}. [/math]

5 . Dibujo para [math]t\in[0,1][/math]

En esta sección veremos visualmente cuál es la forma de la solución obtenida anteriormente. Para ello, aproximaremos la forma de la solución considerando los 10 primeros términos de la serie. Además, tan sólo la dibujaremos en el intervalo temporal [math][0,1][/math], ya que este breve intervalo de tiempo es suficientemente grande como para llegar a observar claramente cómo la solución se acerca a su estado estacionario. Representarla para tiempos mayores que este no tiene sentido, teniendo en cuenta que la solución seguirá manteniéndose estacionaria con el tiempo tal y cómo ya sabemos.

Una vez dicho esto, dibujamos la aproximación de la solución u de forma tridimensional:

Aproximación de la función u, dibujada para [math](x,t)\in[0,1]\times[0,1].[/math]

Se puede ver claramente cómo a medida que avanza el tiempo la solución va llegando a un estado estacionario. Esto se ve ya que la solución comienza a dejar de variar con el tiempo. Además, este estado estacionario viene claramente dado por la solución estacionaria obtenida anteriormente [math]v(x)=x[/math]. En la gráfica, se puede ver cómo a medida que pasa el tiempo la solución se va aproximando a dicha solución estacionaria la cual al estar representada tridimensionalmente tiene forma de plano. Además, podemos observar algunas oscilaciones cuando [math]t=0[/math] resultantes de hacer la serie de Fourier en la condición inicial. Esto es debido al fenómeno de Gibbs. La extensión periódica de la extensión impar en [math][-1,1][/math] de la función [math]f(x)=-x[/math] no es continua. En particular, en el punto 1 no lo es, por tanto, a la hora de hacer la serie de Fourier se produce el fenómeno de Gibbs alrededor del 1.


5.1 . Código

clear all
close all
f=@(x)x;
xx=0:0.01:1;
tt=0:0.01:1;

A=zeros(10,length(xx));
for k=1:10
    A(k,:)=2*(-1)^k/(k*pi) * sin(k*pi*xx);
end
B=zeros(10,length(tt));
for k=1:10
    B(k,:)=exp(-k^2*pi^2*tt);
end

Suma=zeros(length(xx),length(tt));
for k=1:10
    Suma = Suma + A(k,:)'*B(k,:);
end

U=repmat(f(xx)',1,length(tt)) + Suma;

%Gráficas
surf(xx,tt,U',"FaceColor","interp")
xlabel('x')
ylabel('t')
zlabel('u(x,t)')
legend('u(x,t)')


6 . Flujo entrante y saliente

Una vez nos hemos familiarizado con la forma de la solución, veamos cómo se comporta el flujo del calor en los dos extremos de la varilla. Tal y como se dijo anteriormente, el flujo del calor viene dado por:

[math] \begin{array}{ll} q=-\kappa \frac{\partial u}{\partial x}=-\frac{\partial u}{\partial x}, \\ \end{array} [/math]

donde el segundo igual se debe a la elección de [math]\kappa=1[/math]. Anteriormente vimos que era posible derivar la serie tan sólo derivando lo de dentro, de forma que:

[math] \begin{array}{ll} \frac{\partial u}{\partial x}(x,t)=1 + \sum_{k=1}^{\infty} 2(-1)^{k}\cos{(k \pi x)} e^{-k^2\pi^2t}. \\ \end{array} [/math]

Por lo tanto, tendremos que el flujo de calor vendrá dado por:

[math] \begin{array}{ll} q(x,t)=-\frac{\partial u}{\partial x}(x,t)=-1 - \sum_{k=1}^{\infty} 2(-1)^{k}\cos{(k \pi x)} e^{-k^2\pi^2t}. \\ \end{array} [/math]

En este caso, como queremos observar el flujo de calor en los extremos de la varilla, tendremos que el flujo en un tiempo [math]t[/math] en el extremo [math]x=0[/math] vendrá dado por la función de [math]t[/math], [math]q(0,t)[/math] y el flujo en un tiempo [math]t[/math] en el extremo [math]x=1[/math] vendrá dado por la función de [math]t[/math], [math]q(1,t)[/math]. Estas funciones tienen las siguientes expresiones:

[math] \begin{array}{ll} q(0,t)=-1 - \sum_{k=1}^{\infty} 2(-1)^{k} e^{-k^2\pi^2t}, \\ q(1,t)=-1 - \sum_{k=1}^{\infty} 2(-1)^{2k} e^{-k^2\pi^2t}. \end{array} [/math]

Si dibujamos ambas en función del tiempo para [math]t\in[0,1][/math], tenemos lo siguiente:

Aproximación de la función u, dibujada para [math](x,t)\in[0,1]\times[0,1].[/math]

En la primera gráfica podemos ver cómo el flujo de calor comienza siendo nulo y empieza a hacerse cada vez más negativo con el tiempo hasta un punto en el cual se mantiene igual a -1. Como el flujo de calor tiene signo positivo cuando va en la dirección positiva de la [math]x[/math], el que se haga cada vez más negativo significa que cada vez sale más calor por el extremo de la varilla de [math]x=0[/math]. Además, el flujo de calor que sale va aumentando hasta ser igual a -1, punto en el cual se mantiene siempre igual con el tiempo. Esto cuadra con la solución estacionaria obtenida [math]v(x)=x[/math], la cual cumple que [math]-\frac{\partial v}{\partial x}(x)=-1[/math]. Es decir, que el flujo de calor una vez se llega a la solución estacionaria se mantiene constantemente igual a -1 a lo largo de toda la varilla. Por otro lado, en el otro extremo de la varilla, podemos ver como el flujo de calor comienza siendo negativo y aumenta con el tiempo hasta llegar a ser igual a -1 tal y como dicta la solución estacionaria. Es decir, en este caso, empieza entrando calor por este extremo de la varilla (ya que el signo negativo significa que el flujo de calor va en la dirección negativa de las x), aunque el flujo de calor entrante cada vez es menor hasta que se mantiene constantemente igual a -1 cuando se llega a la solución estacionaria.

6.1 .Código

clear all
close all
f_x=@(x)1;
tt=0:0.01:1;

B0=zeros(10,length(tt));
for k=1:10
    B0(k,:)=2*(-1)^k * exp(-k^2*pi^2*tt);
end

B1=zeros(10,length(tt));
for k=1:10
    B1(k,:)=2*(-1)^(2*k) * exp(-k^2*pi^2*tt);
end

q0=-f_x(0)-sum(B0);
q1=-f_x(1)-sum(B1);

%Gráficas
subplot(1,2,1)
plot(tt,q0)
xlabel('t')
ylabel('q(0,t)')
legend('q(0,t)')
subplot(1,2,2)
plot(tt,q1)
xlabel('t')
ylabel('q(1,t)')
legend('q(1,t)')


7 . Dibujo para [math]\kappa=1/2[/math]

Aproximación de la función u, dibujada para [math](x,t)\in[0,1]\times[0,1].[/math]
Aproximación de la función u, dibujada para [math](x,t)\in[0,1]\times[0,1].[/math]




7.1 . Código

clear all
close all
f=@(x)x;
xx=0:0.01:1;
tt=0:0.01:1;

A=zeros(10,length(xx));
for k=1:10
    A(k,:)=2*(-1)^k/(k*pi) * sin(k*pi*xx);
end
B=zeros(10,length(tt));
for k=1:10
    B(k,:)=exp(-k^2*pi^2/2*tt);
end

Suma=zeros(length(xx),length(tt));
for k=1:10
    Suma = Suma + A(k,:)'*B(k,:);
end

U=repmat(f(xx)',1,length(tt)) + Suma;

%Gráficas
figure(1)
surf(xx,tt,U',"FaceColor","interp")
xlabel('x')
ylabel('t')
zlabel('u(x,t)')
legend('u(x,t)')

%Diferencia u(1/2,t)-v(1/2)
figure(2)
plot(tt,U(51,:)-f(1/2))
xlabel('t')
ylabel('u(1/2,t)-v(1/2)')
legend('u(1/2,t)-v(1/2)')


8 . Cambio de condición inicial y condición frontera

En esta sección supondremos ahora que la temperatura en el lado derecho también es de 0 grados. Además, cambiaremos la condición inicial, de forma que se tendrá el siguiente sistema de EDP que modeliza el comportamiento de la temperatura:

[math]\left \{ \begin{array}{ll} \frac{\partial u}{\partial t}- \frac{\partial ^2 u}{\partial x^2}=0, & \quad 0 \lt x \lt 1, t \gt 0, \\ u(x,0)=max \{0,1-4|x-1/2|\}, & \quad 0 \lt x \lt 1, \\ u(0,t)=0, & \quad t \geq 0, \\ u(1,t)=0, & \quad t \geq 0. \end{array} \right. [/math]

En este caso, como las condiciones frontera ya son homogéneas no es necesario calcular la solución estacionaria, la cual obviamente será la función nula [math]v(x)=0, 0\leq x\leq 1[/math]. Directamente, aplicamos el método de separación de variables llegando a que la solución será:

[math] u(x,t)=\sum_{k=1}^{\infty} c_{k}\sin{(k\pi x)} e^{-(k\pi)^2t} [/math],

donde [math]c_{k}[/math] se obtendrán al imponer la condición inicial:

[math] u(x,0)=\sum_{k=1}^{\infty} c_{k}\sin{(k\pi x)}= max \{0,1-4|x-1/2|\}[/math].

Estos [math]c_{k}[/math] son los coeficientes de la serie de Fourier de la función [math]max \{0,1-4|x-1/2|\}[/math] en [math][0,1][/math] obtenidos tras realizar su extensión impar a [math][-1,1][/math]. Estos coeficientes no se muestran analíticamente ya que se calcularán usando la fórmula del trapecio a la hora de dibujar la función solución [math]u[/math]. Vendrán dados por:

[math] c_{k} = 2 \cdot \int_{0}^{1}max \{0,1-4|x-1/2|\} sen(n\pi x) dx [/math]

A continuación, dibujaremos la gráfica de la solución. Para ello, de nuevo, aproximaremos la forma de la solución considerando los 10 primeros términos de la serie. Además, tan sólo la dibujaremos en el intervalo temporal [math][0,1][/math], ya que este breve intervalo de tiempo es suficientemente grande como para llegar a observar claramente cómo la solución se acerca a su estado estacionario, al igual que en el caso anterior.

Una vez dicho esto, dibujamos la aproximación de la solución u de forma tridimensional:

Aproximación de la función u, dibujada para [math](x,t)\in[0,1]\times[0,1].[/math]

Se puede ver claramente cómo a medida que avanza el tiempo la solución va llegando a un estado estacionario. Esto se ve ya que la solución comienza a dejar de variar con el tiempo. Además, este estado estacionario viene claramente dado por la solución estacionaria obtenida anteriormente de forma trivial [math]v(x)=0[/math]. En la gráfica, se puede ver cómo a medida que pasa el tiempo la solución se va aproximando a dicha solución estacionaria. Además, podemos observar menos oscilaciones cuando [math]t=0[/math] que en el caso anterior, de hecho si se aumenta el número de términos de la serie para aproximar la solución las oscilaciones prácticamente desaparecen. Esto se debe a que cuando se impone la condición inicial en este caso, la extensión periódica de la extensión impar en [math][-1,1][/math]de la función [math]max \{0,1-4|x-1/2|\}[/math] es continua, de forma que no se produce el fenómeno de Gibbs como ocurría en el caso anterior.

Por otro lado, podemos ver como en [math]x=0[/math] el flujo de calor empieza siendo negativo y se vuelve más negativo con el tiempo hasta cierto punto, a partir del cual empieza a crecer hasta hacerse cero. Es decir, como la dirección positiva del flujo de calor es la dirección positiva de la x, esto significa que el flujo de calor comienza saliendo del lado izquierdo de la varilla cada vez más hasta un punto a partir del cual cada vez sale menos calor hasta que deja de salir cuando la temperatura de la varilla se estabiliza. De igual forma, cuando [math]x=1[/math] el flujo de calor empieza siendo positivo y se vuelve más positivo con el tiempo hasta cierto punto, a partir del cual empieza a crecer hasta hacerse cero. Es decir, el flujo de calor comienza saliendo del lado derecho de la varilla cada vez más hasta un punto a partir del cual cada vez sale menos calor hasta que deja de salir cuando la temperatura de la varilla se estabiliza. En ambos extremos ocurre lo mismo. Esto se debe a que inicialmente en tiempo 0, la condición inicial dada [math]u(x,0)=max \{0,1-4|x-1/2|\}[/math] impone que haya una temperatura mayor que 0 en la parte central de la varilla. Esto hace que llegue una 'ola' de calor hacia ambos lados la cual hace que el flujo de calor saliente por ambos lados aumente. Una vez dicha transmisión de calor se va estabilizando, el flujo de calor saliente va disminuyendo hasta que deja de salir calor, estabilizándose la temperatura siendo igual a 0 grados (la solución estacionaria) a lo largo de toda la varilla.

8.1 . Código


9 . Cambio de condición inicial

En esta sección supondremos ahora que la temperatura en el lado derecho también es de 0 grados. Además, cambiaremos la condición inicial, de forma que se tendrá el siguiente sistema de EDP que modeliza el comportamiento de la temperatura:

[math]\left \{ \begin{array}{ll} \frac{\partial u}{\partial t}- \frac{\partial ^2 u}{\partial x^2}=0, & \quad 0 \lt x \lt 1, t \gt 0, \\ u(x,0)=max \{0,1-4|x-1/2|\}, & \quad 0 \lt x \lt 1, \\ u(0,t)=0, & \quad t \geq 0, \\ u(1,t)=0, & \quad t \geq 0. \end{array} \right. [/math]

Cuando se dice que la barra está aislada térmicamente en el extremo derecho, significa que no hay intercambio de calor con el entorno en ese extremo específico. En el contexto de problemas de conducción de calor, como la ecuación que se proporciono anteriormente [math]\frac{\partial u}{\partial t} - \alpha \nabla^2 u = 0 [/math], el hecho de que el extremo derecho esté aislado térmicamente tiene implicaciones en las condiciones de contorno del problema.

Si u(x,t) es la temperatura en la posición x de la barra en el tiempo t, la condición de contorno de aislamiento térmico en el extremo derecho podría expresarse como: [math] \left. \frac{\partial u}{\partial x} \right|_{x=L} = 0[/math]

Esta condición indica que la tasa de cambio de temperatura con respecto a la posición en el extremo derecho es cero, lo que implica que no hay flujo de calor saliendo de la barra en ese extremo.

En este caso, como las condiciones frontera ya son homogéneas no es necesario calcular la solución estacionaria, la cual obviamente será la función nula [math]v(x)=0, 0\leq x\leq 1[/math]. Directamente, aplicamos el método de separación de variables llegando a que la solución será:

[math] u(x,t)=\sum_{k=1}^{\infty} c_{k}\sin{((\frac{\pi}{2} \cdot (2n-1) \cdot x)} e^{-(\frac{\pi ^{2}}{4} \cdot (2n -1)^2 \cdot t} [/math].

Véase que no podemos trabajar con la base trigonométrica usual [math]\{ 1, sen(\pi kx), cos((\pi kx)\}_{k=1}^{\infty} [/math] ya que no nos permite describir adecuadamente la solución. En su lugar, vamos a trabajar con la base [math]\{ \frac{1}{2}, sen((\frac{\pi}{2}+k\pi)x), cos((\frac{\pi}{2}+k\pi)x) \}_{k=1}^{\infty} [/math] que ha sido modificada de tal forma que podamos representar adecuadamente la solución .

Para calcular los coeficientes [math] c_{k}[/math] procedemos de la misma manera, debemos imponer que se cumpla la condición inicial , es decir :

[math] u(x,0)=\sum_{k=1}^{\infty} c_{k}\sin{((\frac{\pi}{2} \cdot (2n-1) \cdot x)} [/math].

Donde verificamos que la base [math] {\sin{((\frac{\pi}{2} \cdot (2n-1) \cdot x)} }_{k \in N} [/math] es ortogonal:

[math] \lt \sin{((\frac{\pi}{2} \cdot (2n-1) \cdot x)},\sin{((\frac{\pi}{2} \cdot (2m-1) \cdot x)})\gt_{L^2(0,1)} = \int_{0}^{1} \sin{((\frac{\pi}{2} \cdot (2n-1) \cdot x)} \cdot \sin{((\frac{\pi}{2} \cdot (2m-1) \cdot x)}dx = 0[/math]

Extendiendo de forma impar la función [math]max \{0,1-4|x-1/2|\}[/math], vamos a tener la base [math]\{sen((\frac{\pi}{2}+k\pi)x)\}_{k=1}^{\infty} [/math] pues forma un conjunto completo en [math][0,1][/math] y es ortogonal. Es lógico que la base este compuesta por senos ya que al extender de forma impar es la manera más coherente de representar dicha función. Verificamos que la base es ortonormal:

[math] \lt sen((\frac{\pi}{2}+n\pi)x), sen((\frac{\pi}{2}+m\pi)x)\gt_{L^2(0,1)} = \int_{0}^{1}sen((\frac{\pi}{2}+n\pi)x) \cdot sen((\frac{\pi}{2}+m\pi)x) dx = 0[/math]

Gracias a esta comprobación podemos ver que la base es ortogonal y completa por tanto podemos calcular los [math] c_{k} [/math] correspondientes a la solución que son los coeficientes de Fourier en esta nueva base. Planteamos la expresión de los [math] c_{k} [/math]:

[math] c_{k} = \int_{0}^{1} \sin{((\frac{\pi}{2} \cdot (2n-1) \cdot x)} \cdot f(x) dx [/math]

Si realizamos la integral obtenemos:

[math] c_{k} = (8 \pi n cos(\pi n) - 8 sen(\pi n))/(\pi^2 n^2) + 2[/math]

Dicha expresión puede ser difícil de manejar por ello aproximaremos este resultado para mostrar el comportamiento del sistema. La aproximación de estos coeficientes será usando el método numérico del trapecio, para poder representar adecuadamente la solución.


10 . Principio del Máximo

El teorema del principio del máximo nos permite asegurar la unicidad del sistema. Dicho teorema nos dice lo siguiente:

Sea [math] u \in C^{2,1} (Q_T) \cap C(\overline{Q_T})[/math] que verifica [math]u_t - \Delta u\leq 0 [/math] en [math]Q_T[/math].Entonces u alcanza su máximo en la frontera parabólica:

[math]\max \limits_{(x,t) \in \overline{Q_T}} u = \max \limits_{(x,t) \in \partial _P Q_T} u [/math]

Nuestra solución correspondiente al apartado anterior cumplen todas las hipótesis del teorema del máximo, en primer lugar [math] u \in C^{2,1} (Q_T) \cap C(\overline{Q_T})[/math] además por el apartado anterior sabemos que la u que es la solución correspondiente al sistema cumple la expresión [math]u_t - \Delta u\leq 0 [/math]. Además la condición inicial converge uniformemente de manera que la condición que necesitamos para la continuidad se cumple a la perfección. (HAY QUE JUSTIFICAR POR QUE LA CONDICION INICIAL CONVERGE UNIFORMEMENTE).

De esta forma si consideramos dos soluciones u y v de tal forma que definimos w=u-v que satisface:

[math]\left \{ \begin{array}{ll} w_t - \Delta w =0 & \quad x \in (0,1), T \gt 0 \\ w(0,t)=0, & \quad x \in (0,1) , \\ w(x,T)=0, & \quad x \in \{0,1\}, T \gt 0. \end{array} \right. [/math]

Aplicando el principio del máximo obtenemos: [math] \min \limits_{(x,t) \in \partial _P Q_T}w \leq w \leq \max \limits_{(x,t) \in \partial _P Q_T}w [/math] de aqui deducimos que [math]w \equiv 0[/math] por tanto podemos concluir que u=v, quedando mostrado que la solución del sistema es única.

11 . Solución fundamental de la ecuación del calor en dimensión 1

En este apartado mostraremos cual es el comportamiento de la solución fundamental ecuación del calor, para poder hacer una buena representación tomaremos [math] x \in [−1, 1] [/math] y [math] t \in [10^{-2}, 1] [/math]. Se define la solución fundamental en una dimensión como:

[math] u(x,t) = \frac{1}{\sqrt{4\pi t}} e^{\frac{-x^2}{4t}}[/math]

11.1 .Código


12 . Solución de la ecuación del calor para el semi-espacio positivo

Continuando con la idea de representar la solución de la ecuación del calor se impondrá una serie de condiciones sobre el sistema para ver como se comporta la solución, dichas condiciones serán; la condición inicial [math] u(x, 0) = 0 [/math] y la condición frontera [math]u(0, t) = 1 [/math].

12.1 .Código


13 . Ecuación del calor y la convolución

Variando las condiciones iniciales de la ecuación del calor podemos obtener diferentes soluciones, en este caso si imponemos que el dato inicial sea [math]u_{0}(x) = 1_[−1,1] [/math] su solución estará definida por la convolución: [math]u(x,t) = \int_{-\infty}^{\infty} K(x-y) \cdot u_{0}(y) dy [/math]

donde K(x,t) es la solución fundamental presentada anteriormente. Se mostrará la solución para diferentes instantes de tiempo, para aproximar la integral que viene dada por la convolución usaremos el método numérico del trapecio.

13.1 .Código


14 . Ecuacion del calor de dimensión 2

Ahora se mostrará cual es la ecuación del calor para el caso bidimensional donde se necesitan 3 variables para abordar este sistema, dicha expresión tendrá la forma:

[math]{\partial u\over \partial t} = \alpha \left({\partial^2 u\over \partial x^2 } + {\partial^2 u\over \partial y^2 } + {\partial^2 u\over \partial z^2 }\right)[/math][math] = \alpha ( u_{xx} + u_{yy} + u_{zz} ) \quad [/math]

donde:

  • [math]u = u \left(x, y, z,t\right)[/math] es la temperatura como una función del espacio y del tiempo;
  • [math]\frac{\partial u}{\partial t}[/math] es la razón de cambio de temperatura en un punto respecto del tiempo;
  • [math]u_{xx},u_{yy}, u_{zz}[/math] son derivadas segundas parciales (conducciones térmica) de la temperatura respecto de [math]x,y,z[/math], respectivamente;
  • [math]\alpha = \frac{k}{c_p\rho}[/math] es la difusividad térmica, una cantidad específica del material que depende de la conductividad térmica [math]k[/math], la densidad de masa [math]\rho[/math], y la calor específico [math]c_p[/math].

La ecuación del calor es una consecuencia de la ley de Fourier de conducción . Las soluciones de la ecuación del calor se caracterizan por una suavidad gradual de la distribución de temperatura inicial por el flujo de calor desde las áreas más cálidas hacia las más frías de un objeto. Generalmente, muchos estados diferentes y condiciones iniciales tienden al mismo equilibrio estable. Veremos además que la solución según tiende a t=0 se vuelve mas singular por lo que podemos dar una serie de conclusiones a partir de la representación del sistema.

14.1 .Código