Symbol Description Uses
wT_Heat 10



File Line number Procedure Code
./pkg/monitor/mon_surfcor.F 165 MON_SURFCOR
          wT_Heat = wT_Heat   + wH_Tile
./pkg/monitor/mon_surfcor.F 174 MON_SURFCOR
        _GLOBAL_SUM_R8(wT_Heat,myThid) 
./pkg/monitor/mon_surfcor.F 180 MON_SURFCOR
         wT_Heat = wT_Heat / theArea
./pkg/monitor/mon_surfcor.F 182 MON_SURFCOR
         wT_Heat  = wT_Heat  * rhoConst*recip_horiVertRatio
./pkg/monitor/mon_surfcor.F 192 MON_SURFCOR
       CALL MON_OUT_RL( '_Heat' , wT_Heat, mon_foot_mean ,myThid)
./pkg/monitor/mon_surfcor.F 54 MON_SURFCOR
      _RL theArea, wT_Mean, wS_Mean, wT_Heat
./pkg/monitor/mon_surfcor.F 64 MON_SURFCOR
       wT_Heat = 0.