Symbol Description Uses
hguess 18


File Line number Procedure Code
./pkg/dic/carbon_chem.F 383 CALC_PCO2_APPROX 
        _RL  hguess
./pkg/dic/carbon_chem.F 411 CALC_PCO2_APPROX 
        hguess = 10.0**(-phguess)
./pkg/dic/carbon_chem.F 413 CALC_PCO2_APPROX 
        bohg = btlocal*kblocal/(hguess+kblocal)
./pkg/dic/carbon_chem.F 417 CALC_PCO2_APPROX 
        stuff = hguess*hguess*hguess
./pkg/dic/carbon_chem.F 418 CALC_PCO2_APPROX 
     &           + (k1plocal*hguess*hguess)
./pkg/dic/carbon_chem.F 419 CALC_PCO2_APPROX 
     &           + (k1plocal*k2plocal*hguess)
./pkg/dic/carbon_chem.F 421 CALC_PCO2_APPROX 
        h3po4g = (pt*hguess*hguess*hguess) / stuff
./pkg/dic/carbon_chem.F 422 CALC_PCO2_APPROX 
        h2po4g = (pt*k1plocal*hguess*hguess) / stuff
./pkg/dic/carbon_chem.F 423 CALC_PCO2_APPROX 
        hpo4g  = (pt*k1plocal*k2plocal*hguess) / stuff
./pkg/dic/carbon_chem.F 428 CALC_PCO2_APPROX 
        siooh3g = sit*ksilocal / (ksilocal + hguess)
./pkg/dic/carbon_chem.F 431 CALC_PCO2_APPROX 
        cag = ta - bohg - (kwlocal/hguess) + hguess