Symbol Description Uses
useThSIce 62


File Line number Procedure Code
./pkg/exf/exf_check.F 360 EXF_CHECK 
       IF ( useSEAICE .OR. useThSIce )  THEN
./model/inc/PARAMS.h 1045 NO PROCEDURE 
      LOGICAL useThSIce
./model/inc/PARAMS.h 1068 NO PROCEDURE 
     &        useStreamIce, useICEFRONT, useThSIce, useLand,
./model/src/config_check.F 327 CONFIG_CHECK 
      IF ( useRealFreshWaterFlux .AND. useThSIce ) THEN
./model/src/config_check.F 990 CONFIG_CHECK 
      IF ( (useSEAICE .OR. useThSIce) .AND. allowFreezing ) THEN
./pkg/ocn_compon_interf/ocn_apply_import.F 114 OCN_APPLY_IMPORT 
         IF ( useImportThSIce .AND. useThSIce ) THEN
./pkg/ocn_compon_interf/ocn_apply_import.F 192 OCN_APPLY_IMPORT 
        IF ( useImportThSIce .AND. useThSIce ) THEN
./pkg/ocn_compon_interf/ocn_store_my_data.F 110 OCN_STORE_MY_DATA 
        IF ( useThSIce .AND. ocn_cplExch2W_sIce  ) THEN
./model/src/do_oceanic_phys.F 327 DO_OCEANIC_PHYS 
      IF ( useThSIce .AND. fluidIsWater ) THEN
./model/src/do_oceanic_phys.F 510 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 228 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_init_varia.F 685 SEAICE_INIT_VARIA 
        IF ( useRealFreshWaterFlux .AND. .NOT.useThSIce ) THEN
./pkg/seaice/seaice_monitor.F 117 SEAICE_MONITOR 
        IF ( .NOT.useThSIce ) THEN
./pkg/seaice/seaice_output.F 104 SEAICE_OUTPUT 
            IF ( .NOT.useThSIce ) THEN
./pkg/seaice/seaice_output.F 142 SEAICE_OUTPUT 
            IF ( .NOT.useThSIce ) THEN
./pkg/seaice/seaice_read_pickup.F 189 SEAICE_READ_PICKUP 
        IF ( .NOT.useThSIce ) THEN
./pkg/seaice/seaice_summary.F 308 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 150 PACKAGES_BOOT 
      useThSIce       =.FALSE.
./model/src/packages_boot.F 369 PACKAGES_BOOT 
      CALL PACKAGES_PRINT_MSG( useThSIce,     'ThSIce',      ' ' )
./model/src/packages_boot.F 86 PACKAGES_BOOT 
     &          useThSIce,
./model/src/packages_check.F 359 PACKAGES_CHECK 
      IF (useThSIce) CALL THSICE_CHECK( myThid )
./model/src/packages_check.F 361 PACKAGES_CHECK 
      IF (useThSIce) CALL PACKAGES_ERROR_MSG('ThSIce',' ',myThid)
./model/src/packages_init_fixed.F 489 PACKAGES_INIT_FIXED 
      IF (useThSIce) THEN
./model/src/packages_init_variables.F 374 PACKAGES_INIT_VARIABLES 
      IF (useThSIce) THEN
./model/src/packages_write_pickup.F 183 PACKAGES_WRITE_PICKUP 
      IF (useThSIce) THEN
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F 90 EXTERNAL_FORCING_SURF 
      IF ( balanceEmPmR .AND. (.NOT.useSeaice .OR. useThSIce) ) THEN
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F 94 EXTERNAL_FORCING_SURF 
      IF ( balanceQnet  .AND. (.NOT.useSeaice .OR. useThSIce) ) THEN
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F 90 EXTERNAL_FORCING_SURF 
      IF ( balanceEmPmR .AND. (.NOT.useSeaice .OR. useThSIce) ) THEN
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F 94 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 64 ATM_APPLY_IMPORT 
      IF ( useImportThSIce .AND. useThSIce ) THEN
./pkg/atm_compon_interf/atm_apply_import.F 82 ATM_APPLY_IMPORT 
      IF ( useThSIce ) THEN
./pkg/atm_compon_interf/atm_store_aim_wndstr.F 78 ATM_STORE_AIM_WNDSTR 
      IF ( useThSIce .AND. stressReduction.GT. 0. _d 0 ) THEN
./pkg/atm_compon_interf/atm_store_surfflux.F 86 ATM_STORE_SURFFLUX 
      IF ( useThSIce ) THEN
./pkg/atm_compon_interf/cpl_export_import_data.F 72 CPL_EXPORT_IMPORT_DATA 
           IF ( useThSIce ) THEN
./pkg/bling/bling_fields_load.F 220 BLING_FIELDS_LOAD 
         IF ( useThSIce ) THEN
./pkg/bling/bling_readparms.F 385 BLING_READPARMS 
       IF ( useThSIce ) QSW_underice = .TRUE.
./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 348 CHEAPAML 
         IF ( useThSIce ) THEN
./pkg/cheapaml/cheapaml.F 456 CHEAPAML 
           IF ( .NOT.useThSIce ) THEN
./pkg/cost/cost_final.F 68 COST_FINAL 
      IF (useThSIce) CALL THSICE_COST_FINAL (myThid)
./pkg/cost/cost_tile.F 134 COST_TILE 
         IF (useThSIce)
./pkg/dic/dic_biotic_forcing.F 118 DIC_BIOTIC_FORCING 
      IF ( useThSIce .OR. useSEAICE .OR. useCoupler ) THEN
./pkg/dic/dic_fields_update.F 55 DIC_FIELDS_UPDATE 
        IF ( useThSIce ) THEN
./pkg/dic/dic_readparms.F 195 DIC_READPARMS 
       IF ( useThSIce ) QSW_underice = .TRUE.