Symbol Description Uses
ak0 23



File Line number Procedure Code
./pkg/bling/BLING_VARS.h 33 NO PROCEDURE
     &                     ak0,ak1,ak2,akw,akb,aks,akf,
./pkg/bling/BLING_VARS.h 37 NO PROCEDURE
      _RL  ak0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./pkg/bling/bling_airseaflux.F 171 BLING_AIRSEAFLUX
     I        ak0(i,j,bi,bj), fugf(i,j,bi,bj),
./pkg/bling/bling_airseaflux.F 222 BLING_AIRSEAFLUX
     &            *ak0(i,j,bi,bj) )
./pkg/bling/bling_carbon_chem.F 1079 CARBON_COEFFS_PRESSURE_DEP
            ak0(i,j,bi,bj)= 0.d0
./pkg/bling/bling_carbon_chem.F 621 CARBON_COEFFS
           ak0(i,j,bi,bj) = exp(93.4517 _d 0/tk100 - 60.2409 _d 0 +
./pkg/bling/bling_carbon_chem.F 706 CARBON_COEFFS
            ak0(i,j,bi,bj)= 0. _d 0
./pkg/bling/bling_carbon_chem.F 918 CARBON_COEFFS_PRESSURE_DEP
           ak0(i,j,bi,bj) = exp(93.4517/tk100 - 60.2409 +
./pkg/bling/bling_carbonate_init.F 128 BLING_CARBONATE_INIT
          ak0(i,j,bi,bj)=0. _d 0
./pkg/bling/bling_carbonate_init.F 206 BLING_CARBONATE_INIT
     I        ak0(i,j,bi,bj), fugf(i,j,bi,bj),
./pkg/bling/bling_carbonate_sys.F 138 BLING_CARBONATE_SYS
     I          ak0(i,j,bi,bj), fugf(i,j,bi,bj), ff(i,j,bi,bj),
./pkg/dic/DIC_VARS.h 25 NO PROCEDURE
     &                     ak0,ak1,ak2,akw,akb,aks,akf,
./pkg/dic/DIC_VARS.h 28 NO PROCEDURE
      _RL  ak0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./pkg/dic/calcite_saturation.F 116 CALCITE_SATURATION
     I          ak0(i,j,bi,bj), fugf(i,j,bi,bj), ff(i,j,bi,bj),
./pkg/dic/carbon_chem.F 1047 CARBON_COEFFS_PRESSURE_DEP
            ak0(i,j,bi,bj)= 0.d0
./pkg/dic/carbon_chem.F 625 CARBON_COEFFS
           ak0(i,j,bi,bj) = exp(93.4517 _d 0/tk100 - 60.2409 _d 0 +
./pkg/dic/carbon_chem.F 710 CARBON_COEFFS
            ak0(i,j,bi,bj)= 0. _d 0
./pkg/dic/carbon_chem.F 894 CARBON_COEFFS_PRESSURE_DEP
           ak0(i,j,bi,bj) = exp(93.4517/tk100 - 60.2409 +
./pkg/dic/dic_surfforcing.F 167 DIC_SURFFORCING
     I        ak0(i,j,bi,bj), fugf(i,j,bi,bj),
./pkg/dic/dic_surfforcing.F 208 DIC_SURFFORCING
     &         ak0(i,j,bi,bj)*pCO2sat(i,j) -
./pkg/dic/dic_surfforcing.F 219 DIC_SURFFORCING
     &            *ak0(i,j,bi,bj) )
./pkg/dic/dic_surfforcing_init.F 135 DIC_SURFFORCING_INIT
          ak0(i,j,bi,bj)=0. _d 0
./pkg/dic/dic_surfforcing_init.F 237 DIC_SURFFORCING_INIT
     I        ak0(i,j,bi,bj), fugf(i,j,bi,bj),