Symbol Description Uses
hguess 36


File Line number Procedure Code
./pkg/dic/carbon_chem.F 386 CALC_PCO2_APPROX_CO3 
        _RL  hguess
./pkg/dic/carbon_chem.F 416 CALC_PCO2_APPROX_CO3 
        hguess = 10.0**(-phguess)
./pkg/dic/carbon_chem.F 418 CALC_PCO2_APPROX_CO3 
        bohg = btlocal*kblocal/(hguess+kblocal)
./pkg/dic/carbon_chem.F 422 CALC_PCO2_APPROX_CO3 
        stuff = hguess*hguess*hguess
./pkg/dic/carbon_chem.F 423 CALC_PCO2_APPROX_CO3 
     &           + (k1plocal*hguess*hguess)
./pkg/dic/carbon_chem.F 424 CALC_PCO2_APPROX_CO3 
     &           + (k1plocal*k2plocal*hguess)
./pkg/dic/carbon_chem.F 426 CALC_PCO2_APPROX_CO3 
        h3po4g = (pt*hguess*hguess*hguess) / stuff
./pkg/dic/carbon_chem.F 427 CALC_PCO2_APPROX_CO3 
        h2po4g = (pt*k1plocal*hguess*hguess) / stuff
./pkg/dic/carbon_chem.F 428 CALC_PCO2_APPROX_CO3 
        hpo4g  = (pt*k1plocal*k2plocal*hguess) / stuff
./pkg/dic/carbon_chem.F 433 CALC_PCO2_APPROX_CO3 
        siooh3g = sit*ksilocal / (ksilocal + hguess)
./pkg/dic/carbon_chem.F 436 CALC_PCO2_APPROX_CO3 
        cag = ta - bohg - (kwlocal/hguess) + hguess
./pkg/dic/carbon_chem.F 533 CALC_PCO2_APPROX 
        _RL  hguess
./pkg/dic/carbon_chem.F 563 CALC_PCO2_APPROX 
        hguess = 10.0**(-phguess)
./pkg/dic/carbon_chem.F 565 CALC_PCO2_APPROX 
        bohg = btlocal*kblocal/(hguess+kblocal)
./pkg/dic/carbon_chem.F 569 CALC_PCO2_APPROX 
        stuff = hguess*hguess*hguess
./pkg/dic/carbon_chem.F 570 CALC_PCO2_APPROX 
     &           + (k1plocal*hguess*hguess)
./pkg/dic/carbon_chem.F 571 CALC_PCO2_APPROX 
     &           + (k1plocal*k2plocal*hguess)
./pkg/dic/carbon_chem.F 573 CALC_PCO2_APPROX 
        h3po4g = (pt*hguess*hguess*hguess) / stuff
./pkg/dic/carbon_chem.F 574 CALC_PCO2_APPROX 
        h2po4g = (pt*k1plocal*hguess*hguess) / stuff
./pkg/dic/carbon_chem.F 575 CALC_PCO2_APPROX 
        hpo4g  = (pt*k1plocal*k2plocal*hguess) / stuff
./pkg/dic/carbon_chem.F 580 CALC_PCO2_APPROX 
        siooh3g = sit*ksilocal / (ksilocal + hguess)
./pkg/dic/carbon_chem.F 583 CALC_PCO2_APPROX 
        cag = ta - bohg - (kwlocal/hguess) + hguess