Symbol Description Uses
omegaC 14



File Line number Procedure Code
./pkg/bling/BLING_VARS.h 195 NO PROCEDURE
     &                     omegaC,
./pkg/bling/BLING_VARS.h 271 NO PROCEDURE
      _RL omegaC(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
./pkg/bling/bling_carbonate_sys.F 148 BLING_CARBONATE_SYS
             omegaC(i,j,k,bi,bj) = calcium * carbonate /
./pkg/bling/bling_carbonate_sys.F 156 BLING_CARBONATE_SYS
             omegaC(i,j,k,bi,bj)  = 0. _d 0
./pkg/bling/bling_init_varia.F 43 BLING_INIT_VARIA
            omegaC(i,j,k,bi,bj)     = 0. _d 0
./pkg/bling/bling_remineralization.F 180 BLING_REMIN
     &               omegaC(i,j,k,bi,bj) + epsln ))
./pkg/dic/DIC_VARS.h 127 NO PROCEDURE
     &     par, alpha, rain_ratio, InputFe, omegaC, CHL,
./pkg/dic/DIC_VARS.h 163 NO PROCEDURE
      _RL omegaC(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
./pkg/dic/calcite_saturation.F 128 CALCITE_SATURATION
             omegaC(i,j,k,bi,bj) = calcium * carbonate /
./pkg/dic/calcite_saturation.F 156 CALCITE_SATURATION
             omegaC(i,j,k,bi,bj) = 0. _d 0
./pkg/dic/car_flux_omega_top.F 103 CAR_FLUX_OMEGA_TOP
              if (omegaC(i,j,ko,bi,bj) .gt. 1.0) then
./pkg/dic/car_flux_omega_top.F 121 CAR_FLUX_OMEGA_TOP
                 KierRate = 7.177* ((1.0-omegaC(i,j,ko,bi,bj))**4.54)
./pkg/dic/car_flux_omega_top.F 159 CAR_FLUX_OMEGA_TOP
                if (iflx.eq.1.and.omegaC(i,j,k,bi,bj) .gt. 1.d0) then
./pkg/dic/dic_init_varia.F 67 DIC_INIT_VARIA
            omegaC(i,j,k,bi,bj) =  0. _d 0