Diferencia entre revisiones de «Reacciones complejas - Grupo 1 A»
De MateWiki
(→Apartado 5) |
(→Trapecio) |
||
| Línea 67: | Línea 67: | ||
{{matlab|codigo= | {{matlab|codigo= | ||
| − | %PVI por | + | %PVI por Trapecio con una h = 0.1 |
clear all | clear all | ||
| Línea 76: | Línea 76: | ||
h = 0.1; | h = 0.1; | ||
k = 1; | k = 1; | ||
| + | a = 3; | ||
| + | b = 1; | ||
%calculamos N | %calculamos N | ||
N = (tN - t0)/h; | N = (tN - t0)/h; | ||
| Línea 87: | Línea 89: | ||
%solucion obtenida | %solucion obtenida | ||
for i=1:N | for i=1:N | ||
| − | + | %Definimos tres variables para reducir la ecuación | |
| + | Q = 1 + (h*k*(a+b))/2; | ||
| + | W = -(h*k)/2; | ||
| + | E = -y(i)- h*k*(1/2)*((a - y(i))*(b - y(i)) + a*b); | ||
| + | y(i+1)=(-Q + sqrt(Q^2- (4*W*E)))/(2*W); | ||
end | end | ||
Revisión del 12:55 26 feb 2015
| Trabajo realizado por estudiantes | |
|---|---|
| Título | Reacciones complejas. Grupo 1A |
| Asignatura | Ecuaciones Diferenciales |
| Curso | Curso 2014-15 |
| Autores | María Ramírez
Ignacio Posada Antonio López-Mateos Pablo Bueno |
| Este artículo ha sido escrito por estudiantes como parte de su evaluación en la asignatura | |
Contenido
1 Introducción
2 Apartado 1
3 ¿Qué sucedería si el proceso fuese reversible?
4 Apartado 3
%PVI por Euler con una h = 0.1
clear all
%condiciones dadas
y0 = 0;
t0 = 0;
tN = 2;
h = 0.1;
k = 1;
%calculamos N
N = (tN - t0)/h;
%definimos la variable t
t = linspace(t0,tN,N+1);
%funcion y
y = zeros(1,N+1);
y(1)= y0;
%solucion obtenida
for i=1:N
y(i+1)=y(i)+ h*(k*(3 - y(i))*(1 - y(i)));
end
%Concentracion de los reactivos
ya = zeros(1,N+1);
yb = zeros(1,N+1);
ya = 3.- y;
yb = 1.- y;
%solucion grafica
hold on
plot(t,y,'linewidth',2)
plot(t,ya,'g','linewidth',2)
plot(t,yb,'r','linewidth',2)
legend('Concentracion de C','Concentracion de A','Concentracion de B','Location','best');
hold off
4.1 Resolución numérica
5 Apartado 4
6 Apartado 5
6.1 Trapecio
%PVI por Trapecio con una h = 0.1
clear all
%condiciones dadas
y0 = 0;
t0 = 0;
tN = 2;
h = 0.1;
k = 1;
a = 3;
b = 1;
%calculamos N
N = (tN - t0)/h;
%definimos la variable t
t = linspace(t0,tN,N+1);
%funcion y
y = zeros(1,N+1);
y(1)= y0;
%solucion obtenida
for i=1:N
%Definimos tres variables para reducir la ecuación
Q = 1 + (h*k*(a+b))/2;
W = -(h*k)/2;
E = -y(i)- h*k*(1/2)*((a - y(i))*(b - y(i)) + a*b);
y(i+1)=(-Q + sqrt(Q^2- (4*W*E)))/(2*W);
end
%Concentracion de los reactivos
ya = zeros(1,N+1);
yb = zeros(1,N+1);
ya = 3.- y;
yb = 1.- y;
%solucion grafica
hold on
plot(t,y,'linewidth',2)
plot(t,ya,'g','linewidth',2)
plot(t,yb,'r','linewidth',2)
legend('Concentracion de C','Concentracion de A','Concentracion de B','Location','best');
hold off

