C*    SFSMN - MAIN ROUTINE FOR SFS
C
      INCLUDE 'SFSCM.FTN/NOLIST'
C
      CALL SFSIN
      CALL SFSFV
      CALL SFSOT
C
      CALL SFSEX
      END