Page 274 - Thermodynamics of Biochemical Reactions

274 Mathematica Solutions to Problems

Y
lr

I/M
0.05 0.1 0.15 0.2 0.25

At 25 "C

ganrma25[z-,is-]:=Module[{),(*Calculates the activity coefficient of an ion of charge z
at 0 C as a function of ionic strength at 0 C.*)
Exp[-1.17585*(zA2)*(isA.5)/(l+l.6*isA.5)II

plot251=Plot [garmna25 [ 1, is], {is,O, .25} ,PlotRange->{O, 1) ,AxesOrigin->{O, 03 ,I+xesLab*l-
>{ lll/M1l, l1yt1} ,DisglayFunction->Identity] ;
plot 2 5 2 =Plot [ gamma2 5 [ 2, i s ] , i s , 0 , .2 5 1 , Plot Range- > { 0,11, Axe sorig in- > { 010 3 , Axes Labe 1 -
{
> ( llI/Mil, 'iyii 1 ,DisglayFunction->Identity] ;