Symbol Description Uses
useBlkFlx 9


File Line number Procedure Code
./pkg/thsice/thsice_solve4temp.F 173 THSICE_SOLVE4TEMP 
      LOGICAL useBlkFlx
./pkg/thsice/thsice_solve4temp.F 193 THSICE_SOLVE4TEMP 
      useBlkFlx = useEXF .OR. useBulkForce
./pkg/thsice/thsice_solve4temp.F 304 THSICE_SOLVE4TEMP 
      IF ( useBlkFlx ) THEN
./pkg/thsice/thsice_solve4temp.F 329 THSICE_SOLVE4TEMP 
        IF ( useBlkFlx ) THEN
./pkg/thsice/thsice_solve4temp.F 382 THSICE_SOLVE4TEMP 
           IF ( useBlkFlx ) THEN
./pkg/thsice/thsice_solve4temp.F 419 THSICE_SOLVE4TEMP 
         IF ( useBlkFlx .AND. k.EQ.nitMaxTsf
./pkg/thsice/thsice_solve4temp.F 452 THSICE_SOLVE4TEMP 
      IF ( useBlkFlx ) THEN
./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