| File |
Line number |
Procedure |
Code |
|
./pkg/gmredi/gmredi_k3d.F |
1039 |
GMREDI_K3D |
ustar(i,j,k) = -RenormU(i,j)*Xix(i,j,k)/coriU(i,j) |
|
./pkg/gmredi/gmredi_k3d.F |
1107 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(Xix, 'GM_Xix ',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
204 |
GMREDI_K3D |
_RL Xix( 1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
|
./pkg/gmredi/gmredi_k3d.F |
838 |
GMREDI_K3D |
Xix(i,j,k) = -maskW(i,j,k,bi,bj)*KPV(i,j,k)*gradqx(i,j,k) |
|
./pkg/gmredi/gmredi_k3d.F |
885 |
GMREDI_K3D |
Xix(i,j,k) = zeroRL |
|
./pkg/gmredi/gmredi_k3d.F |
893 |
GMREDI_K3D |
Xix(i,j,k) = Xix(i,j,k) |
|
./pkg/gmredi/gmredi_k3d.F |
997 |
GMREDI_K3D |
centreX = op5*(Xix(i,j,k) + Xix(i+1,j,k)) |