| File |
Line number |
Procedure |
Code |
|
./pkg/ggl90/ggl90_calc.F |
515 |
GGL90_CALC |
& ( .5 _d 0*( surfaceForcingU(i, j, bi,bj) |
|
./pkg/ggl90/ggl90_calc.F |
516 |
GGL90_CALC |
& + surfaceForcingU(i+1,j, bi,bj) ) )**2 |
|
./pkg/kpp/kpp_calc.F |
427 |
KPP_CALC |
I work2, surfaceForcingU, surfaceForcingV, |
|
./model/src/apply_forcing.F |
136 |
APPLY_FORCING_U |
& +foFacMom*surfaceForcingU(i,j,bi,bj) |
|
./model/src/apply_forcing.F |
145 |
APPLY_FORCING_U |
& +foFacMom*surfaceForcingU(i,j,bi,bj) |
|
./model/src/external_forcing.F |
108 |
EXTERNAL_FORCING_U |
& +foFacMom*surfaceForcingU(i,j,bi,bj) |
|
./model/src/external_forcing.F |
99 |
EXTERNAL_FORCING_U |
& +foFacMom*surfaceForcingU(i,j,bi,bj) |
|
./model/src/external_forcing_surf.F |
207 |
EXTERNAL_FORCING_SURF |
surfaceForcingU(i,j,bi,bj) = fu(i,j,bi,bj)*mass2rUnit |
|
./model/src/ini_forcing.F |
60 |
INI_FORCING |
surfaceForcingU (i,j,bi,bj) = 0. _d 0 |
|
./verification/rotating_tank/code/apply_forcing.F |
127 |
APPLY_FORCING_U |
& +foFacMom*surfaceForcingU(i,j,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
136 |
APPLY_FORCING_U |
& +foFacMom*surfaceForcingU(i,j,bi,bj) |
|
./verification/tidal_basin_2d/code/external_forcing.F |
72 |
EXTERNAL_FORCING_U |
& +foFacMom*surfaceForcingU(i,j,bi,bj) |
|
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h |
208 |
NO PROCEDURE |
& surfaceForcingU, |
|
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h |
213 |
NO PROCEDURE |
_RL surfaceForcingU (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
204 |
EXTERNAL_FORCING_SURF |
surfaceForcingU(i,j,bi,bj) = fu(i,j,bi,bj)*mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
56 |
INI_FORCING |
surfaceForcingU(i,j,bi,bj) = 0. _d 0 |
|
./verification/tutorial_global_oce_optim/code_oad/FFIELDS.h |
208 |
NO PROCEDURE |
& surfaceForcingU, |
|
./verification/tutorial_global_oce_optim/code_oad/FFIELDS.h |
213 |
NO PROCEDURE |
_RL surfaceForcingU (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
204 |
EXTERNAL_FORCING_SURF |
surfaceForcingU(i,j,bi,bj) = fu(i,j,bi,bj)*mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
56 |
INI_FORCING |
surfaceForcingU(i,j,bi,bj) = 0. _d 0 |
|
./model/inc/FFIELDS.h |
225 |
NO PROCEDURE |
& surfaceForcingU, |
|
./model/inc/FFIELDS.h |
230 |
NO PROCEDURE |
_RL surfaceForcingU (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |