| File |
Line number |
Procedure |
Code |
|
./model/inc/FFIELDS.h |
241 |
NO PROCEDURE |
& surfaceForcingU, |
|
./model/inc/FFIELDS.h |
246 |
NO PROCEDURE |
_RL surfaceForcingU (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/ggl90/ggl90_calc.F |
634 |
GGL90_CALC |
& ( .5 _d 0*( surfaceForcingU(i, j, bi,bj) |
|
./pkg/ggl90/ggl90_calc.F |
635 |
GGL90_CALC |
& + surfaceForcingU(i+1,j, bi,bj) ) )**2 |
|
./pkg/ggl90/ggl90_calc.F |
808 |
GGL90_CALC |
& halfRL*( surfaceForcingU(i, j,bi,bj)*uVel(i ,j,k,bi,bj) |
|
./pkg/ggl90/ggl90_calc.F |
809 |
GGL90_CALC |
& +surfaceForcingU(i+1,j,bi,bj)*uVel(i+1,j,k,bi,bj)) |
|
./model/src/apply_forcing.F |
148 |
APPLY_FORCING_U |
& +foFacMom*surfaceForcingU(i,j,bi,bj) |
|
./model/src/apply_forcing.F |
157 |
APPLY_FORCING_U |
& +foFacMom*surfaceForcingU(i,j,bi,bj) |
|
./pkg/kpp/kpp_calc.F |
433 |
KPP_CALC |
I work2, surfaceForcingU, surfaceForcingV, |
|
./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 |
210 |
EXTERNAL_FORCING_SURF |
surfaceForcingU(i,j,bi,bj) = fu(i,j,bi,bj)*mass2rUnit |
|
./pkg/shelfice/shelfice_forcing_surf.F |
69 |
SHELFICE_FORCING_SURF |
surfaceForcingU(i,j,bi,bj) = 0. |
|
./model/src/ini_ffields.F |
126 |
INI_FFIELDS |
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 |
246 |
NO PROCEDURE |
& surfaceForcingU, |
|
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h |
251 |
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 |
210 |
EXTERNAL_FORCING_SURF |
surfaceForcingU(i,j,bi,bj) = fu(i,j,bi,bj)*mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
59 |
INI_FORCING |
surfaceForcingU(i,j,bi,bj) = 0. _d 0 |
|
./verification/tutorial_global_oce_optim/code_oad/FFIELDS.h |
246 |
NO PROCEDURE |
& surfaceForcingU, |
|
./verification/tutorial_global_oce_optim/code_oad/FFIELDS.h |
251 |
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 |
210 |
EXTERNAL_FORCING_SURF |
surfaceForcingU(i,j,bi,bj) = fu(i,j,bi,bj)*mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
59 |
INI_FORCING |
surfaceForcingU(i,j,bi,bj) = 0. _d 0 |