Symbol Description Uses
k1local 22


File Line number Procedure Code
./pkg/dic/carbon_chem.F 14 CALC_PCO2 
     I                       k1local,k2local,
./pkg/dic/carbon_chem.F 180 CALC_PCO2 
            k12 = k1local*k2local
./pkg/dic/carbon_chem.F 187 CALC_PCO2 
            b = x2 + k1local*x + k12
./pkg/dic/carbon_chem.F 189 CALC_PCO2 
            db = 2.0*x + k1local
./pkg/dic/carbon_chem.F 194 CALC_PCO2 
            fn = k1local*x*diclocal/b +
./pkg/dic/carbon_chem.F 211 CALC_PCO2 
            df = ((k1local*diclocal*b) - k1local*x*diclocal*db)/b2 -
./pkg/dic/carbon_chem.F 252 CALC_PCO2 
              k12 = k1local*k2local
./pkg/dic/carbon_chem.F 259 CALC_PCO2 
              b = x2 + k1local*x + k12
./pkg/dic/carbon_chem.F 261 CALC_PCO2 
              db = 2.0*x + k1local
./pkg/dic/carbon_chem.F 263 CALC_PCO2 
              fn = k1local*x*diclocal/b +
./pkg/dic/carbon_chem.F 305 CALC_PCO2 
        co2star=diclocal*htotal2/(htotal2 + k1local*htotal
./pkg/dic/carbon_chem.F 306 CALC_PCO2 
     &            + k1local*k2local)
./pkg/dic/carbon_chem.F 339 CALC_PCO2_APPROX 
     I                       k1local,k2local,
./pkg/dic/carbon_chem.F 374 CALC_PCO2_APPROX 
        _RL  k1local, k2local
./pkg/dic/carbon_chem.F 443 CALC_PCO2_APPROX 
        stuff = (1.0-gamm)*(1.0-gamm)*k1local*k1local
./pkg/dic/carbon_chem.F 444 CALC_PCO2_APPROX 
     &          - 4.0*k1local*k2local*(1.0-2.0*gamm)
./pkg/dic/carbon_chem.F 445 CALC_PCO2_APPROX 
        hnew  = 0.5*( (gamm-1.0)*k1local + sqrt(stuff) )
./pkg/dic/carbon_chem.F 448 CALC_PCO2_APPROX 
     &   (1.0 + (k1local/hnew) + (k1local*k2local/(hnew*hnew)))
./pkg/dic/carbon_chem.F 51 CALC_PCO2 
        _RL  k1local, k2local