File |
Line number |
Procedure |
Code |
./pkg/gmredi/submeso_calc_psi.F |
155 |
SUBMESO_CALC_PSI |
PsiLoc(i,j) = -subMeso_Ceff*dBuoyX_Hu(i,j) |
./pkg/gmredi/submeso_calc_psi.F |
175 |
SUBMESO_CALC_PSI |
& + mu_z*PsiLoc(i,j) |
./pkg/gmredi/submeso_calc_psi.F |
184 |
SUBMESO_CALC_PSI |
CALL DIAGNOSTICS_FILL( PsiLoc, 'SubMpsiX', |
./pkg/gmredi/submeso_calc_psi.F |
191 |
SUBMESO_CALC_PSI |
CALL WRITE_LOCAL_RL( 'subMeso_psiX','I10',1,PsiLoc, |
./pkg/gmredi/submeso_calc_psi.F |
198 |
SUBMESO_CALC_PSI |
PsiLoc(i,j) = -subMeso_Ceff*dBuoyY_Hv(i,j) |
./pkg/gmredi/submeso_calc_psi.F |
218 |
SUBMESO_CALC_PSI |
& + mu_z*PsiLoc(i,j) |
./pkg/gmredi/submeso_calc_psi.F |
225 |
SUBMESO_CALC_PSI |
CALL DIAGNOSTICS_FILL( PsiLoc, 'SubMpsiY', |
./pkg/gmredi/submeso_calc_psi.F |
230 |
SUBMESO_CALC_PSI |
CALL WRITE_LOCAL_RL( 'subMeso_psiY','I10',1,PsiLoc, |
./pkg/gmredi/submeso_calc_psi.F |
59 |
SUBMESO_CALC_PSI |
_RL PsiLoc (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |