Symbol Description Uses
hguess 18


File Line number Procedure Code
./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