Symbol Description Uses
da 15



File Line number Procedure Code
./pkg/fizhi/fizhi_swrad.F 1019 CLDSCALE
      _RL   dm,dt,da,t1,caib(nm,nt,na),caif(nt,na)
./pkg/fizhi/fizhi_swrad.F 1020 CLDSCALE
      parameter (dm=0.1,dt=0.30103,da=0.1,t1=-0.9031)
./pkg/fizhi/fizhi_swrad.F 1098 CLDSCALE
           fa=fa/da
./pkg/bling/bling_carbon_chem.F 180 CALC_PCO2
            da = 3.0*x2 + 2.0*k1plocal*x + k12p
./pkg/bling/bling_carbon_chem.F 209 CALC_PCO2
     &        (pt*k12p*(a - x*da))/a2 -
./pkg/bling/bling_carbon_chem.F 210 CALC_PCO2
     &        2.0*pt*k123p*da/a2 -
./pkg/bling/bling_carbon_chem.F 215 CALC_PCO2
     &        pt*x2*(3.0*a-x*da)/a2
./pkg/bling/bling_carbon_chem.F 252 CALC_PCO2
              da = 3.0*x2 + 2.0*k1plocal*x + k12p
./pkg/bling/bling_carbon_chem.F 92 CALC_PCO2
        _RL  da
./pkg/dic/carbon_chem.F 185 CALC_PCO2
            da = 3.0*x2 + 2.0*k1plocal*x + k12p
./pkg/dic/carbon_chem.F 214 CALC_PCO2
     &        (pt*k12p*(a - x*da))/a2 -
./pkg/dic/carbon_chem.F 215 CALC_PCO2
     &        2.0*pt*k123p*da/a2 -
./pkg/dic/carbon_chem.F 220 CALC_PCO2
     &        pt*x2*(3.0*a-x*da)/a2
./pkg/dic/carbon_chem.F 257 CALC_PCO2
              da = 3.0*x2 + 2.0*k1plocal*x + k12p
./pkg/dic/carbon_chem.F 97 CALC_PCO2
        _RL  da