| File |
Line number |
Procedure |
Code |
|
./pkg/bling/bling_carbon_chem.F |
385 |
CALC_PCO2_APPROX |
_RL hguess |
|
./pkg/bling/bling_carbon_chem.F |
414 |
CALC_PCO2_APPROX |
hguess = 10.0**(-phguess) |
|
./pkg/bling/bling_carbon_chem.F |
416 |
CALC_PCO2_APPROX |
bohg = btlocal*kblocal/(hguess+kblocal) |
|
./pkg/bling/bling_carbon_chem.F |
420 |
CALC_PCO2_APPROX |
stuff = hguess*hguess*hguess |
|
./pkg/bling/bling_carbon_chem.F |
421 |
CALC_PCO2_APPROX |
& + (k1plocal*hguess*hguess) |
|
./pkg/bling/bling_carbon_chem.F |
422 |
CALC_PCO2_APPROX |
& + (k1plocal*k2plocal*hguess) |
|
./pkg/bling/bling_carbon_chem.F |
424 |
CALC_PCO2_APPROX |
h3po4g = (pt*hguess*hguess*hguess) / stuff |
|
./pkg/bling/bling_carbon_chem.F |
425 |
CALC_PCO2_APPROX |
h2po4g = (pt*k1plocal*hguess*hguess) / stuff |
|
./pkg/bling/bling_carbon_chem.F |
426 |
CALC_PCO2_APPROX |
hpo4g = (pt*k1plocal*k2plocal*hguess) / stuff |
|
./pkg/bling/bling_carbon_chem.F |
431 |
CALC_PCO2_APPROX |
siooh3g = sit*ksilocal / (ksilocal + hguess) |
|
./pkg/bling/bling_carbon_chem.F |
438 |
CALC_PCO2_APPROX |
cag = ta - bohg - (kwlocal/hguess) + hguess |
|
./pkg/dic/carbon_chem.F |
399 |
CALC_PCO2_APPROX |
_RL hguess |
|
./pkg/dic/carbon_chem.F |
428 |
CALC_PCO2_APPROX |
hguess = 10.0**(-phguess) |
|
./pkg/dic/carbon_chem.F |
430 |
CALC_PCO2_APPROX |
bohg = btlocal*kblocal/(hguess+kblocal) |
|
./pkg/dic/carbon_chem.F |
434 |
CALC_PCO2_APPROX |
stuff = hguess*hguess*hguess |
|
./pkg/dic/carbon_chem.F |
435 |
CALC_PCO2_APPROX |
& + (k1plocal*hguess*hguess) |
|
./pkg/dic/carbon_chem.F |
436 |
CALC_PCO2_APPROX |
& + (k1plocal*k2plocal*hguess) |
|
./pkg/dic/carbon_chem.F |
438 |
CALC_PCO2_APPROX |
h3po4g = (pt*hguess*hguess*hguess) / stuff |
|
./pkg/dic/carbon_chem.F |
439 |
CALC_PCO2_APPROX |
h2po4g = (pt*k1plocal*hguess*hguess) / stuff |
|
./pkg/dic/carbon_chem.F |
440 |
CALC_PCO2_APPROX |
hpo4g = (pt*k1plocal*k2plocal*hguess) / stuff |
|
./pkg/dic/carbon_chem.F |
445 |
CALC_PCO2_APPROX |
siooh3g = sit*ksilocal / (ksilocal + hguess) |
|
./pkg/dic/carbon_chem.F |
448 |
CALC_PCO2_APPROX |
cag = ta - bohg - (kwlocal/hguess) + hguess |