Symbol Description Uses
delta_dens 5



File Line number Procedure Code
./pkg/bling/bling_mixedlayer.F 100 BLING_MIXEDLAYER
            IF (delta_dens(i,j,k) .LT. 0.03 _d 0) THEN
./pkg/bling/bling_mixedlayer.F 52 BLING_MIXEDLAYER
      _RL delta_dens(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/bling/bling_mixedlayer.F 76 BLING_MIXEDLAYER
              delta_dens(i,j,1) = 0. _d 0
./pkg/bling/bling_mixedlayer.F 78 BLING_MIXEDLAYER
              delta_dens(i,j,k) = 9999. _d 0
./pkg/bling/bling_mixedlayer.F 99 BLING_MIXEDLAYER
            delta_dens(i,j,k) = dens_z(i,j)-dens_surf(i,j)