| File |
Line number |
Procedure |
Code |
|
./pkg/kpp/kpp_calc.F |
396 |
KPP_CALC |
I surfaceForcingT, surfaceForcingS, surfaceForcingTice, |
|
./pkg/kpp/kpp_transport_s.F |
106 |
KPP_TRANSPORT_S |
& *( surfaceForcingS(i,j,bi,bj) |
|
./pkg/kpp/kpp_transport_s.F |
90 |
KPP_TRANSPORT_S |
& *( surfaceForcingS(i,j,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
379 |
OFFLINE_FIELDS_LOAD |
surfaceForcingS(i,j,bi,bj) = bWght*sflx0(i,j,bi,bj) |
|
./pkg/offline/offline_fields_load.F |
381 |
OFFLINE_FIELDS_LOAD |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./model/src/diags_oceanic_surf_flux.F |
107 |
DIAGS_OCEANIC_SURF_FLUX |
CALL DIAGNOSTICS_SCALE_FILL( surfaceForcingS,tmpFac,1, |
|
./model/src/diags_oceanic_surf_flux.F |
147 |
DIAGS_OCEANIC_SURF_FLUX |
& surfaceForcingS(i,j,bi,bj)*rUnit2mass |
|
./pkg/salt_plume/salt_plume_forcing_surf.F |
59 |
SALT_PLUME_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./model/src/external_forcing.F |
508 |
EXTERNAL_FORCING_S |
& +surfaceForcingS(i,j,bi,bj) |
|
./model/src/external_forcing_surf.F |
106 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = |
|
./model/src/external_forcing_surf.F |
127 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./model/src/external_forcing_surf.F |
141 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./model/src/external_forcing_surf.F |
155 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./model/src/external_forcing_surf.F |
176 |
EXTERNAL_FORCING_SURF |
& surfaceForcingS(1-OLx,1-OLy,bi,bj),tmpFac,1, |
|
./model/src/external_forcing_surf.F |
188 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = 0. _d 0 |
|
./model/src/external_forcing_surf.F |
200 |
EXTERNAL_FORCING_SURF |
relaxForcingS(i,j) = surfaceForcingS(i,j,bi,bj) |
|
./model/src/external_forcing_surf.F |
227 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./model/src/external_forcing_surf.F |
289 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./model/src/external_forcing_surf.F |
324 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./model/src/external_forcing_surf.F |
350 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./model/src/external_forcing_surf.F |
90 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = |
|
./pkg/timeave/timeave_surf_flux.F |
94 |
TIMEAVE_SURF_FLUX |
& surfaceForcingS(i,j,bi,bj)*rUnit2mass |
|
./model/src/ini_forcing.F |
60 |
INI_FORCING |
surfaceForcingS (i,j,bi,bj) = 0. _d 0 |
|
./verification/rotating_tank/code/external_forcing.F |
509 |
EXTERNAL_FORCING_S |
& +surfaceForcingS(i,j,bi,bj) |
|
./verification/tidal_basin_2d/code/external_forcing.F |
430 |
EXTERNAL_FORCING_S |
& +surfaceForcingS(i,j,bi,bj) |
|
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h |
205 |
NO PROCEDURE |
& surfaceForcingS, |
|
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h |
210 |
NO PROCEDURE |
_RL surfaceForcingS (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
106 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
127 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
138 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
159 |
EXTERNAL_FORCING_SURF |
& surfaceForcingS(1-OLx,1-OLy,bi,bj),tmpFac,1, |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
171 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = 0. _d 0 |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
183 |
EXTERNAL_FORCING_SURF |
relaxForcingS(i,j) = surfaceForcingS(i,j,bi,bj) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
213 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
275 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
310 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
336 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
90 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
59 |
INI_FORCING |
surfaceForcingS(i,j,bi,bj) = 0. _d 0 |
|
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F |
69 |
PTRACERS_FORCING_SURF |
& surfaceForcingS(i,j,bi,bj) |
|
./pkg/dic/alk_surfforcing.F |
61 |
ALK_SURFFORCING |
GALK(i,j)=gsm_ALK*surfaceForcingS(i,j,bi,bj)* |
|
./pkg/dic/dic_surfforcing.F |
197 |
DIC_SURFFORCING |
VirtualFlux(i,j)=gsm_DIC*surfaceForcingS(i,j,bi,bj)/gsm_s |
|
./pkg/ebm/ebm_forcing_surf.F |
80 |
EBM_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = |
|
./model/inc/FFIELDS.h |
203 |
NO PROCEDURE |
& surfaceForcingS, |
|
./model/inc/FFIELDS.h |
208 |
NO PROCEDURE |
_RL surfaceForcingS (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |