File |
Line number |
Procedure |
Code |
./pkg/gmredi/gmredi_k3d.F |
1128 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(M4onN2, 'GM_M4_N2',0,Nr,2,bi,bj,myThid) |
./pkg/gmredi/gmredi_k3d.F |
326 |
GMREDI_K3D |
M4onN2(i,j,k)=zeroRL |
./pkg/gmredi/gmredi_k3d.F |
514 |
GMREDI_K3D |
M4onN2(i,j,k) = M4loc(i,j,k)/N2loc(i,j,k) |
./pkg/gmredi/gmredi_k3d.F |
517 |
GMREDI_K3D |
M4onN2(i,j,k) = SQRT(M4loc(i,j,k))*GM_maxslope |
./pkg/gmredi/gmredi_k3d.F |
520 |
GMREDI_K3D |
& + hfacC(i,j,k,bi,bj)*drF(k)*M4onN2(i,j,k) |
./pkg/gmredi/gmredi_k3d.F |
85 |
GMREDI_K3D |
_RL M4onN2(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |