Symbol Description Uses
qleft net heat flux to ocean [W/m2] (> 0 downward) 19


File Line number Procedure Code
./pkg/thsice/thsice_calc_thickn.F 532 THSICE_CALC_THICKN 
           qleft=qleft+(extend-rqh)/dt
./pkg/thsice/thsice_calc_thickn.F 537 THSICE_CALC_THICKN 
         qleft=qleft+extend/dt
./pkg/thsice/thsice_calc_thickn.F 63 THSICE_CALC_THICKN 
      _RL qleft
./pkg/thsice/thsice_check_conserv.F 11 THSICE_CHECK_CONSERV 
     I             qleft, ffresh, fsalt, flxAtm, frwAtm,
./pkg/thsice/thsice_check_conserv.F 39 THSICE_CHECK_CONSERV 
      _RL qleft, fsalt, ffresh
./pkg/thsice/thsice_check_conserv.F 76 THSICE_CHECK_CONSERV 
         IF (dBug) WRITE(6,1010) 'ThSI_CHK: fxH,fxW,fxS=',flxAtm-qleft,
./pkg/thsice/thsice_check_conserv.F 78 THSICE_CHECK_CONSERV 
          dEnerg = dEnerg + thSIce_deltaT*flxFrac*(flxAtm-qleft)
./pkg/thsice/thsice_extend.F 109 THSICE_EXTEND 
        qleft= iceThick*newIceFrac*qicAv/deltaTice
./pkg/thsice/thsice_extend.F 12 THSICE_EXTEND 
     O                  qleft, fresh, fsalt,
./pkg/thsice/thsice_extend.F 53 THSICE_EXTEND 
      _RL qleft