Symbol Description Uses
useThSIce 54



File Line number Procedure Code
./model/inc/PARAMS.h 1007 NO PROCEDURE
     &        useStreamIce, useICEFRONT, useThSIce, useLand,
./model/inc/PARAMS.h 985 NO PROCEDURE
      LOGICAL useThSIce
./model/src/config_check.F 272 CONFIG_CHECK
      IF ( useRealFreshWaterFlux .AND. useThSIce ) THEN
./model/src/config_check.F 863 CONFIG_CHECK
      IF ( (useSEAICE .OR. useThSIce) .AND. allowFreezing ) THEN
./model/src/do_oceanic_phys.F 232 DO_OCEANIC_PHYS
      IF ( useThSIce .AND. fluidIsWater ) THEN
./model/src/do_oceanic_phys.F 402 DO_OCEANIC_PHYS
      IF ( useThSIce .AND. fluidIsWater ) THEN
./model/src/do_statevars_diags.F 104 DO_STATEVARS_DIAGS
       IF ( seqFlag.EQ.0 .AND. useThSIce ) THEN
./model/src/do_the_model_io.F 173 DO_THE_MODEL_IO
      IF (useThSIce)
./model/src/external_forcing_surf.F 87 EXTERNAL_FORCING_SURF
      IF ( balanceEmPmR .AND. (.NOT.useSeaice .OR. useThSIce) ) THEN
./model/src/external_forcing_surf.F 91 EXTERNAL_FORCING_SURF
      IF ( balanceQnet  .AND. (.NOT.useSeaice .OR. useThSIce) ) THEN
./pkg/seaice/seaice_check.F 101 SEAICE_CHECK
      IF ( (.NOT.useThSIce).AND.(.NOT.SEAICE_doOpenWaterGrowth)
./pkg/seaice/seaice_check.F 148 SEAICE_CHECK
      IF ( (.NOT.useThSIce).AND.SEAICE_doOpenWaterMelt
./pkg/seaice/seaice_init_varia.F 681 SEAICE_INIT_VARIA
        IF ( useRealFreshWaterFlux .AND. .NOT.useThSIce ) THEN
./pkg/seaice/seaice_monitor.F 117 SEAICE_MONITOR
        IF ( .NOT.useThSIce ) THEN
./pkg/seaice/seaice_read_pickup.F 184 SEAICE_READ_PICKUP
        IF ( .NOT.useThSIce ) THEN
./pkg/seaice/seaice_summary.F 256 SEAICE_SUMMARY
      IF ( useThSIce ) THEN
./pkg/seaice/seaice_write_pickup.F 81 SEAICE_WRITE_PICKUP
       IF ( .NOT.useThSIce ) THEN
./pkg/thsice/thsice_readparms.F 86 THSICE_READPARMS
      IF ( .NOT.useThSIce ) THEN
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F 421 AIM_SURF_BC
      IF (useThSIce) THEN
./model/src/packages_boot.F 146 PACKAGES_BOOT
      useThSIce       =.FALSE.
./model/src/packages_boot.F 320 PACKAGES_BOOT
      CALL PACKAGES_PRINT_MSG( useThSIce,     'ThSIce',      ' ' )
./model/src/packages_boot.F 84 PACKAGES_BOOT
     &          useThSIce,
./model/src/packages_check.F 286 PACKAGES_CHECK
      IF (useThSIce) CALL THSICE_CHECK( myThid )
./model/src/packages_check.F 288 PACKAGES_CHECK
      IF (useThSIce) CALL PACKAGES_ERROR_MSG('ThSIce',' ',myThid)
./model/src/packages_init_fixed.F 496 PACKAGES_INIT_FIXED
      IF (useThSIce) THEN
./model/src/packages_init_variables.F 388 PACKAGES_INIT_VARIABLES
      IF (useThSIce) THEN
./model/src/packages_write_pickup.F 141 PACKAGES_WRITE_PICKUP
      IF (useThSIce) THEN
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F 84 EXTERNAL_FORCING_SURF
      IF ( balanceEmPmR .AND. (.NOT.useSeaice .OR. useThSIce) ) THEN
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F 88 EXTERNAL_FORCING_SURF
      IF ( balanceQnet  .AND. (.NOT.useSeaice .OR. useThSIce) ) THEN
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F 84 EXTERNAL_FORCING_SURF
      IF ( balanceEmPmR .AND. (.NOT.useSeaice .OR. useThSIce) ) THEN
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F 88 EXTERNAL_FORCING_SURF
      IF ( balanceQnet  .AND. (.NOT.useSeaice .OR. useThSIce) ) THEN
./model/src/turnoff_model_io.F 108 TURNOFF_MODEL_IO
      IF ( useThSIce ) THEN
./pkg/aim_v23/aim_aim2sioce.F 136 AIM_AIM2SIOCE
      IF ( useThSIce ) THEN
./pkg/aim_v23/aim_do_physics.F 109 AIM_DO_PHYSICS
        IF ( useThSIce ) THEN
./pkg/aim_v23/aim_do_physics.F 180 AIM_DO_PHYSICS
        IF ( useThSIce ) THEN
./pkg/aim_v23/aim_do_physics.F 201 AIM_DO_PHYSICS
      IF ( useThSIce ) THEN
./pkg/aim_v23/aim_do_physics.F 229 AIM_DO_PHYSICS
      IF (useThSIce) THEN
./pkg/aim_v23/aim_sice_impl.F 83 AIM_SICE_IMPL
      IF ( useThSIce ) THEN
./pkg/aim_v23/aim_surf_bc.F 389 AIM_SURF_BC
      IF (useThSIce) THEN
./pkg/aim_v23/phy_suflux_sice.F 106 SUFLUX_SICE
      IF ( aim_energPrecip .OR. useThSIce ) ALHevp = ALHC + ALHF
./pkg/atm_compon_interf/atm_apply_import.F 65 ATM_APPLY_IMPORT
      IF ( useThSIce ) THEN
./pkg/atm_compon_interf/atm_store_aim_wndstr.F 79 ATM_STORE_AIM_WNDSTR
      IF ( useThSIce .AND. stressReduction.GT. 0. _d 0 ) THEN
./pkg/atm_compon_interf/atm_store_my_data.F 60 ATM_STORE_MY_DATA
        IF ( useThSIce ) THEN
./pkg/atm_compon_interf/atm_store_surfflux.F 85 ATM_STORE_SURFFLUX
      IF ( useThSIce ) THEN
./pkg/cfc/cfc_check.F 110 CFC_CHECK
     &     ( useThSIce .OR. useSEAICE ) ) THEN
./pkg/cfc/cfc_fields_load.F 134 CFC_FIELDS_LOAD
     &       .NOT.useSEAICE .AND. .NOT.useThSIce ) THEN
./pkg/cfc/cfc_fields_load.F 147 CFC_FIELDS_LOAD
        IF ( .NOT.useSEAICE .AND. .NOT.useThSIce ) THEN
./pkg/cfc/cfc_fields_load.F 221 CFC_FIELDS_LOAD
        IF ( useThSIce ) THEN
./pkg/cheapaml/cheapaml.F 435 CHEAPAML
         IF ( useThSIce ) THEN
./pkg/cheapaml/cheapaml.F 542 CHEAPAML
           IF ( .NOT.useThSIce ) THEN
./pkg/cost/cost_final.F 59 COST_FINAL
      IF (useThSIce) CALL THSICE_COST_FINAL (myThid)
./pkg/cost/cost_tile.F 134 COST_TILE
         IF (useThSIce)
./pkg/dic/dic_fields_load.F 252 DIC_FIELDS_LOAD
         IF ( useThSIce ) THEN
./pkg/dic/dic_readparms.F 182 DIC_READPARMS
       IF ( useThSIce ) QSW_underice = .TRUE.