Section 21.3 Binary Mass-Transfer coefficients in Two Phases

> restart;

> eq11:=NA0=kx*(xA0-xAb)+xA0*(NA0+NB0); The nomenclature from eq. 21.1-11 is easier to type than that from eq. 21.1-10.

[Maple Math]

> NB0:=0;

[Maple Math]

> eq11; We will need an equation like this for each of the phases.

[Maple Math]

> eqliq:=NAliq=kx*(xA0-xAb)+xA0*NAliq;

[Maple Math]

> eqgas:=NAgas=ky*(yA0-yAb)+yA0*NAgas;

[Maple Math]

> N1:=solve(eqliq,NAliq); The flux from the interface to the liquid.

[Maple Math]

> N2:=solve(eqgas,NAgas); The flux from the interface to the gas.

[Maple Math]

> eqkk:=N1+N2=0; The net flow to the interface must be zero.

[Maple Math]

> eqkk:=N1=-N2; Another way of showing this realtion.

[Maple Math]

> eqkk:=N2/N1=-1; One more.

[Maple Math]

> eqkk:=kx/ky*N2/N1=-kx/ky; Mulitply both sides of that last equation by kx/ky to get:

[Maple Math]

> eqkk:=(1-yA0)/(1-xA0)*kx/ky*N2/N1=-(1-yA0)/(1-xA0)*kx/ky; Now multiply both sides by (1-yA0)/(1-xA0).

[Maple Math]

> simplify(%); Close to eq. 21.3-4.

[Maple Math]

> eqOVA:=NAgas=Ky*(yAe-yAb)+yAe*NAgas; Using an "over-all mass transfer" coefficient in the gas phase: Ky. Note that yAe=f(xAb).

[Maple Math]

> N3:=solve(eqOVA,NAgas);

[Maple Math]

> 1/N3; Starting to put this in a form that could lead to eq. 21.3-8.

[Maple Math]

> lhs8:=simplify((yAe-yAb)/N3); This is the Left Hand Side of eq. 21.3-8.

[Maple Math]

> eq7:=yAe-yAb=my*(xAb-xA0)+yA0-yAb; eq. 21.3-7. my is the slope found by: (yAe-yA0)/(xAb-xA0).

[Maple Math]

> eq7/Ns; The LHS of this is the same as lhs8.

[Maple Math]

> my*(xA0-xAb)/N1; Remember that N1 = - N3, so this is the first term on the RHS of eq7/Ns.

[Maple Math]

> simplify((yA0-yAb)/N2); This is the 2nd term on the RHS of eq7/Ns.

[Maple Math]

> rhs8:=my*(xA0-xAb)/N1+%; This is the RHS of eq7/Ns.

[Maple Math]

> eq8:=lhs8=rhs8; Thus we finally get eq. 21.3-8.

[Maple Math]

>