| File |
Line number |
Procedure |
Code |
|
./model/inc/FFIELDS.h |
244 |
NO PROCEDURE |
& surfaceForcingS, |
|
./model/inc/FFIELDS.h |
249 |
NO PROCEDURE |
_RL surfaceForcingS (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./model/src/apply_forcing.F |
912 |
APPLY_FORCING_S |
& +surfaceForcingS(i,j,bi,bj) |
|
./model/src/apply_forcing.F |
921 |
APPLY_FORCING_S |
& +surfaceForcingS(i,j,bi,bj) |
|
./pkg/kpp/kpp_calc.F |
434 |
KPP_CALC |
I surfaceForcingT, surfaceForcingS, surfaceForcingTice, |
|
./pkg/kpp/kpp_transport_s.F |
115 |
KPP_TRANSPORT_S |
& *( surfaceForcingS(i,j,bi,bj) |
|
./pkg/kpp/kpp_transport_s.F |
99 |
KPP_TRANSPORT_S |
& *( surfaceForcingS(i,j,bi,bj) |
|
./model/src/diags_oceanic_surf_flux.F |
110 |
DIAGS_OCEANIC_SURF_FLUX |
CALL DIAGNOSTICS_SCALE_FILL( surfaceForcingS,tmpFac,1, |
|
./model/src/diags_oceanic_surf_flux.F |
158 |
DIAGS_OCEANIC_SURF_FLUX |
& surfaceForcingS(i,j,bi,bj)*rUnit2mass |
|
./pkg/offline/offline_get_diffus.F |
141 |
OFFLINE_GET_DIFFUS |
surfaceForcingS(i,j,bi,bj) = bWght*sflx0(i,j,bi,bj) |
|
./pkg/offline/offline_get_diffus.F |
143 |
OFFLINE_GET_DIFFUS |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./model/src/external_forcing.F |
741 |
EXTERNAL_FORCING_S |
& +surfaceForcingS(i,j,bi,bj) |
|
./model/src/external_forcing.F |
750 |
EXTERNAL_FORCING_S |
& +surfaceForcingS(i,j,bi,bj) |
|
./model/src/external_forcing_surf.F |
141 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = 0. _d 0 |
|
./model/src/external_forcing_surf.F |
169 |
EXTERNAL_FORCING_SURF |
I surfaceForcingS(1-OLx,1-OLy,bi,bj), |
|
./model/src/external_forcing_surf.F |
221 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./model/src/external_forcing_surf.F |
271 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./model/src/external_forcing_surf.F |
306 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./model/src/external_forcing_surf.F |
332 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./model/src/forcing_surf_relax.F |
104 |
FORCING_SURF_RELAX |
surfaceForcingS(i,j,bi,bj) = |
|
./model/src/forcing_surf_relax.F |
125 |
FORCING_SURF_RELAX |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./model/src/forcing_surf_relax.F |
139 |
FORCING_SURF_RELAX |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./model/src/forcing_surf_relax.F |
153 |
FORCING_SURF_RELAX |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./model/src/forcing_surf_relax.F |
213 |
FORCING_SURF_RELAX |
& + surfaceForcingS(i,j,bi,bj) |
|
./model/src/forcing_surf_relax.F |
226 |
FORCING_SURF_RELAX |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./model/src/forcing_surf_relax.F |
254 |
FORCING_SURF_RELAX |
CALL DIAGNOSTICS_SCALE_FILL( surfaceForcingS, tmpFac, 1, |
|
./model/src/forcing_surf_relax.F |
88 |
FORCING_SURF_RELAX |
surfaceForcingS(i,j,bi,bj) = |
|
./pkg/salt_plume/salt_plume_forcing_surf.F |
67 |
SALT_PLUME_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./pkg/salt_plume/salt_plume_forcing_surf.F |
72 |
SALT_PLUME_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./pkg/shelfice/shelfice_forcing_surf.F |
61 |
SHELFICE_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = 0. |
|
./pkg/shelfice/shelfice_forcing_surf.F |
91 |
SHELFICE_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = shelficeForcingS(i,j,bi,bj) |
|
./model/src/ini_ffields.F |
129 |
INI_FFIELDS |
surfaceForcingS (i,j,bi,bj) = 0. _d 0 |
|
./pkg/timeave/timeave_surf_flux.F |
93 |
TIMEAVE_SURF_FLUX |
& surfaceForcingS(i,j,bi,bj)*rUnit2mass |
|
./verification/rotating_tank/code/apply_forcing.F |
969 |
APPLY_FORCING_S |
& +surfaceForcingS(i,j,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
978 |
APPLY_FORCING_S |
& +surfaceForcingS(i,j,bi,bj) |
|
./verification/tidal_basin_2d/code/external_forcing.F |
351 |
EXTERNAL_FORCING_S |
& +surfaceForcingS(i,j,bi,bj) |
|
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h |
249 |
NO PROCEDURE |
& surfaceForcingS, |
|
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h |
254 |
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 |
144 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = 0. _d 0 |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
169 |
EXTERNAL_FORCING_SURF |
I surfaceForcingS(1-OLx,1-OLy,bi,bj), |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
224 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
274 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
309 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
335 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
62 |
INI_FORCING |
surfaceForcingS(i,j,bi,bj) = 0. _d 0 |
|
./verification/tutorial_global_oce_optim/code_oad/FFIELDS.h |
249 |
NO PROCEDURE |
& surfaceForcingS, |
|
./verification/tutorial_global_oce_optim/code_oad/FFIELDS.h |
254 |
NO PROCEDURE |
_RL surfaceForcingS (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
144 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = 0. _d 0 |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
169 |
EXTERNAL_FORCING_SURF |
I surfaceForcingS(1-OLx,1-OLy,bi,bj), |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
224 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
274 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
309 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
335 |
EXTERNAL_FORCING_SURF |
surfaceForcingS(i,j,bi,bj) = surfaceForcingS(i,j,bi,bj) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
62 |
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) |
|
./verification/tutorial_tracer_adjsens/code_oad/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 |
237 |
DIC_SURFFORCING |
VirtualFlux(i,j)=gsm_DIC*surfaceForcingS(i,j,bi,bj)/gsm_s |