The minimal HIGZ program

We are now able to write the minimal HIGZ program which only opens and closes HIGZ without doing any graphics. All the graphics routines described in the rest of this manual will be placed between the call to IGSSE and the call to IGEND. 
                     The minimal HIGZ program
                                  
      PROGRAM MINIMAL
*
      PARAMETER (NWPAW=20000)
      COMMON/PAWC/RPAW(NWPAW)
*                                Initialize storage in /PAWC/.
      CALL MZPAW(NWPAW,'M')
*                                Initialize HIGZ.
      CALL IGINIT(0)
*                                Set standard environment.
*                                Errors are written to standard output (UNIT 6).
*                                Workstation type is 1.
      CALL IGSSE(6,1)
*                                Deactivate and close all open workstations
*                                Close HIGZ.
      CALL IGEND
*
      END
Note that by default the MZPAW routine does a verbose initialization of ZEBRA. To have a quiet initialization the single call to MZPAW should be replaced by: 
      CALL MZEBRA(-3)
      CALL MZPAW(NWPAW,' ')
Warning: on the IBM VM/CMS systems, if HIGZ is used with the X11 driver a: 
      CALL INITC
is mandatory in the main program to force the loading of the C library.