| File |
Line number |
Procedure |
Code |
|
./pkg/gmredi/gmredi_k3d.F |
1048 |
GMREDI_K3D |
vstar(i,j,k) = -RenormV(i,j)*Xiy(i,j,k)/coriV(i,j) |
|
./pkg/gmredi/gmredi_k3d.F |
1060 |
GMREDI_K3D |
psistar(i,j,Nr) = -hfacS(i,j,k,bi,bj)*drF(k)*vstar(i,j,k) |
|
./pkg/gmredi/gmredi_k3d.F |
1067 |
GMREDI_K3D |
& - hfacS(i,j,k,bi,bj)*drF(k)*vstar(i,j,k) |
|
./pkg/gmredi/gmredi_k3d.F |
1079 |
GMREDI_K3D |
GM_PsiY(i,j,k,bi,bj) = -hfacS(i,j,k,bi,bj)*drF(k)*vstar(i,j,k) |
|
./pkg/gmredi/gmredi_k3d.F |
1088 |
GMREDI_K3D |
& - hfacS(i,j,k,bi,bj)*drF(k)*vstar(i,j,k) |
|
./pkg/gmredi/gmredi_k3d.F |
1122 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(vstar, 'GM_VSTAR',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
203 |
GMREDI_K3D |
_RL vstar(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1:Nr) |
|
./pkg/gmredi/gmredi_residual_flow.F |
116 |
GMREDI_RESIDUAL_FLOW |
vstar = delPsi*recip_drF(k)*_recip_hFacS(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_residual_flow.F |
117 |
GMREDI_RESIDUAL_FLOW |
vEulerMean(i,j,k,bi,bj) = vVel(i,j,k,bi,bj) - vstar |
|
./pkg/gmredi/gmredi_residual_flow.F |
53 |
GMREDI_RESIDUAL_FLOW |
_RL ustar, vstar |