Prova sistemas

Universidade Federal de Uberlândia
Faculdade de Engenharia Mecânica
Graduação em Engenharia Mecânica
Disciplina: Sistemas Térmicos
Professor: SolidônioR. de Carvalho

Resolução da Prova 1

Aluno: Jomone Brunozzi Ruiz Matrícula: 91203

Uberlândia, 21 de Outubro de 2011

Programa de Resolução:
"Dados"
Nt=0,85
Wt=15,077*1000
Nb1=0,8
Nb2=0,8
Ngv=0,9
Pc=33,285*1000
mcomb=7,2*1000/3600 vel=85 "Primeira Lei Turbina"
Wt=m*h[1]+ma*h[10]-m*h[7]-ma*h[2]
"Primeira LeyGerdor de vapor"
Qcv=m*h[1]+ma*h[10]-m*h[6]-ma*h[8]
"Primeira Aquecedor de Superficie" mb*h[9]+(ma+m13)*h[4]=(ma+m13)*h[5]+m11*h[1]+m13*h[13] "Eficiencia do Gerador de Vapor"
Ngv=Qgv/(mcomb*Pc)
"Equacoes de Fluxo" m=ma+mb m11=3,6*1000/3600 m13=3,6*1000/3600 mb=m11*m13

"Ponto 1" p[1]=5 "h[1] e obtido da relacao das equacoes da primeira ley na turbina e no Gv"
T[1]=Temperature(Steam_IAPWS;p=p[1];h=h[1])
s[1]=Entropy(Steam_IAPWS;p=p[1];h=h[1]) x[1]=Quality(Steam_IAPWS;p=p[1];h=h[1]) "Ponto ideal 2" p[2]=0,101 si[2]=s[10]
Ti[2]=Temperature(Steam_IAPWS;p=p[2];s=si[2])
xi[2]=Quality(Steam_IAPWS;p=p[2];s=si[2]) hi[2]=Enthalpy(Steam_IAPWS;p=p[2];s=si[2]) "Ponto 2" h[2]=h[10]-0,85*(h[10]-hi[2]) T[2]=Temperature(Steam_IAPWS;p=p[2];h=h[2]) s[2]=Entropy(Steam_IAPWS;p=p[2];h=h[2]) x[2]=Quality(Steam_IAPWS;p=p[2];h=h[2])

"Ponto3" x[3]=0 p[3]=p[2] h[3]=Enthalpy(Steam_IAPWS;x=x[3];p=p[3]) s[3]=Entropy(Steam_IAPWS;x=x[3];p=p[3])
T[3]=Temperature(Steam_IAPWS;p=p[3];x=x[3])

"Ponto ideal 4" p[4]=p[1] si[4]=s[3]
Ti[4]=Temperature(Steam_IAPWS;p=p[4];s=si[4])
xi[4]=Quality(Steam_IAPWS;p=p[4];s=si[4]) hi[4]=Enthalpy(Steam_IAPWS;p=p[4];s=si[4]) "Ponto 4" h[4]=h[3]-(h[3]-hi[4])/0,8 T[4]=Temperature(Steam_IAPWS;p=p[4];h=h[4]) s[4]=Entropy(Steam_IAPWS;p=p[4];h=h[4]) x[4]=Quality(Steam_IAPWS;p=p[4];h=h[4])

"Ponto5" p[5]=5 T[5]=T[13]-3
h[5]=Enthalpy(Steam_IAPWS;T=T[5];p=p[5])