Symbol Description Uses
fCori Coriolis parameter at grid Center point 19



File Line number Procedure Code
./pkg/gmredi/gmredi_calc_tensor.F 108 GMREDI_CALC_TENSOR
         fCoriLoc = op5*(fCori(i-1,j,bi,bj)+fCori(i,j,bi,bj))
./pkg/gmredi/gmredi_calc_tensor.F 123 GMREDI_CALC_TENSOR
         fCoriLoc = op5*(fCori(i,j-1,bi,bj)+fCori(i,j,bi,bj))
./pkg/gmredi/gmredi_calc_tensor.F 96 GMREDI_CALC_TENSOR
         IF (fCori(i,j,bi,bj).NE.0.) THEN
./pkg/gmredi/gmredi_calc_tensor.F 97 GMREDI_CALC_TENSOR
           ldd97_LrhoC(i,j) = Cspd/ABS(fCori(i,j,bi,bj))