Symbol Description Uses
hguess 36


File Line number Procedure Code
./pkg/dic/carbon_chem.F 383 CALC_PCO2_APPROX_CO3 
        _RL  hguess
./pkg/dic/carbon_chem.F 413 CALC_PCO2_APPROX_CO3 
        hguess = 10.0**(-phguess)
./pkg/dic/carbon_chem.F 415 CALC_PCO2_APPROX_CO3 
        bohg = btlocal*kblocal/(hguess+kblocal)
./pkg/dic/carbon_chem.F 419 CALC_PCO2_APPROX_CO3 
        stuff = hguess*hguess*hguess
./pkg/dic/carbon_chem.F 420 CALC_PCO2_APPROX_CO3 
     &           + (k1plocal*hguess*hguess)
./pkg/dic/carbon_chem.F 421 CALC_PCO2_APPROX_CO3 
     &           + (k1plocal*k2plocal*hguess)
./pkg/dic/carbon_chem.F 423 CALC_PCO2_APPROX_CO3 
        h3po4g = (pt*hguess*hguess*hguess) / stuff
./pkg/dic/carbon_chem.F 424 CALC_PCO2_APPROX_CO3 
        h2po4g = (pt*k1plocal*hguess*hguess) / stuff
./pkg/dic/carbon_chem.F 425 CALC_PCO2_APPROX_CO3 
        hpo4g  = (pt*k1plocal*k2plocal*hguess) / stuff
./pkg/dic/carbon_chem.F 430 CALC_PCO2_APPROX_CO3 
        siooh3g = sit*ksilocal / (ksilocal + hguess)
./pkg/dic/carbon_chem.F 433 CALC_PCO2_APPROX_CO3 
        cag = ta - bohg - (kwlocal/hguess) + hguess
./pkg/dic/carbon_chem.F 519 CALC_PCO2_APPROX 
        _RL  hguess
./pkg/dic/carbon_chem.F 549 CALC_PCO2_APPROX 
        hguess = 10.0**(-phguess)
./pkg/dic/carbon_chem.F 551 CALC_PCO2_APPROX 
        bohg = btlocal*kblocal/(hguess+kblocal)
./pkg/dic/carbon_chem.F 555 CALC_PCO2_APPROX 
        stuff = hguess*hguess*hguess
./pkg/dic/carbon_chem.F 556 CALC_PCO2_APPROX 
     &           + (k1plocal*hguess*hguess)
./pkg/dic/carbon_chem.F 557 CALC_PCO2_APPROX 
     &           + (k1plocal*k2plocal*hguess)
./pkg/dic/carbon_chem.F 559 CALC_PCO2_APPROX 
        h3po4g = (pt*hguess*hguess*hguess) / stuff
./pkg/dic/carbon_chem.F 560 CALC_PCO2_APPROX 
        h2po4g = (pt*k1plocal*hguess*hguess) / stuff
./pkg/dic/carbon_chem.F 561 CALC_PCO2_APPROX 
        hpo4g  = (pt*k1plocal*k2plocal*hguess) / stuff
./pkg/dic/carbon_chem.F 566 CALC_PCO2_APPROX 
        siooh3g = sit*ksilocal / (ksilocal + hguess)
./pkg/dic/carbon_chem.F 569 CALC_PCO2_APPROX 
        cag = ta - bohg - (kwlocal/hguess) + hguess