binaries/src/disembl/Tisean_3.0.1/source_f/slatec/fdump.f

   1 *DECK FDUMP
   2       SUBROUTINE FDUMP
   3 C***BEGIN PROLOGUE  FDUMP
   4 C***PURPOSE  Symbolic dump (should be locally written).
   5 C***LIBRARY   SLATEC (XERROR)
   6 C***CATEGORY  R3
   7 C***TYPE      ALL (FDUMP-A)
   8 C***KEYWORDS  ERROR, XERMSG
   9 C***AUTHOR  Jones, R. E., (SNLA)
  10 C***DESCRIPTION
  11 C
  12 C        ***Note*** Machine Dependent Routine
  13 C        FDUMP is intended to be replaced by a locally written
  14 C        version which produces a symbolic dump.  Failing this,
  15 C        it should be replaced by a version which prints the
  16 C        subprogram nesting list.  Note that this dump must be
  17 C        printed on each of up to five files, as indicated by the
  18 C        XGETUA routine.  See XSETUA and XGETUA for details.
  19 C
  20 C     Written by Ron Jones, with SLATEC Common Math Library Subcommittee
  21 C
  22 C***REFERENCES  (NONE)
  23 C***ROUTINES CALLED  (NONE)
  24 C***REVISION HISTORY  (YYMMDD)
  25 C   790801  DATE WRITTEN
  26 C   861211  REVISION DATE from Version 3.2
  27 C   891214  Prologue converted to Version 4.0 format.  (BAB)
  28 C***END PROLOGUE  FDUMP
  29 C***FIRST EXECUTABLE STATEMENT  FDUMP
  30       RETURN
  31       END