Symbol Description Uses
hIce 25


File Line number Procedure Code
./pkg/thsice/thsice_impl_temp.F 103 THSICE_IMPL_TEMP 
     I          useBulkforce, flxExcSw, Tf, hIce, hSnow,
./pkg/thsice/thsice_impl_temp.F 66 THSICE_IMPL_TEMP 
      _RL hIce, hSnow, Tsf, Tice(nlyr), qicen(nlyr)
./pkg/thsice/thsice_impl_temp.F 87 THSICE_IMPL_TEMP 
          hIce    = iceHeight(i,j,bi,bj)
./pkg/thsice/thsice_impl_temp.F 99 THSICE_IMPL_TEMP 
     &                   iceMask(i,j,bi,bj), hIce, hSnow, Tsf
./pkg/thsice/thsice_check_conserv.F 10 THSICE_CHECK_CONSERV 
     I             iceFrac, compact, hIce, hSnow, qicen,
./pkg/thsice/thsice_check_conserv.F 38 THSICE_CHECK_CONSERV 
      _RL compact, hIce, hSnow, qicen(nlyr)
./pkg/thsice/thsice_check_conserv.F 67 THSICE_CHECK_CONSERV 
     &               + rhoi*hIce*(qicen(1)+qicen(2))*0.5
./pkg/thsice/thsice_check_conserv.F 70 THSICE_CHECK_CONSERV 
     &     - compact*( rhos*hSnow + rhoi*hIce )
./pkg/thsice/thsice_check_conserv.F 72 THSICE_CHECK_CONSERV 
     &     - compact* rhoi*hIce*saltice
./pkg/thsice/thsice_check_conserv.F 94 THSICE_CHECK_CONSERV 
     &    hIce, hSnow, snowPrc(i,j,bi,bj)*thSIce_deltaT/rhos
./pkg/thsice/thsice_step_fwd.F 118 THSICE_STEP_FWD 
          hIce    = iceHeight(i,j,bi,bj)
./pkg/thsice/thsice_step_fwd.F 126 THSICE_STEP_FWD 
     &                                 icFrac, hIce,hSnow,Tsf
./pkg/thsice/thsice_step_fwd.F 130 THSICE_STEP_FWD 
     I               hIce, hSnow, Tsf, snowAge(i,j,bi,bj),
./pkg/thsice/thsice_step_fwd.F 136 THSICE_STEP_FWD 
     I          useBulkforce, tmpflx, TFrzOce, hIce, hSnow,
./pkg/thsice/thsice_step_fwd.F 209 THSICE_STEP_FWD 
          hIce    = iceHeight(i,j,bi,bj)
./pkg/thsice/thsice_step_fwd.F 219 THSICE_STEP_FWD 
     U          compact, hIce, hSnow, Tsf, qicen, flx2oc,
./pkg/thsice/thsice_step_fwd.F 249 THSICE_STEP_FWD 
     I            icFrac, compact, hIce, hSnow, qicen,
./pkg/thsice/thsice_step_fwd.F 257 THSICE_STEP_FWD 
          iceHeight(i,j,bi,bj) = hIce
./pkg/thsice/thsice_step_fwd.F 276 THSICE_STEP_FWD 
     &                        compact,hIce,hSnow,Qnet(i,j,bi,bj)
./pkg/thsice/thsice_step_fwd.F 291 THSICE_STEP_FWD 
        hIce   = iceHeight(i,j,bi,bj)
./pkg/thsice/thsice_step_fwd.F 301 THSICE_STEP_FWD 
     U               oceTs, compact, hIce, hSnow, qicen,
./pkg/thsice/thsice_step_fwd.F 311 THSICE_STEP_FWD 
     I            icFrac, compact, hIce, hSnow, qicen,
./pkg/thsice/thsice_step_fwd.F 324 THSICE_STEP_FWD 
          iceHeight(i,j,bi,bj) = hIce
./pkg/thsice/thsice_step_fwd.F 333 THSICE_STEP_FWD 
     &                        compact,hIce,hSnow,Qnet(i,j,bi,bj)
./pkg/thsice/thsice_step_fwd.F 89 THSICE_STEP_FWD 
      _RL compact, hIce, hSnow, Tsf, Tice(nlyr), qicen(nlyr)