| File |
Line number |
Procedure |
Code |
|
./model/inc/FFIELDS.h |
151 |
NO PROCEDURE |
COMMON /FFIELDS_eddyPsi_RS/ eddyPsiX, eddyPsiY |
|
./model/inc/FFIELDS.h |
153 |
NO PROCEDURE |
_RS eddyPsiY (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/gmredi/gmredi_calc_psi_b.F |
187 |
GMREDI_CALC_PSI_B |
& +eddyPsiY(i,j,k,bi,bj)*maskS(i,j,k,bi,bj) |
|
./model/src/calc_eddy_stress.F |
63 |
CALC_EDDY_STRESS |
psiy = op25*(eddyPsiY(i, j ,k,bi,bj) |
|
./model/src/calc_eddy_stress.F |
64 |
CALC_EDDY_STRESS |
& +eddyPsiY(i, j+1,k,bi,bj) |
|
./model/src/calc_eddy_stress.F |
65 |
CALC_EDDY_STRESS |
& +eddyPsiY(i-1,j ,k,bi,bj) |
|
./model/src/calc_eddy_stress.F |
66 |
CALC_EDDY_STRESS |
& +eddyPsiY(i-1,j+1,k,bi,bj)) |
|
./model/src/ini_ffields.F |
113 |
INI_FFIELDS |
eddyPsiY (i,j,k,bi,bj) = 0. _d 0 |
|
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h |
156 |
NO PROCEDURE |
COMMON /FFIELDS_eddyPsi_RS/ eddyPsiX, eddyPsiY |
|
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h |
158 |
NO PROCEDURE |
_RS eddyPsiY (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./verification/tutorial_global_oce_optim/code_oad/FFIELDS.h |
156 |
NO PROCEDURE |
COMMON /FFIELDS_eddyPsi_RS/ eddyPsiX, eddyPsiY |
|
./verification/tutorial_global_oce_optim/code_oad/FFIELDS.h |
158 |
NO PROCEDURE |
_RS eddyPsiY (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./model/src/taueddy_init_varia.F |
47 |
TAUEDDY_INIT_VARIA |
eddyPsiY(i,j,k,bi,bj)=0. |
|
./model/src/taueddy_init_varia.F |
60 |
TAUEDDY_INIT_VARIA |
& eddyPsiY, nIter0, myThid ) |
|
./model/src/taueddy_init_varia.F |
63 |
TAUEDDY_INIT_VARIA |
CALL EXCH_UV_XYZ_RS(eddyPsiX,eddyPsiY,.TRUE.,myThid) |
|
./pkg/ctrl/ctrl_map_ini.F |
430 |
CTRL_MAP_INI |
eddyPsiY(i,j,k,bi,bj) = eddyPsiY(i,j,k,bi,bj) + |
|
./pkg/ctrl/ctrl_map_ini.F |
599 |
CTRL_MAP_INI |
CALL EXCH_UV_XYZ_RS(eddyPsiX,eddyPsiY,.TRUE.,myThid) |
|
./pkg/ctrl/ctrl_map_ini_ecco.F |
248 |
CTRL_MAP_INI_ECCO |
& xx_edtauy_dummy, boundsVec, eddyPsiY, masks, paramSmooth, |
|
./pkg/ctrl/ctrl_map_ini_ecco.F |
251 |
CTRL_MAP_INI_ECCO |
CALL EXCH_UV_XYZ_RS(eddyPsiX,eddyPsiY,.TRUE.,myThid) |