Question: How do i graph this?

ex4_lista_CSTR.mw

How do i do a graph of Xma(T) and Xea(T) in function of T? I need to do this in the same graph because the answer is the point where the lines cross. Please help, i´m a beginner in this software.

Variáveis

 

``

restart;

F[A][0] := 43, 4;

43, 4

 

802, 8

 

0

 

71, 87

(1.1)

C[P][A] := 35;

35

 

18

 

46

 

19, 5

(1.2)

deltaC[P] := -C[P][A]-C[P][B]+C[P][C];

-7

(1.3)

V := 40, 1

40, 1

(1.4)

v[A][0] := 46, 62;

46, 62

 

46, 62

 

233, 1

(1.5)

v[0] := v[A][0]+v[M][0]+v[B][0];

325, 125

(1.6)

H[A][ref] := -66600;

-66600

 

-123000

 

-226000

(1.7)

deltaH[R][ref] := -H[A][ref]-H[B][ref]+H[C][ref];

-36400

(1.8)

deltaH[R] := deltaH[R][ref]+deltaC[P]*(T-T[ref]);

-36400-7*T+7*T[ref]

(1.9)

``

k := 16, 96*10^12*exp(-32400/(R_*T));

16, 96000000000000*exp(-32400/(R_*T))

(1.10)

R_ := 1, 987;

1, 987

(1.11)

C[A][0] := F[A][0]/v[0];

(43, 4)/(325, 125)

(1.12)

T[0] := 75;

75

(1.13)

T[ref] := 68;

68

(1.14)

 

Balanço Molar

 

r[A] := -k*C[A][0]*(1-X[MA](T));

-(16, 96000000000000*exp(-32400/((1, 987)*T)))*(43, 4)*(1-X[MA](T))/(325, 125)

(2.1)

``

EQ1 := X[MA](T) = V*k/(V*k+v[0]);

X[MA](T) = (40, 1)*(16, 96000000000000*exp(-32400/((1, 987)*T)))/((40, 1)*(16, 96000000000000*exp(-32400/((1, 987)*T)))+(325, 125))

(2.2)

``

Balanço de Energia

 

r[A] := -k*C[A][0]*(1-X[EA](T));

-(16, 96000000000000*exp(-32400/((1, 987)*T)))*(43, 4)*(1-X[EA](T))/(325, 125)

(3.1)

``

EQ2 := X[EA](T) = 1-(C[P][A]*F[A][0]+C[P][B]*F[B][0]+C[P][C]*F[C][0])*(T-T[0])/(deltaH[R]*V*k*C[A][0]);

X[EA](T) = 1-(15941, 284)*(T-75)*(325, 125)/((-35924-7*T)*(40, 1)*(16, 96000000000000*exp(-32400/((1, 987)*T)))*(43, 4))

(3.2)

``

``



Download ex4_lista_CSTR.mw

 

Please Wait...