Installers' Note                                            Appendix A

		       Interface Source Changes
		       Open Inventor Interface

You may wish to modify the following to suit your local environment:

(a) J06WDF

    The default number of Open Inventor output files that may be
    produced in a single program run is currently set to 999. This
    number may be changed by modifying the value assigned to parameter
    MAXFRM.

    Note: some additional code will have to be included in the routine
    if MAXFRM is set to a value greater than 999. In particular, for
    values of MAXFRM which are greater than 999 but less than 10000 an
    additional CHARACTER*4 variable called STR4 will be required.

      C
      C     Open a new Inventor output file for the next frame
      C     Checking if the maximum number of frames is not exceeded
      C
            NFRAME = NFRAME + 1
            NAME(LENGTH:LENGTH) = '.'
            LENGTH = LENGTH + 1
            IF (NFRAME.LE.MAXFRM) THEN
               IF (NFRAME.LT.10) THEN
                  WRITE (STR1,FMT='(I1)') NFRAME
                  NAME(LENGTH:LENGTH) = STR1
                  LENGTH = LENGTH + 1
               ELSE IF (NFRAME.LT.100) THEN
                  WRITE (STR2,FMT='(I2)') NFRAME
                  NAME(LENGTH:LENGTH+1) = STR2
                  LENGTH = LENGTH + 2
               ELSE IF (NFRAME.LT.1000) THEN
                  WRITE (STR3,FMT='(I3)') NFRAME
                  NAME(LENGTH:LENGTH+2) = STR3
                  LENGTH = LENGTH + 3
               END IF
            ELSE
               CALL J06VAF(0,NERR)
               WRITE (OUTSTR,FMT=99999)
               CALL X04BAF(NERR,OUTSTR)
               WRITE (OUTSTR,FMT=99998)
               CALL X04BAF(NERR,OUTSTR)
               STOP
            END IF

    Important: if you modify the maximum number of Open Inventor
    output files set as default by routine J06WDF you should ensure
    that you inform all users at your site. The defaults (as supplied
    by NAG) are printed in the appropriate Interface Usage document to
    be found at the back of the Reference Manual.

(b) J06XAF

    (a) The default NAG pen values for this interface are defined in
        the INTEGER array NGPEN. These may be redefined by modifying
        the following piece of code:

         C
         C     Set up default set of four NAG pens (BJ06XA)
         C     Use as many different attributes as are available
         C
               DO 20 I = 1, 4
                  NGPEN(I,1) = colour index       range [0,MXCOL]
                  NGPEN(I,2) = line style index   range [0,MXLINE]
                  NGPEN(I,3) = text font index    range [0,MXFONT]
            20 CONTINUE

       where MXCOL=16, MXLINE=4, and MXFONT=12.

    (b) The default NAG brush values for this interface are defined in
        the INTEGER arry NGBR. These may be redefined by modifying the
        following piece of code:

         C
         C     Set up two default sets each of sixteen brushes (EJ06XA)
         C     Palette 1 - Inventor area fill
         C     Palette 2 - NAG Software fill
         C
               DO 80 I = 1, 16
                  NGBR(1,I,1) = colour index         range [0,MXCOL]
                  NGBR(1,I,2) = area fill style
                  NGBR(1,I,3) = area fill index
            80 CONTINUE
               DO 100 I = 1, 16
                  NGBR(2,I,1) = colour index         range [0,MXCOL]
                  NGBR(2,I,2) = area fill style
                  NGBR(2,I,3) = area fill index
           100 CONTINUE

       where MXCOL=16.

    (c) The default version of this interface sets up 12 different
        fonts in array FNTSTL. Should you wish to change these fonts,
        for example if different fonts are available in your computing
        environment, you may change the defaults by modifying the
        CHARACTER*26 array FNTLST(15) in COMMON block ZJ06ZA:

               FNTLST(1) = 'Times-Roman'
               FNTLST(2) = 'Courier'
               FNTLST(3) = 'Times-Italic'
               FNTLST(4) = 'Helvetica'
               FNTLST(5) = 'Helvetica-BoldOblique'
               FNTLST(6) = 'Amie'
               FNTLST(7) = 'DJB'
               FNTLST(8) = 'Tymes-Elfin'
               FNTLST(9) = 'Rock'
               FNTLST(10) = 'Haeberli'
               FNTLST(11) = 'Honesty'
               FNTLST(12) = 'Inja'

        Note: provision has been made to specify a total of 15 fonts
        in array FNTLST. If you decide to change the number of fonts,
        then you must also change the value of MXFONT (set in this
        routine).

	Important: if you modify the number of fonts or the
        specification of the fonts, you should ensure that you inform
        all users at your site. The defaults (as supplied by NAG) are
        printed in the appropriate Interface Usage document to be
        found at the back of the Reference Manual.

(c) J06YNF

    This routine currently supports area filling of a polygon with no
    more than 100 vertices. Should this prove insufficient you may
    increase this by amending the variable NCORD (initialised via a
    PARAMETER statement).