Symbol Description Uses
cpice specific heat of fresh ice (J/kg/K) 21


File Line number Procedure Code
./pkg/thsice/THSICE_PARAMS.h 71 NO PROCEDURE 
     &  cpice, cpwater,
./pkg/thsice/THSICE_PARAMS.h 89 NO PROCEDURE 
      _RL  cpice
./pkg/thsice/thsice_calc_thickn.F 340 THSICE_CALC_THICKN 
         qbot =  -cpice *Tf + Lfresh
./pkg/thsice/thsice_extend.F 137 THSICE_EXTEND 
     &             + cpice *(Tmlt1-Tf) + Lfresh*(1. _d 0-Tmlt1/Tf)
./pkg/thsice/thsice_extend.F 138 THSICE_EXTEND 
          qicen(2)= -cpice *Tf + Lfresh
./pkg/thsice/thsice_solve4temp.F 206 THSICE_SOLVE4TEMP 
      a1 = cpice
./pkg/thsice/thsice_solve4temp.F 207 THSICE_SOLVE4TEMP 
      b1 = qicen(1) + (cpwater-cpice )*Tmlt1 - Lfresh
./pkg/thsice/thsice_solve4temp.F 210 THSICE_SOLVE4TEMP 
      Tice(2) = (Lfresh-qicen(2)) / cpice
./pkg/thsice/thsice_solve4temp.F 231 THSICE_SOLVE4TEMP 
      a10 = rhoi*cpice *hi/(2. _d 0*dt) +
./pkg/thsice/thsice_solve4temp.F 232 THSICE_SOLVE4TEMP 
     &      k32 * (4. _d 0*dt*k32 + rhoi*cpice *hi)
./pkg/thsice/thsice_solve4temp.F 233 THSICE_SOLVE4TEMP 
     &       / (6. _d 0*dt*k32 + rhoi*cpice *hi)
./pkg/thsice/thsice_solve4temp.F 235 THSICE_SOLVE4TEMP 
     &      (rhoi*cpice*Tice(1)+rhoi*Lfresh*Tmlt1/Tice(1))
./pkg/thsice/thsice_solve4temp.F 237 THSICE_SOLVE4TEMP 
     &      - k32 * (4. _d 0*dt*k32*Tf+rhoi*cpice *hi*Tice(2))
./pkg/thsice/thsice_solve4temp.F 238 THSICE_SOLVE4TEMP 
     &       / (6. _d 0*dt*k32 + rhoi*cpice *hi) - fswint
./pkg/thsice/thsice_solve4temp.F 359 THSICE_SOLVE4TEMP 
     &        + rhoi*cpice *hi*Tice(2))
./pkg/thsice/thsice_solve4temp.F 360 THSICE_SOLVE4TEMP 
     &         /(6. _d 0*dt*k32 + rhoi*cpice *hi)
./pkg/thsice/thsice_solve4temp.F 396 THSICE_SOLVE4TEMP 
      qicen(1) = -cpwater*Tmlt1 + cpice *(Tmlt1-Tice(1))
./pkg/thsice/thsice_solve4temp.F 398 THSICE_SOLVE4TEMP 
      qicen(2) = -cpice *Tice(2) + Lfresh
./pkg/thsice/thsice_readparms.F 221 THSICE_READPARMS 
      WRITE(iUnit,*) 'ThSI: cpice   =',cpice
./pkg/thsice/thsice_readparms.F 49 THSICE_READPARMS 
     &  cpice, cpwater,
./pkg/thsice/thsice_readparms.F 90 THSICE_READPARMS 
      cpice    = 2106. _d 0