Programa Para Determinar Temperatura de Burbuja

  • Published on
    21-Dec-2015

  • View
    8

  • Download
    5

Embed Size (px)

DESCRIPTION

Programa de matlab para determinar la temperatura de burbuja

Transcript

<p>clear all%Calcular la Temperatura de Burbuja (Tb) para una mezcla de sustancias puras a una presin y fracciones molares conocidas %De la ecuacin de AntoineA1=input('Introduzca el valor de la constante A para la sustancia 1')B1=input('Introduzca el valor de la constante B para la sustancia 1')C1=input('Introduzca el valor de la constante C para la sustancia 1')A2=input('Introduzca el valor de la constante A para la sustancia 2')B2=input('Introduzca el valor de la constante B para la sustancia 2')C2=input('Introduzca el valor de la constante C para la sustancia 2')%Presin del sistema y fracciones molares de los componentesP= input('Introduzca el valor de la presin del sistema en mm de Hg: ');X1=input('Introduzca el valor de la fraccin molar del componente 1')X2=1-X1%Determinacin de la temperatura de ebullicin normalTem1=B1./(A1-log10(P))-C1;Tem2=B2./(A2-log10(P))-C2;Tem= [Tem1 Tem2]Min=min(Tem); Max=max(Tem);fprintf('La temperatura de tanteo debe estar entre T1=%g y T2=%g \n',Min,Max);T= input('Temperatura inicial de tanteo en C; ');% Presiones de vaporfor l=1:1000P1o(l)=10.^(A1-(B1./(T+C1)));P2o(l)= 10.^(A1-(B1./(T+C1)));% Determinacin de Y1 y Y2Y1(l)=P1o(l)*X1/P; Y2(l)=P2o(l)*X2/P;% Condicin de Y1 + Y2 = 1sumaY(l)= Y1(l)+Y2(l);condicion(l)= abs(sumaY(l)-1);if condicion(l)</p>