Symbol Description Uses
fCoriU Coriolis parameter averaged to U points 7



File Line number Procedure Code
./pkg/gmredi/gmredi_k3d.F 149 GMREDI_K3D
      _RL fCoriU(1-Olx:sNx+Olx,1-Oly:sNy+Oly)
./pkg/gmredi/gmredi_k3d.F 277 GMREDI_K3D
        fCoriU(i,j) = op5*( fCori(i,j,bi,bj)+fCori(i-1,j,bi,bj) )
./pkg/gmredi/gmredi_k3d.F 300 GMREDI_K3D
       fCoriU(i,j)=fCori(i,j,bi,bj)
./pkg/gmredi/gmredi_k3d.F 668 GMREDI_K3D
           tfluxX(i,j,k) = -fCoriU(i,j)*SlopeX(i,j,k)
./pkg/gmredi/gmredi_k3d.F 686 GMREDI_K3D
         tfluxX(i,j,k)=-fCoriU(i,j)*(SlopeX(i,j,k)-SlopeX(i,j,k+1))
./pkg/gmredi/gmredi_k3d.F 728 GMREDI_K3D
                   tfluxX(i,j,k) = -fCoriU(i,j)*maskW(i,j,k,bi,bj)
./pkg/gmredi/gmredi_k3d.F 731 GMREDI_K3D
                   tfluxX(i,j,k) = -fCoriU(i,j)*maskW(i,j,k,bi,bj)