Symbol Description Uses
fsh 9



File Line number Procedure Code
./pkg/bulk_force/BULKF_INT.h 13 NO PROCEDURE
      _RL     fsh(1-olx:snx+olx,1-oly:sny+oly,nSx,nSy)
./pkg/bulk_force/BULKF_INT.h 9 NO PROCEDURE
     &       evap, savssq, fsh, flh, fswnet, flwup, flwupnet,
./pkg/bulk_force/bulkf_ave.F 52 BULKF_AVE
     &                       +fsh(i,j,bi,bj)*deltaTclock
./pkg/bulk_force/bulkf_forcing.F 102 BULKF_FORCING
     &            fsh(i,j,bi,bj), df0dT,
./pkg/bulk_force/bulkf_forcing.F 133 BULKF_FORCING
               fsh(i,j,bi,bj)     = 0. _d 0
./pkg/bulk_force/bulkf_forcing.F 168 BULKF_FORCING
              hfl = hfl + fsh(i,j,bi,bj)
./pkg/thsice/thsice_get_bulkf.F 59 THSICE_GET_BULKF
      _RL  fsh           ! surface downward sensible heat (W m-2)
./pkg/thsice/thsice_get_bulkf.F 70 THSICE_GET_BULKF
     O        flwup, flh, fsh, df0dT, ust, vst, evap, ssq, dEvdT,
./pkg/thsice/thsice_get_bulkf.F 74 THSICE_GET_BULKF
      flxExceptSw = flwNet_dwn + fsh + flh