| File |
Line number |
Procedure |
Code |
|
./model/inc/FFIELDS.h |
245 |
NO PROCEDURE |
& surfaceForcingTice |
|
./model/inc/FFIELDS.h |
250 |
NO PROCEDURE |
_RL surfaceForcingTice(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/kpp/kpp_calc.F |
434 |
KPP_CALC |
I surfaceForcingT, surfaceForcingS, surfaceForcingTice, |
|
./pkg/kpp/kpp_transport_t.F |
83 |
KPP_TRANSPORT_T |
& +surfaceForcingTice(i,j,bi,bj) |
|
./pkg/kpp/kpp_transport_t.F |
98 |
KPP_TRANSPORT_T |
& +surfaceForcingTice(i,j,bi,bj) |
|
./model/src/diags_oceanic_surf_flux.F |
100 |
DIAGS_OCEANIC_SURF_FLUX |
CALL DIAGNOSTICS_SCALE_FILL( surfaceForcingTice,tmpFac,1, |
|
./model/src/diags_oceanic_surf_flux.F |
125 |
DIAGS_OCEANIC_SURF_FLUX |
& (surfaceForcingT(i,j,bi,bj)+surfaceForcingTice(i,j,bi,bj)) |
|
./model/src/freeze_surface.F |
59 |
FREEZE_SURFACE |
surfaceForcingTice(i,j,bi,bj) = |
|
./model/src/freeze_surface.F |
64 |
FREEZE_SURFACE |
surfaceForcingTice(i,j,bi,bj) = 0. _d 0 |
|
./model/src/ini_ffields.F |
130 |
INI_FFIELDS |
surfaceForcingTice (i,j,bi,bj) = 0. _d 0 |
|
./pkg/timeave/timeave_surf_flux.F |
71 |
TIMEAVE_SURF_FLUX |
& (surfaceForcingT(i,j,bi,bj)+surfaceForcingTice(I,J,bi,bj)) |
|
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h |
250 |
NO PROCEDURE |
& surfaceForcingTice |
|
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h |
255 |
NO PROCEDURE |
_RL surfaceForcingTice(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
63 |
INI_FORCING |
surfaceForcingTice(i,j,bi,bj) = 0. _d 0 |
|
./verification/tutorial_global_oce_optim/code_oad/FFIELDS.h |
250 |
NO PROCEDURE |
& surfaceForcingTice |
|
./verification/tutorial_global_oce_optim/code_oad/FFIELDS.h |
255 |
NO PROCEDURE |
_RL surfaceForcingTice(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
63 |
INI_FORCING |
surfaceForcingTice(i,j,bi,bj) = 0. _d 0 |