Fogler Example 8-12 |POLVER05_1
f(T) = UA*(Ta-T)-FA0*Cp*(T-T0)+V*(r1A*DH1+r2B*DH2)  #
CA = CA0/(1+tau*k1)  #
CB = tau*k1*CA/(1+tau*k2)  #
CC = CA0-CA-CB #
Cp = 200  #
CA0 = 0.3  #
T0 = 283  #
tau = 0.01  #
DH1 = -55000  #
DH2 = -71500  #
v0 = 1000  #
E1 = 9900  #
E2 = 27000  #
UA = 40000  #
Ta = 330  #
k1 = 3.3*exp((E1/1.987)*(1/300-1/T))  #
k2 = 4.58*exp((E2/1.987)*(1/500-1/T))  #
r1A = -k1*CA  #
r2B = -k2*CB  #
FA0 = v0*CA0  #
V = v0*tau  #
T(min)=250, T(max)=750