Page 372 - Thermodynamics of Biochemical Reactions

372 Mathernatica Solutions to Problems

ANH
10

8
6

4

2

6 7 8 9 pH
plot3 Plot [Evaluate [ - (2 * 96.485 / (8.31451 * .29815 * Log [ 101 ) ) *
D[calcappredpot [oxoglutarats2 + ammonia + de == glutamate + h20, 2, pH, -251, pH] 1,
{pH, 5, 9), PlotRange -> {0, 11). Axesorigin -> {5, 0}, AxesLabel -> {llpHrr, llAN,lt}];

ANH

6 "_

I
6 7 8 9- PH
plot4 = Plot[Evaluate[-(2*96.485/ (8.31451* .29815*Log[lO])) *
D[calcappredpot[pyruvate+ammonia+de =alanine+h20, 2, pH, .25], pH]], (pH, 5, 9},
PlotRange -> {O, ll}, Axesorigin -> (5, 0}, AxesLabel -> {"pH", "AN,"}];

6 7 8 9- PH

plot6 = Plot [Evaluate [ - (2 * 96.485 / (8.31451 * .29815 * Log [ 101 ) ) *
D [calcagpredpot [cystineL + de :Z 2 * cysteineL + h20, 2, pH, .25], pH] 1, {BH, 5, 9) I
PlotRange -> (0, 11}, Axesorigin -> {5, o), AxesLabel -> {"pH", "AN,"}];