+++ /dev/null
-*DECK FDUMP
- SUBROUTINE FDUMP
-C***BEGIN PROLOGUE FDUMP
-C***PURPOSE Symbolic dump (should be locally written).
-C***LIBRARY SLATEC (XERROR)
-C***CATEGORY R3
-C***TYPE ALL (FDUMP-A)
-C***KEYWORDS ERROR, XERMSG
-C***AUTHOR Jones, R. E., (SNLA)
-C***DESCRIPTION
-C
-C ***Note*** Machine Dependent Routine
-C FDUMP is intended to be replaced by a locally written
-C version which produces a symbolic dump. Failing this,
-C it should be replaced by a version which prints the
-C subprogram nesting list. Note that this dump must be
-C printed on each of up to five files, as indicated by the
-C XGETUA routine. See XSETUA and XGETUA for details.
-C
-C Written by Ron Jones, with SLATEC Common Math Library Subcommittee
-C
-C***REFERENCES (NONE)
-C***ROUTINES CALLED (NONE)
-C***REVISION HISTORY (YYMMDD)
-C 790801 DATE WRITTEN
-C 861211 REVISION DATE from Version 3.2
-C 891214 Prologue converted to Version 4.0 format. (BAB)
-C***END PROLOGUE FDUMP
-C***FIRST EXECUTABLE STATEMENT FDUMP
- RETURN
- END