File |
Line number |
Procedure |
Code |
./pkg/gmredi/gmredi_k3d.F |
1020 |
GMREDI_K3D |
Renorm(i,j) = ABS(numerator/denominator) |
./pkg/gmredi/gmredi_k3d.F |
1021 |
GMREDI_K3D |
Renorm(i,j) = MAX(Renorm(i,j),GM_K3D_minRenorm) |
./pkg/gmredi/gmredi_k3d.F |
1022 |
GMREDI_K3D |
Renorm(i,j) = MIN(Renorm(i,j),GM_K3D_maxRenorm) |
./pkg/gmredi/gmredi_k3d.F |
1030 |
GMREDI_K3D |
RenormU(i,j) = op5*(Renorm(i-1,j)+Renorm(i,j)) |
./pkg/gmredi/gmredi_k3d.F |
1031 |
GMREDI_K3D |
RenormV(i,j) = op5*(Renorm(i,j-1)+Renorm(i,j)) |
./pkg/gmredi/gmredi_k3d.F |
1130 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(Renorm, 'GM_RENRM',0, 1,2,bi,bj,myThid) |
./pkg/gmredi/gmredi_k3d.F |
176 |
GMREDI_K3D |
_RL Renorm(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_k3d.F |
965 |
GMREDI_K3D |
Renorm(i,j)=oneRL |