Symbol Description Uses
fsh 12



File Line number Procedure Code
./pkg/thsice/thsice_get_bulkf.F 127 THSICE_GET_BULKF
     O          flwup, flh, fsh, dFlxdT(i,j), ust, vst,
./pkg/thsice/thsice_get_bulkf.F 134 THSICE_GET_BULKF
     O          flwup, flh, fsh, dFlxdT(i,j), ust, vst,
./pkg/thsice/thsice_get_bulkf.F 140 THSICE_GET_BULKF
          flxExcSw(i,j) = flwNet_dwn + fsh + flh
./pkg/thsice/thsice_get_bulkf.F 76 THSICE_GET_BULKF
      _RL  fsh           ! surface downward sensible heat (W m-2)
./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 57 BULKF_AVE
     &                   +fsh(i,j,bi,bj)*deltaTclock
./pkg/bulk_force/bulkf_forcing.F 113 BULKF_FORCING
     O            fsh(i,j,bi,bj), df0dT,
./pkg/bulk_force/bulkf_forcing.F 129 BULKF_FORCING
     O            fsh(i,j,bi,bj), df0dT,
./pkg/bulk_force/bulkf_forcing.F 147 BULKF_FORCING
             fsh(i,j,bi,bj)     = 0. _d 0
./pkg/bulk_force/bulkf_forcing.F 179 BULKF_FORCING
              hfl = hfl + fsh(i,j,bi,bj)
./pkg/bulk_force/bulkf_forcing.F 97 BULKF_FORCING
                  fsh(i,j,bi,bj) = -SHF(1)