File |
Line number |
Procedure |
Code |
./pkg/ggl90/ggl90_calc.F |
514 |
GGL90_CALC |
& ( .5 _d 0*( surfaceForcingU(i, j, bi,bj) |
./pkg/ggl90/ggl90_calc.F |
515 |
GGL90_CALC |
& + surfaceForcingU(i+1,j, bi,bj) ) )**2 |
./pkg/kpp/kpp_calc.F |
395 |
KPP_CALC |
I work2, surfaceForcingU, surfaceForcingV, |
./model/src/external_forcing.F |
81 |
EXTERNAL_FORCING_U |
& +foFacMom*surfaceForcingU(i,j,bi,bj) |
./model/src/external_forcing_surf.F |
214 |
EXTERNAL_FORCING_SURF |
surfaceForcingU(i,j,bi,bj) = |
./model/src/ini_forcing.F |
57 |
INI_FORCING |
surfaceForcingU (i,j,bi,bj) = 0. _d 0 |
./verification/rotating_tank/code/external_forcing.F |
81 |
EXTERNAL_FORCING_U |
& +foFacMom*surfaceForcingU(i,j,bi,bj) |
./verification/tidal_basin_2d/code/external_forcing.F |
83 |
EXTERNAL_FORCING_U |
& +foFacMom*surfaceForcingU(i,j,bi,bj) |
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h |
202 |
NO PROCEDURE |
& surfaceForcingU, |
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h |
207 |
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 |
197 |
EXTERNAL_FORCING_SURF |
surfaceForcingU(i,j,bi,bj) = |
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
56 |
INI_FORCING |
surfaceForcingU(i,j,bi,bj) = 0. _d 0 |
./pkg/ebm/ebm_forcing_surf.F |
65 |
EBM_FORCING_SURF |
surfaceForcingU(i,j,bi,bj) = |
./model/inc/FFIELDS.h |
200 |
NO PROCEDURE |
& surfaceForcingU, |
./model/inc/FFIELDS.h |
205 |
NO PROCEDURE |
_RL surfaceForcingU (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |