Reaquecedor - EES

"Rankine Simples Ideal"

"Q - w + me(he + ve^2/2 + gze) - ms(hs + vs^2/2 + gzs) = dEvc/dt"

"Ponto 1"

P[1] = 7000

P_sat[1] = P_sat(Steam;T=T[1])

T[1] = 520

h[1] = Enthalpy(Steam;P=P[1];T=T[1])

s[1] = Entropy(Steam;P=P[1];T=T[1])

m[1] = 45

"Ponto 2"

P[2] = 250

s[2] = s[1]

h[2] = Enthalpy(Steam;P=P[2];s=s[2])

T[2] = Temperature(Steam;P=P[2];s=s[2])

m[2] = 15

"Ponto 3"

P[3] = P[2]

x[3] = 0

h[3] = Enthalpy(Steam;P=P[3];x=x[3])

s[3] = Entropy(Steam;P=P[3];x=x[3])

T[3] = Temperature(Steam;P=P[3];s=s[3])

m[3] = 15

"Ponto 4"

P[4] = P[1]

s[4] = s[7]

h[4] = Enthalpy(Steam;P=P[4];s=s[4])

T[4] = Temperature(Steam;P=P[4];s=s[4])

m[4] = 45

"Ponto 5"

P[5] = 600

s[5] = s[1]

h[5] = Enthalpy(Steam;P=P[5];s=s[5])

T[5] = Temperature(Steam;P=P[5];s=s[5])

m[5] = 30

"Ponto 6"

P[6] = P[5]

s[6] = s[3]

h[6] = Enthalpy(Steam;P=P[6];s=s[6])

T[6] = Temperature(Steam;P=P[6];h=h[6])

m[6] = 15

"Ponto 7"

P[7] = P[6]

x[7] = 0

h[7] = Enthalpy(Steam;P=P[7];x=x[7])

s[7] = Entropy(Steam;P=P[7];x=x[7])

T[7] = Temperature(Steam;P=P[7];s=s[7])

m[7] = 45

"Ponto 8"

T[8] = -15

P[8] = 93,4

V_ar_in = Volume(Air;P=P[8];T=T[8])

h[8] = Enthalpy(Air; P=P[8]; T=T[8])

"Ponto 9"

P[9] = P[8]

V_ar_out = Volume(Air;P=P[9];T=T[9])

h[9] = Enthalpy(Air; P=P[9]; T=T[9])

m[9] = m[8]

Ql = m[8]*h[8] - m[9]*h[9]

"Gerador de Vapor"

Qh + h[4] - h[1] = 0

"Turbina"

-Wt + h[1] - (1-x)*h[2] - x*h[5] = 0

"Condensador"

Ql + (1-x)*(h[2] - h[3]) = 0

"Bomba 1"

-Wb1 + (1-x)*(h[3] - h[6]) = 0

"Aquecedor"

x*h[5] + (1-x)*h[6] - h[7] = 0

"Bomba 2"

-Wb2 + h[7] - h[4] = 0

"Potência Líquida"

WL = Wt + Wb1 + Wb2

"Eficiência"

eta = WL/Qh

"Gerador de Vapor"

"C2H5OH"

"Ar atmosférico O2 + 3,76 N2"

y_C2H5OH = 1

"Equação da Combustão"

"C2H5OH + a*exc*(O2 + 3,76*N2) = b*CO2 + c*H2O + d*N2 + e*O2"

"Balanço Estequiométrico"

"C"

y_C2H5OH*2 = b

"H"

y_C2H5OH*6 = 2*c

"O"

y_C2H5OH + a*exc*2 = 2*b + c +