File |
Line number |
Procedure |
Code |
./pkg/kpp/kpp_calc.F |
396 |
KPP_CALC |
I surfaceForcingT, surfaceForcingS, surfaceForcingTice, |
./pkg/kpp/kpp_transport_t.F |
80 |
KPP_TRANSPORT_T |
& *( surfaceForcingT(i,j,bi,bj) |
./pkg/kpp/kpp_transport_t.F |
95 |
KPP_TRANSPORT_T |
& *( surfaceForcingT(i,j,bi,bj) |
./pkg/offline/offline_fields_load.F |
375 |
OFFLINE_FIELDS_LOAD |
surfaceForcingT(i,j,bi,bj) = bWght*hflx0(i,j,bi,bj) |
./pkg/offline/offline_fields_load.F |
377 |
OFFLINE_FIELDS_LOAD |
surfaceForcingT(i,j,bi,bj) = surfaceForcingT(i,j,bi,bj) |
./model/src/diags_oceanic_surf_flux.F |
102 |
DIAGS_OCEANIC_SURF_FLUX |
CALL DIAGNOSTICS_SCALE_FILL( surfaceForcingT,tmpFac,1, |
./model/src/diags_oceanic_surf_flux.F |
120 |
DIAGS_OCEANIC_SURF_FLUX |
& (surfaceForcingT(i,j,bi,bj)+surfaceForcingTice(i,j,bi,bj)) |
./model/src/external_forcing.F |
324 |
EXTERNAL_FORCING_T |
& +surfaceForcingT(i,j,bi,bj) |
./model/src/external_forcing_surf.F |
101 |
EXTERNAL_FORCING_SURF |
surfaceForcingT(i,j,bi,bj) = |
./model/src/external_forcing_surf.F |
125 |
EXTERNAL_FORCING_SURF |
surfaceForcingT(i,j,bi,bj) = surfaceForcingT(i,j,bi,bj) |
./model/src/external_forcing_surf.F |
136 |
EXTERNAL_FORCING_SURF |
surfaceForcingT(i,j,bi,bj) = surfaceForcingT(i,j,bi,bj) |
./model/src/external_forcing_surf.F |
153 |
EXTERNAL_FORCING_SURF |
surfaceForcingT(i,j,bi,bj) = surfaceForcingT(i,j,bi,bj) |
./model/src/external_forcing_surf.F |
170 |
EXTERNAL_FORCING_SURF |
& surfaceForcingT(1-OLx,1-OLy,bi,bj),tmpFac,1, |
./model/src/external_forcing_surf.F |
187 |
EXTERNAL_FORCING_SURF |
surfaceForcingT(i,j,bi,bj) = 0. _d 0 |
./model/src/external_forcing_surf.F |
220 |
EXTERNAL_FORCING_SURF |
surfaceForcingT(i,j,bi,bj) = surfaceForcingT(i,j,bi,bj) |
./model/src/external_forcing_surf.F |
278 |
EXTERNAL_FORCING_SURF |
surfaceForcingT(i,j,bi,bj) = surfaceForcingT(i,j,bi,bj) |
./model/src/external_forcing_surf.F |
313 |
EXTERNAL_FORCING_SURF |
surfaceForcingT(i,j,bi,bj) = surfaceForcingT(i,j,bi,bj) |
./model/src/external_forcing_surf.F |
339 |
EXTERNAL_FORCING_SURF |
surfaceForcingT(i,j,bi,bj) = surfaceForcingT(i,j,bi,bj) |
./model/src/external_forcing_surf.F |
85 |
EXTERNAL_FORCING_SURF |
surfaceForcingT(i,j,bi,bj) = |
./pkg/timeave/timeave_surf_flux.F |
71 |
TIMEAVE_SURF_FLUX |
& (surfaceForcingT(i,j,bi,bj)+surfaceForcingTice(I,J,bi,bj)) |
./model/src/ini_forcing.F |
59 |
INI_FORCING |
surfaceForcingT (i,j,bi,bj) = 0. _d 0 |
./verification/rotating_tank/code/external_forcing.F |
325 |
EXTERNAL_FORCING_T |
& +surfaceForcingT(i,j,bi,bj) |
./verification/tidal_basin_2d/code/external_forcing.F |
313 |
EXTERNAL_FORCING_T |
& +surfaceForcingT(i,j,bi,bj) |
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h |
204 |
NO PROCEDURE |
& surfaceForcingT, |
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h |
209 |
NO PROCEDURE |
_RL surfaceForcingT (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
101 |
EXTERNAL_FORCING_SURF |
surfaceForcingT(i,j,bi,bj) = |
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
125 |
EXTERNAL_FORCING_SURF |
surfaceForcingT(i,j,bi,bj) = surfaceForcingT(i,j,bi,bj) |
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
136 |
EXTERNAL_FORCING_SURF |
surfaceForcingT(i,j,bi,bj) = surfaceForcingT(i,j,bi,bj) |
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
153 |
EXTERNAL_FORCING_SURF |
& surfaceForcingT(1-OLx,1-OLy,bi,bj),tmpFac,1, |
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
170 |
EXTERNAL_FORCING_SURF |
surfaceForcingT(i,j,bi,bj) = 0. _d 0 |
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
203 |
EXTERNAL_FORCING_SURF |
surfaceForcingT(i,j,bi,bj) = surfaceForcingT(i,j,bi,bj) |
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
264 |
EXTERNAL_FORCING_SURF |
surfaceForcingT(i,j,bi,bj) = surfaceForcingT(i,j,bi,bj) |
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
299 |
EXTERNAL_FORCING_SURF |
surfaceForcingT(i,j,bi,bj) = surfaceForcingT(i,j,bi,bj) |
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
325 |
EXTERNAL_FORCING_SURF |
surfaceForcingT(i,j,bi,bj) = surfaceForcingT(i,j,bi,bj) |
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
85 |
EXTERNAL_FORCING_SURF |
surfaceForcingT(i,j,bi,bj) = |
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
58 |
INI_FORCING |
surfaceForcingT(i,j,bi,bj) = 0. _d 0 |
./pkg/ebm/ebm_forcing_surf.F |
73 |
EBM_FORCING_SURF |
surfaceForcingT(i,j,bi,bj) = |
./model/inc/FFIELDS.h |
202 |
NO PROCEDURE |
& surfaceForcingT, |
./model/inc/FFIELDS.h |
207 |
NO PROCEDURE |
_RL surfaceForcingT (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |