Symbol Description Uses
nlyr maximum number of ice layers 26


File Line number Procedure Code
./pkg/thsice/thsice_solve4temp.F 60 THSICE_SOLVE4TEMP 
      _RL qicen(nlyr)
./pkg/thsice/thsice_solve4temp.F 62 THSICE_SOLVE4TEMP 
      _RL Tice (nlyr)
./pkg/thsice/thsice_calc_thickn.F 100 THSICE_CALC_THICKN 
      _RL  hnew(nlyr)    ! new ice layer thickness (m)
./pkg/thsice/thsice_calc_thickn.F 123 THSICE_CALC_THICKN 
      rnlyr = nlyr
./pkg/thsice/thsice_calc_thickn.F 224 THSICE_CALC_THICKN 
      do k = 1, nlyr
./pkg/thsice/thsice_calc_thickn.F 243 THSICE_CALC_THICKN 
         do k = 1, nlyr
./pkg/thsice/thsice_calc_thickn.F 274 THSICE_CALC_THICKN 
         k = nlyr
./pkg/thsice/thsice_calc_thickn.F 278 THSICE_CALC_THICKN 
         do k = nlyr, 1, -1
./pkg/thsice/thsice_calc_thickn.F 315 THSICE_CALC_THICKN 
      do k = 1, nlyr
./pkg/thsice/thsice_calc_thickn.F 324 THSICE_CALC_THICKN 
         do k = 1, nlyr
./pkg/thsice/thsice_calc_thickn.F 331 THSICE_CALC_THICKN 
         do k = 1, nlyr
./pkg/thsice/thsice_calc_thickn.F 368 THSICE_CALC_THICKN 
         do k = 1, nlyr
./pkg/thsice/thsice_calc_thickn.F 404 THSICE_CALC_THICKN 
      do k = 1, nlyr
./pkg/thsice/thsice_calc_thickn.F 412 THSICE_CALC_THICKN 
         do k = 1, nlyr
./pkg/thsice/thsice_calc_thickn.F 419 THSICE_CALC_THICKN 
         do k = 1, nlyr
./pkg/thsice/thsice_calc_thickn.F 449 THSICE_CALC_THICKN 
         do k=1,nlyr
./pkg/thsice/thsice_calc_thickn.F 464 THSICE_CALC_THICKN 
      do k = 1, nlyr
./pkg/thsice/thsice_calc_thickn.F 61 THSICE_CALC_THICKN 
      _RL  qicen(nlyr)
./pkg/thsice/thsice_impl_temp.F 66 THSICE_IMPL_TEMP 
      _RL hIce, hSnow, Tsf, Tice(nlyr), qicen(nlyr)
./pkg/thsice/thsice_check_conserv.F 38 THSICE_CHECK_CONSERV 
      _RL compact, hIce, hSnow, qicen(nlyr)
./pkg/thsice/thsice_extend.F 52 THSICE_EXTEND 
      _RL qicen(nlyr)
./pkg/thsice/thsice_step_fwd.F 89 THSICE_STEP_FWD 
      _RL compact, hIce, hSnow, Tsf, Tice(nlyr), qicen(nlyr)
./pkg/thsice/THSICE_SIZE.h 11 NO PROCEDURE 
      INTEGER nlyr
./pkg/thsice/THSICE_SIZE.h 12 NO PROCEDURE 
      PARAMETER (nlyr = 2)