c Surface fluxes saved when SAVEFCOR=T, for both diagnostic purposes and the
c the purposes of deriving flux adjustments.
c SJP 2004/09/10

      real sfluxes
      common/fcorr/sfluxes(lon,lat2,14)