File |
Line number |
Procedure |
Code |
./model/inc/PARAMS.h |
1042 |
NO PROCEDURE |
LOGICAL useShelfIce |
./model/inc/PARAMS.h |
1067 |
NO PROCEDURE |
& useFRAZIL, useSEAICE, useSALT_PLUME, useShelfIce, |
./model/src/apply_forcing.F |
477 |
APPLY_FORCING_T |
ELSEIF ( usingZCoords .AND. useShelfIce ) THEN |
./model/src/apply_forcing.F |
708 |
APPLY_FORCING_T |
IF ( useShelfIce ) |
./model/src/apply_forcing.F |
843 |
APPLY_FORCING_S |
ELSEIF ( usingZCoords .AND. useShelfIce ) THEN |
./model/src/apply_forcing.F |
940 |
APPLY_FORCING_S |
IF ( useShelfIce ) |
./pkg/kpp/kpp_calc.F |
585 |
KPP_CALC |
if ( useShelfIce ) k = kTopC(i,j,bi,bj) |
./model/src/calc_phi_hyd.F |
182 |
CALC_PHI_HYD |
IF ( useShelfIce .AND. useDOWN_SLOPE ) THEN |
./model/src/calc_phi_hyd.F |
191 |
CALC_PHI_HYD |
ELSEIF ( useShelfIce ) THEN |
./pkg/mom_fluxform/mom_fluxform.F |
590 |
MOM_FLUXFORM |
IF (useShelfIce) THEN |
./pkg/mom_fluxform/mom_fluxform.F |
822 |
MOM_FLUXFORM |
IF (useShelfIce) THEN |
./pkg/mom_vecinv/mom_vecinv.F |
503 |
MOM_VECINV |
IF ( useShelfIce ) THEN |
./pkg/mom_vecinv/mom_vecinv.F |
574 |
MOM_VECINV |
IF ( useShelfIce ) THEN |
./model/src/do_oceanic_phys.F |
537 |
DO_OCEANIC_PHYS |
IF ( useShelfIce .AND. fluidIsWater ) THEN |
./pkg/ptracers/ptracers_apply_forcing.F |
62 |
PTRACERS_APPLY_FORCING |
ELSEIF ( usingZCoords .AND. useShelfIce ) THEN |
./model/src/do_the_model_io.F |
215 |
DO_THE_MODEL_IO |
IF ( useShelfIce ) THEN |
./model/src/external_forcing.F |
354 |
EXTERNAL_FORCING_T |
ELSEIF ( usingZCoords .AND. useShelfIce ) THEN |
./model/src/external_forcing.F |
565 |
EXTERNAL_FORCING_T |
IF ( useShelfIce ) |
./model/src/external_forcing.F |
677 |
EXTERNAL_FORCING_S |
ELSEIF ( usingZCoords .AND. useShelfIce ) THEN |
./model/src/external_forcing.F |
769 |
EXTERNAL_FORCING_S |
IF ( useShelfIce ) |
./pkg/shelfice/shelfice_readparms.F |
75 |
SHELFICE_READPARMS |
IF ( .NOT.useShelfIce ) THEN |
./model/src/ini_masks_etc.F |
56 |
INI_MASKS_ETC |
IF ( useShelfIce ) THEN |
./model/src/ini_psurf.F |
100 |
INI_PSURF |
IF ( useShelfIce .AND. usingZCoords ) THEN |
./model/src/packages_boot.F |
147 |
PACKAGES_BOOT |
useShelfIce =.FALSE. |
./model/src/packages_boot.F |
360 |
PACKAGES_BOOT |
CALL PACKAGES_PRINT_MSG( useShelfIce, 'ShelfIce', ' ' ) |
./model/src/packages_boot.F |
83 |
PACKAGES_BOOT |
& useShelfIce, |
./model/src/packages_check.F |
341 |
PACKAGES_CHECK |
IF (useShelfIce) CALL SHELFICE_CHECK( myThid ) |
./model/src/packages_check.F |
343 |
PACKAGES_CHECK |
IF (useShelfIce) CALL PACKAGES_ERROR_MSG('ShelfIce',' ',myThid) |
./model/src/packages_init_fixed.F |
458 |
PACKAGES_INIT_FIXED |
IF (useShelfIce) THEN |
./model/src/packages_init_variables.F |
347 |
PACKAGES_INIT_VARIABLES |
IF (useShelfIce) THEN |
./model/src/packages_write_pickup.F |
176 |
PACKAGES_WRITE_PICKUP |
IF (useShelfIce) THEN |
./verification/rotating_tank/code/apply_forcing.F |
484 |
APPLY_FORCING_T |
ELSEIF ( usingZCoords .AND. useShelfIce ) THEN |
./verification/rotating_tank/code/apply_forcing.F |
765 |
APPLY_FORCING_T |
IF ( useShelfIce ) |
./verification/rotating_tank/code/apply_forcing.F |
905 |
APPLY_FORCING_S |
ELSEIF ( usingZCoords .AND. useShelfIce ) THEN |
./verification/rotating_tank/code/apply_forcing.F |
997 |
APPLY_FORCING_S |
IF ( useShelfIce ) |
./model/src/set_parms.F |
131 |
SET_PARMS |
uniformFreeSurfLev = usingZCoords .AND. .NOT.useShelfIce |