Page 371 - Thermodynamics of Biochemical Reactions

Redox Reactions 371

I

I
6 7 8 9 pH
Plotlo = Plot[Evaluate[- (8*96.485/ (8.31451* .ZSSlS*Log[lO])) *

D [calcappredpot [n2g + de :: 2 *ammonia + h2g, 8, pH, .25] , pH] 1, {pH, 5, 9},
PlotRange -> (0, 11), Axesorigin -> {5, 0), AxesLabel -> {llpH1l,

8-

6-

4-
2-
I
I
6 7 8 9 pH
plot1 = Plot[Evaluate[-(2*96.485/ (8.31451* .29815*Log[lO])) *

D[calcappredpot [co2tot + de == formate + h20, 2, pH, -251, pH] 1, {pH, 5, 9) I
PlotRange -> {0, ll}, UesOrigin -> {5, 0), AxesLabel -> {"pH", "ANH"}];

8.

6-
4-

2.
/-

plot2 = Plot [Evaluate [- (2 * 96.485 / (8 -31451 * -29815 Log [lo] ) *
)
R
D[calcappredpot [acetylcoA + co2tot + de :I pyruvate + COA + h20, 2, pH, .25], pH] 1,
{pH, 5, 9). PlotRange -> {0, ll}, Axesorigin-> {5, 0}, AxesLabel -> {"pH", "ANH"}];