| File |
Line number |
Procedure |
Code |
|
./pkg/bling/bling_carbon_chem.F |
174 |
CALC_PCO2 |
k12 = k1local*k2local |
|
./pkg/bling/bling_carbon_chem.F |
17 |
CALC_PCO2 |
I k1local,k2local, |
|
./pkg/bling/bling_carbon_chem.F |
181 |
CALC_PCO2 |
b = x2 + k1local*x + k12 |
|
./pkg/bling/bling_carbon_chem.F |
183 |
CALC_PCO2 |
db = 2.0*x + k1local |
|
./pkg/bling/bling_carbon_chem.F |
188 |
CALC_PCO2 |
fn = k1local*x*diclocal/b + |
|
./pkg/bling/bling_carbon_chem.F |
205 |
CALC_PCO2 |
df = ((k1local*diclocal*b) - k1local*x*diclocal*db)/b2 - |
|
./pkg/bling/bling_carbon_chem.F |
246 |
CALC_PCO2 |
k12 = k1local*k2local |
|
./pkg/bling/bling_carbon_chem.F |
253 |
CALC_PCO2 |
b = x2 + k1local*x + k12 |
|
./pkg/bling/bling_carbon_chem.F |
255 |
CALC_PCO2 |
db = 2.0*x + k1local |
|
./pkg/bling/bling_carbon_chem.F |
257 |
CALC_PCO2 |
fn = k1local*x*diclocal/b + |
|
./pkg/bling/bling_carbon_chem.F |
299 |
CALC_PCO2 |
co2star=diclocal*htotal2/(htotal2 + k1local*htotal |
|
./pkg/bling/bling_carbon_chem.F |
300 |
CALC_PCO2 |
& + k1local*k2local) |
|
./pkg/bling/bling_carbon_chem.F |
328 |
CALC_PCO2_APPROX |
I k1local,k2local, |
|
./pkg/bling/bling_carbon_chem.F |
372 |
CALC_PCO2_APPROX |
_RL k1local, k2local |
|
./pkg/bling/bling_carbon_chem.F |
445 |
CALC_PCO2_APPROX |
stuff = (1.0 _d 0-gamm)*(1.0 _d 0-gamm)*k1local*k1local |
|
./pkg/bling/bling_carbon_chem.F |
446 |
CALC_PCO2_APPROX |
& - 4.0 _d 0*k1local*k2local*(1.0 _d 0-2.0 _d 0*gamm) |
|
./pkg/bling/bling_carbon_chem.F |
447 |
CALC_PCO2_APPROX |
hnew = 0.5 _d 0*( (gamm-1.0 _d 0)*k1local + sqrt(stuff) ) |
|
./pkg/bling/bling_carbon_chem.F |
450 |
CALC_PCO2_APPROX |
& (1.0 _d 0 + (k1local/hnew) + (k1local*k2local/(hnew*hnew))) |
|
./pkg/bling/bling_carbon_chem.F |
457 |
CALC_PCO2_APPROX |
co3local = k1local*k2local*diclocal / |
|
./pkg/bling/bling_carbon_chem.F |
458 |
CALC_PCO2_APPROX |
& (hnew*hnew + k1local*hnew + k1local*k2local) |
|
./pkg/bling/bling_carbon_chem.F |
58 |
CALC_PCO2 |
_RL k1local, k2local |
|
./pkg/dic/carbon_chem.F |
179 |
CALC_PCO2 |
k12 = k1local*k2local |
|
./pkg/dic/carbon_chem.F |
186 |
CALC_PCO2 |
b = x2 + k1local*x + k12 |
|
./pkg/dic/carbon_chem.F |
188 |
CALC_PCO2 |
db = 2.0*x + k1local |
|
./pkg/dic/carbon_chem.F |
193 |
CALC_PCO2 |
fn = k1local*x*diclocal/b + |
|
./pkg/dic/carbon_chem.F |
210 |
CALC_PCO2 |
df = ((k1local*diclocal*b) - k1local*x*diclocal*db)/b2 - |
|
./pkg/dic/carbon_chem.F |
22 |
CALC_PCO2 |
I k1local,k2local, |
|
./pkg/dic/carbon_chem.F |
251 |
CALC_PCO2 |
k12 = k1local*k2local |
|
./pkg/dic/carbon_chem.F |
258 |
CALC_PCO2 |
b = x2 + k1local*x + k12 |
|
./pkg/dic/carbon_chem.F |
260 |
CALC_PCO2 |
db = 2.0*x + k1local |
|
./pkg/dic/carbon_chem.F |
262 |
CALC_PCO2 |
fn = k1local*x*diclocal/b + |
|
./pkg/dic/carbon_chem.F |
304 |
CALC_PCO2 |
co2star=diclocal*htotal2/(htotal2 + k1local*htotal |
|
./pkg/dic/carbon_chem.F |
305 |
CALC_PCO2 |
& + k1local*k2local) |
|
./pkg/dic/carbon_chem.F |
341 |
CALC_PCO2_APPROX |
I k1local,k2local, |
|
./pkg/dic/carbon_chem.F |
386 |
CALC_PCO2_APPROX |
_RL k1local, k2local |
|
./pkg/dic/carbon_chem.F |
455 |
CALC_PCO2_APPROX |
stuff = (1.0 _d 0-gamm)*(1.0 _d 0-gamm)*k1local*k1local |
|
./pkg/dic/carbon_chem.F |
456 |
CALC_PCO2_APPROX |
& - 4.0 _d 0*k1local*k2local*(1.0 _d 0-2.0 _d 0*gamm) |
|
./pkg/dic/carbon_chem.F |
457 |
CALC_PCO2_APPROX |
hnew = 0.5 _d 0*( (gamm-1.0 _d 0)*k1local + sqrt(stuff) ) |
|
./pkg/dic/carbon_chem.F |
460 |
CALC_PCO2_APPROX |
& (1.0 _d 0 + (k1local/hnew) + (k1local*k2local/(hnew*hnew))) |
|
./pkg/dic/carbon_chem.F |
467 |
CALC_PCO2_APPROX |
co3local = k1local*k2local*diclocal / |
|
./pkg/dic/carbon_chem.F |
468 |
CALC_PCO2_APPROX |
& (hnew*hnew + k1local*hnew + k1local*k2local) |
|
./pkg/dic/carbon_chem.F |
63 |
CALC_PCO2 |
_RL k1local, k2local |