      SUBROUTINE FDUMP
C***FIRST EXECUTABLE STATEMENT  FDUMP
      RETURN
      END
