Symbol Description Uses
dTsrf surf. temp adjusment: Ts^n+1 - Ts^n 4


File Line number Procedure Code
./pkg/thsice/thsice_solve4temp.F 110 THSICE_SOLVE4TEMP 
      _RL dTsrf  (iMin:iMax,jMin:jMax)
./pkg/thsice/thsice_solve4temp.F 15 THSICE_SOLVE4TEMP 
     O                  tIc1, tIc2, dTsrf,
./pkg/thsice/thsice_solve4temp.F 501 THSICE_SOLVE4TEMP 
          IF ( .NOT.useBlkFlx ) dTsrf(i,j) = dTsf
./pkg/thsice/thsice_solve4temp.F 517 THSICE_SOLVE4TEMP 
          IF ( .NOT.useBlkFlx ) dTsrf(i,j) = 0. _d 0