Symbol Description Uses
nITD number of seaice categories to allocate 148


File Line number Procedure Code
./pkg/seaice/SEAICE.h 166 NO PROCEDURE 
      _RL TICES      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nITD,nSx,nSy)
./pkg/seaice/SEAICE.h 70 NO PROCEDURE 
      _RL AREAITD    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nITD,nSx,nSy)
./pkg/seaice/SEAICE.h 71 NO PROCEDURE 
      _RL HEFFITD    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nITD,nSx,nSy)
./pkg/seaice/SEAICE.h 72 NO PROCEDURE 
      _RL HSNOWITD   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nITD,nSx,nSy)
./pkg/seaice/SEAICE_PARAMS.h 491 NO PROCEDURE 
      _RL Hlimit(0:nITD)
./pkg/seaice/SEAICE_SIZE.h 19 NO PROCEDURE 
      INTEGER nITD
./pkg/seaice/SEAICE_SIZE.h 25 NO PROCEDURE 
      PARAMETER (nITD = 5)
./pkg/seaice/SEAICE_SIZE.h 27 NO PROCEDURE 
      PARAMETER (nITD = 7)
./pkg/seaice/SEAICE_TAVE.h 40 NO PROCEDURE 
      _RL HEFFITDtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nITD,nSx,nSy)
./pkg/seaice/SEAICE_TAVE.h 41 NO PROCEDURE 
      _RL AREAITDtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nITD,nSx,nSy)
./pkg/seaice/seaice_calc_ice_strength.F 135 SEAICE_CALC_ICE_STRENGTH 
        DO k = 1, nITD
./pkg/seaice/seaice_calc_ice_strength.F 151 SEAICE_CALC_ICE_STRENGTH 
        DO k = 1, nITD
./pkg/seaice/seaice_calc_ice_strength.F 71 SEAICE_CALC_ICE_STRENGTH 
      _RL partFunc        (1-OLx:sNx+OLx,1-OLy:sNy+OLy,0:nITD)
./pkg/seaice/seaice_calc_ice_strength.F 72 SEAICE_CALC_ICE_STRENGTH 
      _RL hrMin           (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD)
./pkg/seaice/seaice_calc_ice_strength.F 73 SEAICE_CALC_ICE_STRENGTH 
      _RL hrMax           (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD)
./pkg/seaice/seaice_calc_ice_strength.F 74 SEAICE_CALC_ICE_STRENGTH 
      _RL hrExp           (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD)
./pkg/seaice/seaice_calc_ice_strength.F 75 SEAICE_CALC_ICE_STRENGTH 
      _RL ridgeRatio      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD)
./pkg/seaice/seaice_calc_ice_strength.F 76 SEAICE_CALC_ICE_STRENGTH 
      _RL hActual         (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD)
./pkg/seaice/seaice_diagnostics_init.F 715 SEAICE_DIAGNOSTICS_INIT 
      CALL DIAGNOSTICS_SETKLEV( diagName, nITD, myThid )
./pkg/seaice/seaice_diagnostics_init.F 724 SEAICE_DIAGNOSTICS_INIT 
      CALL DIAGNOSTICS_SETKLEV( diagName, nITD, myThid )
./pkg/seaice/seaice_diagnostics_init.F 732 SEAICE_DIAGNOSTICS_INIT 
      CALL DIAGNOSTICS_SETKLEV( diagName, nITD, myThid )
./pkg/seaice/seaice_diagnostics_state.F 102 SEAICE_DIAGNOSTICS_STATE 
       CALL DIAGNOSTICS_FILL(HEFFITD ,'SIheffN ',0,nITD ,0,1,1,myThid)
./pkg/seaice/seaice_diagnostics_state.F 103 SEAICE_DIAGNOSTICS_STATE 
       CALL DIAGNOSTICS_FILL(AREAITD ,'SIareaN ',0,nITD ,0,1,1,myThid)
./pkg/seaice/seaice_diagnostics_state.F 104 SEAICE_DIAGNOSTICS_STATE 
       CALL DIAGNOSTICS_FILL(HSNOWITD,'SIhsnowN',0,nITD ,0,1,1,myThid)
./pkg/seaice/seaice_do_ridging.F 121 SEAICE_DO_RIDGING 
      DO k=1,nITD
./pkg/seaice/seaice_do_ridging.F 175 SEAICE_DO_RIDGING 
      DO k=1,nITD
./pkg/seaice/seaice_do_ridging.F 204 SEAICE_DO_RIDGING 
      DO k=1,nITD
./pkg/seaice/seaice_do_ridging.F 235 SEAICE_DO_RIDGING 
      DO k=1,nITD
./pkg/seaice/seaice_do_ridging.F 266 SEAICE_DO_RIDGING 
      DO k=1,nITD
./pkg/seaice/seaice_do_ridging.F 307 SEAICE_DO_RIDGING 
       DO l=1,nITD
./pkg/seaice/seaice_do_ridging.F 344 SEAICE_DO_RIDGING 
         IF ( l.LT.nITD ) THEN
./pkg/seaice/seaice_do_ridging.F 398 SEAICE_DO_RIDGING 
      DO k=1,nITD
./pkg/seaice/seaice_do_ridging.F 61 SEAICE_DO_RIDGING 
      _RL partFunc        (1-OLx:sNx+OLx,1-OLy:sNy+OLy,0:nITD)
./pkg/seaice/seaice_do_ridging.F 66 SEAICE_DO_RIDGING 
      _RL hrMin           (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD)
./pkg/seaice/seaice_do_ridging.F 67 SEAICE_DO_RIDGING 
      _RL hrMax           (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD)
./pkg/seaice/seaice_do_ridging.F 68 SEAICE_DO_RIDGING 
      _RL hrExp           (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD)
./pkg/seaice/seaice_do_ridging.F 69 SEAICE_DO_RIDGING 
      _RL ridgeRatio      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD)
./pkg/seaice/seaice_do_ridging.F 71 SEAICE_DO_RIDGING 
      _RL hActual         (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD)
./pkg/seaice/seaice_do_ridging.F 93 SEAICE_DO_RIDGING 
      _RL areaPR          (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD)
./pkg/seaice/seaice_do_ridging.F 94 SEAICE_DO_RIDGING 
      _RL heffPR          (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD)
./pkg/seaice/seaice_do_ridging.F 95 SEAICE_DO_RIDGING 
      _RL hsnwPR          (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD)
./pkg/seaice/seaice_growth.F 179 SEAICE_GROWTH 
      _RL AREAITDpreTH        (1:sNx,1:sNy,1:nITD)
./pkg/seaice/seaice_growth.F 180 SEAICE_GROWTH 
      _RL HEFFITDpreTH        (1:sNx,1:sNy,1:nITD)
./pkg/seaice/seaice_growth.F 181 SEAICE_GROWTH 
      _RL HSNWITDpreTH        (1:sNx,1:sNy,1:nITD)
./pkg/seaice/seaice_growth.F 182 SEAICE_GROWTH 
      _RL areaFracFactor      (1:sNx,1:sNy,1:nITD)
./pkg/seaice/seaice_growth.F 191 SEAICE_GROWTH 
      _RL ticeInMult          (1:sNx,1:sNy,nITD)
./pkg/seaice/seaice_growth.F 192 SEAICE_GROWTH 
      _RL ticeOutMult         (1:sNx,1:sNy,nITD)
./pkg/seaice/seaice_growth.F 193 SEAICE_GROWTH 
      _RL heffActualMult      (1:sNx,1:sNy,nITD)
./pkg/seaice/seaice_growth.F 194 SEAICE_GROWTH 
      _RL hsnowActualMult     (1:sNx,1:sNy,nITD)
./pkg/seaice/seaice_growth.F 196 SEAICE_GROWTH 
      _RL recip_heffActualMult(1:sNx,1:sNy,nITD)
./pkg/seaice/seaice_growth.F 198 SEAICE_GROWTH 
      _RL a_QbyATMmult_cover  (1:sNx,1:sNy,nITD)
./pkg/seaice/seaice_growth.F 199 SEAICE_GROWTH 
      _RL a_QSWbyATMmult_cover(1:sNx,1:sNy,nITD)
./pkg/seaice/seaice_growth.F 200 SEAICE_GROWTH 
      _RL a_FWbySublimMult    (1:sNx,1:sNy,nITD)
./pkg/seaice/seaice_growth.F 206 SEAICE_GROWTH 
      _RL r_QbyATMmult_cover  (1:sNx,1:sNy,nITD)
./pkg/seaice/seaice_growth.F 207 SEAICE_GROWTH 
      _RL r_FWbySublimMult    (1:sNx,1:sNy,nITD)
./pkg/seaice/seaice_growth.F 209 SEAICE_GROWTH 
      _RL latMeltFrac         (1:sNx,1:sNy,nITD)
./pkg/seaice/seaice_growth.F 210 SEAICE_GROWTH 
      _RL latMeltRate         (1:sNx,1:sNy,nITD)
./pkg/seaice/seaice_growth.F 269 SEAICE_GROWTH 
      _RL latentHeatFluxMaxMult(1:sNx,1:sNy,nITD)
./pkg/seaice/seaice_growth.F 273 SEAICE_GROWTH 
      _RL d_HEFFbySublim_ITD         (1:sNx,1:sNy,1:nITD)
./pkg/seaice/seaice_growth.F 274 SEAICE_GROWTH 
      _RL d_HSNWbySublim_ITD         (1:sNx,1:sNy,1:nITD)
./pkg/seaice/seaice_growth.F 275 SEAICE_GROWTH 
      _RL d_HEFFbyOCNonICE_ITD       (1:sNx,1:sNy,1:nITD)
./pkg/seaice/seaice_growth.F 276 SEAICE_GROWTH 
      _RL d_HSNWbyATMonSNW_ITD       (1:sNx,1:sNy,1:nITD)
./pkg/seaice/seaice_growth.F 277 SEAICE_GROWTH 
      _RL d_HEFFbyATMonOCN_ITD       (1:sNx,1:sNy,1:nITD)
./pkg/seaice/seaice_growth.F 278 SEAICE_GROWTH 
      _RL d_HEFFbyATMonOCN_cover_ITD (1:sNx,1:sNy,1:nITD)
./pkg/seaice/seaice_growth.F 279 SEAICE_GROWTH 
      _RL d_HEFFbyATMonOCN_open_ITD  (1:sNx,1:sNy,1:nITD)
./pkg/seaice/seaice_growth.F 280 SEAICE_GROWTH 
      _RL d_HSNWbyRAIN_ITD           (1:sNx,1:sNy,1:nITD)
./pkg/seaice/seaice_growth.F 281 SEAICE_GROWTH 
      _RL d_HSNWbyOCNonSNW_ITD       (1:sNx,1:sNy,1:nITD)
./pkg/seaice/seaice_growth.F 282 SEAICE_GROWTH 
      _RL d_HEFFbyFLOODING_ITD       (1:sNx,1:sNy,1:nITD)
./pkg/seaice/seaice_init_fixed.F 163 SEAICE_INIT_FIXED 
      IF ( nITD.GT.1 ) THEN
./pkg/seaice/seaice_init_fixed.F 164 SEAICE_INIT_FIXED 
       tmpVar = nITD
./pkg/seaice/seaice_init_fixed.F 168 SEAICE_INIT_FIXED 
       DO k=1,nITD-1
./pkg/seaice/seaice_init_fixed.F 176 SEAICE_INIT_FIXED 
      Hlimit(nITD) = 999.9 _d 0
./pkg/seaice/seaice_init_fixed.F 179 SEAICE_INIT_FIXED 
     &     ' SEAICE_INIT_FIXED: ', nITD,
./pkg/seaice/seaice_init_fixed.F 183 SEAICE_INIT_FIXED 
      WRITE(HlimitMsgFormat,'(A,I2,A)') '(A,',nITD,'F6.2,F6.1)'
./pkg/seaice/seaice_init_fixed.F 185 SEAICE_INIT_FIXED 
     &     ' SEAICE_INIT_FIXED: Hlimit = ', (Hlimit(k),k=0,nITD)
./pkg/seaice/seaice_init_varia.F 260 SEAICE_INIT_VARIA 
          DO k=1,nITD
./pkg/seaice/seaice_init_varia.F 310 SEAICE_INIT_VARIA 
          DO k=1,nITD
./pkg/seaice/seaice_init_varia.F 332 SEAICE_INIT_VARIA 
          DO k=1,nITD
./pkg/seaice/seaice_init_varia.F 419 SEAICE_INIT_VARIA 
          DO k=1,nITD
./pkg/seaice/seaice_itd_redist.F 118 SEAICE_ITD_REDIST 
      IF (nITD .gt. 1) THEN
./pkg/seaice/seaice_itd_redist.F 121 SEAICE_ITD_REDIST 
       DO k=1,nITD-1
./pkg/seaice/seaice_itd_redist.F 150 SEAICE_ITD_REDIST 
       DO k=1,nITD-1
./pkg/seaice/seaice_itd_redist.F 177 SEAICE_ITD_REDIST 
       DO k=nITD,2,-1
./pkg/seaice/seaice_itd_redist.F 90 SEAICE_ITD_REDIST 
      DO k=1,nITD
./pkg/seaice/seaice_itd_sum.F 86 SEAICE_ITD_SUM 
        DO k=2,nITD
./pkg/seaice/seaice_model.F 221 SEAICE_MODEL 
       CALL EXCH_3D_RL( HEFFITD,  nITD, myThid )
./pkg/seaice/seaice_model.F 222 SEAICE_MODEL 
       CALL EXCH_3D_RL( AREAITD,  nITD, myThid )
./pkg/seaice/seaice_model.F 223 SEAICE_MODEL 
       CALL EXCH_3D_RL( HSNOWITD, nITD, myThid )
./pkg/seaice/seaice_output.F 140 SEAICE_OUTPUT 
            CALL WRITE_FLD_3D_RL( 'HEFFITD.', suff, nITD, HEFFITD,
./pkg/seaice/seaice_output.F 142 SEAICE_OUTPUT 
            CALL WRITE_FLD_3D_RL( 'AREAITD.', suff, nITD, AREAITD,
./pkg/seaice/seaice_output.F 144 SEAICE_OUTPUT 
            CALL WRITE_FLD_3D_RL('HSNOWITD.', suff, nITD, HSNOWITD,
./pkg/seaice/seaice_output.F 209 SEAICE_OUTPUT 
         DO k=1,nITD
./pkg/seaice/seaice_output.F 262 SEAICE_OUTPUT 
     &                            SEAICE_timeAve, nITD, bi, bj, myThid )
./pkg/seaice/seaice_output.F 264 SEAICE_OUTPUT 
     &                            SEAICE_timeAve, nITD, bi, bj, myThid )
./pkg/seaice/seaice_prepare_ridging.F 121 SEAICE_PREPARE_RIDGING 
      DO k = 1, nITD
./pkg/seaice/seaice_prepare_ridging.F 131 SEAICE_PREPARE_RIDGING 
      DO k = 0, nITD
./pkg/seaice/seaice_prepare_ridging.F 134 SEAICE_PREPARE_RIDGING 
         IF ( gSum(i,j,nITD).NE.0. _d 0 )
./pkg/seaice/seaice_prepare_ridging.F 135 SEAICE_PREPARE_RIDGING 
     &        gSum(i,j,k) = gSum(i,j,k) / gSum(i,j,nITD)
./pkg/seaice/seaice_prepare_ridging.F 150 SEAICE_PREPARE_RIDGING 
       DO k = 0, nITD
./pkg/seaice/seaice_prepare_ridging.F 181 SEAICE_PREPARE_RIDGING 
       DO k = 0, nITD
./pkg/seaice/seaice_prepare_ridging.F 198 SEAICE_PREPARE_RIDGING 
      DO k = 1, nITD
./pkg/seaice/seaice_prepare_ridging.F 212 SEAICE_PREPARE_RIDGING 
       DO k = 1, nITD
./pkg/seaice/seaice_prepare_ridging.F 233 SEAICE_PREPARE_RIDGING 
       DO k = 1, nITD
./pkg/seaice/seaice_prepare_ridging.F 263 SEAICE_PREPARE_RIDGING 
      DO k = 1, nITD
./pkg/seaice/seaice_prepare_ridging.F 65 SEAICE_PREPARE_RIDGING 
      _RL partFunc        (1-OLx:sNx+OLx,1-OLy:sNy+OLy,0:nITD)
./pkg/seaice/seaice_prepare_ridging.F 66 SEAICE_PREPARE_RIDGING 
      _RL hrMin           (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD)
./pkg/seaice/seaice_prepare_ridging.F 67 SEAICE_PREPARE_RIDGING 
      _RL hrMax           (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD)
./pkg/seaice/seaice_prepare_ridging.F 68 SEAICE_PREPARE_RIDGING 
      _RL hrExp           (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD)
./pkg/seaice/seaice_prepare_ridging.F 69 SEAICE_PREPARE_RIDGING 
      _RL ridgeRatio      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD)
./pkg/seaice/seaice_prepare_ridging.F 70 SEAICE_PREPARE_RIDGING 
      _RL hActual         (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD)
./pkg/seaice/seaice_prepare_ridging.F 81 SEAICE_PREPARE_RIDGING 
      _RL gSum            (1-OLx:sNx+OLx,1-OLy:sNy+OLy,-1:nITD)
./pkg/seaice/seaice_prepare_ridging.F 92 SEAICE_PREPARE_RIDGING 
      DO k=1,nITD
./pkg/seaice/seaice_read_pickup.F 141 SEAICE_READ_PICKUP 
         CALL READ_REC_3D_RL( fn,fp,nITD, TICES, nj,nIter0,myThid )
./pkg/seaice/seaice_read_pickup.F 142 SEAICE_READ_PICKUP 
         nj = nj + nITD
./pkg/seaice/seaice_read_pickup.F 145 SEAICE_READ_PICKUP 
         CALL READ_REC_LEV_RL( fn, fp, nITD,1,1, TICES,
./pkg/seaice/seaice_read_pickup.F 187 SEAICE_READ_PICKUP 
     &                                nj, fp, nITD, nIter0, myThid )
./pkg/seaice/seaice_read_pickup.F 188 SEAICE_READ_PICKUP 
          nj = nj*nITD
./pkg/seaice/seaice_read_pickup.F 192 SEAICE_READ_PICKUP 
     &                            nj, fp, nITD,1,1, nIter0, myThid )
./pkg/seaice/seaice_read_pickup.F 198 SEAICE_READ_PICKUP 
     &                            nj, fp, nITD,1,1, nIter0, myThid )
./pkg/seaice/seaice_read_pickup.F 201 SEAICE_READ_PICKUP 
     &                            nj, fp, nITD,1,1, nIter0, myThid )
./pkg/seaice/seaice_read_pickup.F 207 SEAICE_READ_PICKUP 
     &                                   nj, fp, nITD, nIter0, myThid )
./pkg/seaice/seaice_read_pickup.F 226 SEAICE_READ_PICKUP 
     &                                   nj, fp, nITD, nIter0, myThid )
./pkg/seaice/seaice_read_pickup.F 228 SEAICE_READ_PICKUP 
     &                                   nj, fp, nITD, nIter0, myThid )
./pkg/seaice/seaice_read_pickup.F 304 SEAICE_READ_PICKUP 
           DO k=2,nITD
./pkg/seaice/seaice_read_pickup.F 319 SEAICE_READ_PICKUP 
       CALL EXCH_3D_RL( TICES, nITD, myThid )
./pkg/seaice/seaice_read_pickup.F 332 SEAICE_READ_PICKUP 
       CALL EXCH_3D_RL( HEFFITD,  nITD, myThid )
./pkg/seaice/seaice_read_pickup.F 333 SEAICE_READ_PICKUP 
       CALL EXCH_3D_RL( AREAITD,  nITD, myThid )
./pkg/seaice/seaice_read_pickup.F 334 SEAICE_READ_PICKUP 
       CALL EXCH_3D_RL( HSNOWITD, nITD, myThid )
./pkg/seaice/seaice_read_pickup.F 83 SEAICE_READ_PICKUP 
     I                      nITD, nIter0, myThid )
./pkg/seaice/seaice_readparms.F 386 SEAICE_READPARMS 
      SEAICE_multDim     = nITD
./pkg/seaice/seaice_readparms.F 582 SEAICE_READPARMS 
      SEAICE_multDim     = nITD
./pkg/seaice/seaice_write_pickup.F 105 SEAICE_WRITE_PICKUP 
         CALL WRITE_REC_3D_RL(fn,fp,nITD,TICES, nj, myIter, myThid )
./pkg/seaice/seaice_write_pickup.F 109 SEAICE_WRITE_PICKUP 
         nj = nj-nITD+1
./pkg/seaice/seaice_write_pickup.F 111 SEAICE_WRITE_PICKUP 
         CALL WRITE_REC_LEV_RL( fn, fp, nITD, 1, 1, TICES,
./pkg/seaice/seaice_write_pickup.F 86 SEAICE_WRITE_PICKUP 
        CALL WRITE_REC_3D_RL( fn,fp, nITD, TICES,   -j, myIter,myThid )
./pkg/seaice/seaice_write_pickup.F 89 SEAICE_WRITE_PICKUP 
        CALL WRITE_REC_3D_RL( fn,fp, nITD, AREAITD, -j, myIter,myThid )
./pkg/seaice/seaice_write_pickup.F 92 SEAICE_WRITE_PICKUP 
        CALL WRITE_REC_3D_RL( fn,fp, nITD, HEFFITD, -j, myIter,myThid )
./pkg/seaice/seaice_write_pickup.F 95 SEAICE_WRITE_PICKUP 
        CALL WRITE_REC_3D_RL( fn,fp, nITD, HSNOWITD,-j, myIter,myThid )
./pkg/seaice/seaice_write_pickup.F 98 SEAICE_WRITE_PICKUP 
        nj = -j*nITD
./verification/offline_exf_seaice/code/SEAICE_SIZE.h 19 NO PROCEDURE 
      INTEGER nITD
./verification/offline_exf_seaice/code/SEAICE_SIZE.h 26 NO PROCEDURE 
      PARAMETER (nITD = 5)
./verification/offline_exf_seaice/code/SEAICE_SIZE.h 29 NO PROCEDURE 
      PARAMETER (nITD = 1)
./verification/offline_exf_seaice/code_ad/SEAICE_SIZE.h 19 NO PROCEDURE 
      INTEGER nITD
./verification/offline_exf_seaice/code_ad/SEAICE_SIZE.h 26 NO PROCEDURE 
      PARAMETER (nITD = 7)
./verification/offline_exf_seaice/code_ad/SEAICE_SIZE.h 29 NO PROCEDURE 
      PARAMETER (nITD = 1)
./verification/seaice_itd/code/SEAICE_SIZE.h 19 NO PROCEDURE 
      INTEGER nITD
./verification/seaice_itd/code/SEAICE_SIZE.h 25 NO PROCEDURE 
      PARAMETER (nITD = 7)
./verification/seaice_itd/code/SEAICE_SIZE.h 27 NO PROCEDURE 
      PARAMETER (nITD = 7)