Symbol Description Uses
kLow_C Local version of the index of deepest wet grid cell on tracer grid 14


File Line number Procedure Code
./pkg/gmredi/gmredi_k3d.F 224 GMREDI_K3D 
        kLow_C(i,j) = kLowC(i,j,bi,bj)
./pkg/gmredi/gmredi_k3d.F 229 GMREDI_K3D 
        kLow_U(i,j) = MIN( kLow_C(i,j), kLow_C(i-1,j) )
./pkg/gmredi/gmredi_k3d.F 234 GMREDI_K3D 
        kLow_V(i,j) = MIN( kLow_C(i,j), kLow_C(i,j-1) )
./pkg/gmredi/gmredi_k3d.F 412 GMREDI_K3D 
        IF (kLow_C(i,j).GT.0) THEN
./pkg/gmredi/gmredi_k3d.F 423 GMREDI_K3D 
         IF (k.LT.kLow_C(i,j)) THEN
./pkg/gmredi/gmredi_k3d.F 426 GMREDI_K3D 
         ELSEIF (k.EQ.kLow_C(i,j)) THEN
./pkg/gmredi/gmredi_k3d.F 443 GMREDI_K3D 
     I       kLow_C, maskC(:,:,:,bi,bj),
./pkg/gmredi/gmredi_k3d.F 477 GMREDI_K3D 
         IF (k.NE.kLow_C(i,j)) THEN
./pkg/gmredi/gmredi_k3d.F 495 GMREDI_K3D 
         IF ( (kLow_C(i,j).GE.k) .AND.
./pkg/gmredi/gmredi_k3d.F 543 GMREDI_K3D 
        k=kLow_C(i,j)
./pkg/gmredi/gmredi_k3d.F 574 GMREDI_K3D 
         IF (k.LE.kLow_C(i,j)) THEN
./pkg/gmredi/gmredi_k3d.F 61 GMREDI_K3D 
      INTEGER kLow_C(1-Olx:sNx+Olx,1-Oly:sNy+Oly)