C
C    +++++++++++++++++++PLOT.INC+++++++++++++++++++
C  To make hardcopies with the cal-tek graphics package, the user
C  must specify a file to store the graphics commands and then
C  copy /b those files to the printer.  For each hardcopy plot a 
C  new file name must be specified.  This include statement sets
C  up a file name, which will be incremented each time a plot is
C  made in any subroutine.
C
      CHARACTER *8 PLOTFILE
      CHARACTER *4 PLOT_DEV
      INTEGER *4 NPLOTS
      COMMON /HCPBLK/ NPLOTS
      COMMON /PFILE  / PLOTFILE, PLOT_DEV