C-----THIS IS COMMON/INCLUDE FILE DPCODV.INC-----
C     THIS IS COMMON FOR DEVICE-DEPENDENT GRAPHICS
C
C     UPDATED--SPRING  1990.  MANY X11 & OTHER DEVICE UPDATES (ALAN)
C     UPDATED JANUARY  1991.  ADD COLOR DEFINITIONS FOR REGIS
C     UPDATED-MAY      1991.  ADD TURBO-C (JJF)
C     UPDATED OCTOBER  1991.  ADDED VARIABLES FOR POSTSCRIPT
C     UPDATED MAY      1992.  POSTSCRIPT (INITIAL) BLANK PAGE SWITCH
C     UPDATED MAY      1992.  CHANGE SIZE OF IX11DN
C     UPDATED MAY      1992.  (RE)FIX COMMON FOR TURBOC-C FRONTEND
C     UPDATED FEBRUARY 1993.  ADD IPLATF TO COMMON
C     UPDATED JUNE     1994.  ADD HARDWARE FILL SWITCH FOR CERTAIN
C                             DEVICES.
C     UPDATED JULY     1996.  LAHEY DRIVER SWITCHES
C     UPDATED NOVEMBER 1996.  MICROSOFT DRIVER SWITCHES
C     UPDATED OCTOBER  1997.  X11 UPDATE
C     UPDATED DECEMBER 1997.  GENERAL DEVICE UPDATE
C     UPDATED JULY     1998.  QWIN ENHNCEMENTS
C     UPDATED FEBRUARY 2001.  LAHEY WINTERACTOR 
C     UPDATED FEBRUARY 2001.  OPEN-GL
C     UPDATED MARCH    2002.  SVG (SCALABLE VECTOR GRAPHICS)
C     UPDATED MARCH    2005.  AQUATERM
C     UPDATED FEBRUARY 2006.  LATEX
C
C    THESE VARIABLES ARE INITIALIZED IN "INITOD".  SOME OF THE INITIAL
C    VALUES MAY NEED TO BE MODIFIED FOR THE GIVEN MODEL OF A DEVICE AT
C    A PARTICUALR SITE.
C
C ----------------------------------------------------
C    CALCOMP:
C
C    ICALSW  - SWITCH FOR INITIAL PAGE ERASE WHEN DEVICE INITIALIZED
C    ICALCL  - NUMBER OF COLORS (I.E., PENS) SUPPORTED BY THE PLOTTER
C              USE 0 FOR 1 PEN PLOTTERS
C    ICALCC  - CURRENT COLOR
C    PCALTH  - WIDTH OF CALCOMP LINE
C    ICALPM  - CALCOMP PEN MAP
C    ICALPF  - FLAG FOR CALCOMP PEN MAP
C
      CHARACTER*4 ICALSW
      CHARACTER*4 ICALPM
      CHARACTER*4 ICALPF
      COMMON/CCALCP/ICALSW,ICALPF,ICALPM(16)
      COMMON/ICALCP/ICALCL
      COMMON/ICALC2/ICALCC
      COMMON/RCALCP/PCALTH
C
C ----------------------------------------------------
C    ZETA:
C
C    IZETSW  - SWITCH FOR INITIAL PAGE ERASE WHEN DEVICE INITIALIZED
C    IZETCL  - NUMBER OF COLORS (I.E., PENS) SUPPORTED BY THE PLOTTER
C              USE 0 FOR 1 PEN PLOTTERS
C    IZETCC  - CURRENT COLOR
C    IZETLN  - DASH PATTERN (0=SOLID, 1-6=PREDFINED DASH PATTERNS)
C    PZETTH  - WIDTH OF ZETA LINE
C    IZETPM  - ZETA PEN MAP
C    IZETPF  - FLAG FOR ZETA PEN MAP
C
      CHARACTER*4 IZETSW
      CHARACTER*4 IZETPM
      CHARACTER*4 IZETPF
      COMMON/CZETA/IZETSW,IZETPF,IZETPM(16)
      COMMON/IZETA/IZETCL,IZETLN
      COMMON/IZET2/IZETCC
      COMMON/RZETA/PZETTH
C
C ----------------------------------------------------
C    PCL (HP LASER JET LASER PRINTERS):
C
C    IPCLLM  - LEFT MARGIN LANDSCAPE MODE
C    IPCLRM  - RIGHT MARGIN LANDSCAPE MODE
C    IPCLTM  - TOP MARGIN LANDSCAPE MODE
C    IPCLBM  - BOTTOM MARGIN LANDSCAPE MODE
C    IPC2LM  - LEFT MARGIN PORTRAIT MODE
C    IPC2RM  - RIGHT MARGIN PORTRAIT MODE
C    IPC2TM  - TOP MARGIN PORTRAIT MODE
C    IPC2BM  - BOTTOM MARGIN PORTRAIT MODE
C    PCLPPI  - POINTS PER INCH
C    IPCLFN  - PCL HARDWARE FONT
C    IPCLFC  - CURRENT SETTING OF HARDWARE FONT
C
      CHARACTER*4 IPCLFN,IPCLFC
      COMMON/CPCL/IPCLFN,IPCLFC
      COMMON/IPCL/IPCLLM,IPCLRM,IPCLTM,IPCLBM,
     1            IPC2LM,IPC2RM,IPC2TM,IPC2BM,
     1            PCLPPI
C
C ----------------------------------------------------
C    QUIC (QMS AND TELARIS LASER PRINTERS)
C
C    IQUILM  - LEFT MARGIN LANDSCAPE MODE
C    IQUIRM  - RIGHT MARGIN LANDSCAPE MODE
C    IQUITM  - TOP MARGIN LANDSCAPE MODE
C    IQUIBM  - BOTTOM MARGIN LANDSCAPE MODE
C    IQU2LM  - LEFT MARGIN PORTRAIT MODE
C    IQU2RM  - RIGHT MARGIN PORTRAIT MODE
C    IQU2TM  - TOP MARGIN PORTRAIT MODE
C    IQU2BM  - BOTTOM MARGIN PORTRAIT MODE
C    QUIPPI  - POINTS PER INCH
C    IQUIFN  - QUIC HARDWARE FONT
C    IQUIFC  - CURRENT SETTING OF QUIC HARDWARE FONT
C
      COMMON/IQUIC/IQUILM,IQUIRM,IQUITM,IQUIBM,
     1            IQU2LM,IQU2RM,IQU2TM,IQU2BM,
     1            QUIPPI,IQUIFN,IQUIFC
C
C ----------------------------------------------------
C    POSTSCRIPT
C
C    IPSTLM  - LEFT MARGIN LANDSCAPE MODE
C    IPSTRM  - RIGHT MARGIN LANDSCAPE MODE
C    IPSTTM  - TOP MARGIN LANDSCAPE MODE
C    IPSTBM  - BOTTOM MARGIN LANDSCAPE MODE
C    IPSTLM  - LEFT MARGIN PORTRAIT MODE
C    IPS2RM  - RIGHT MARGIN PORTRAIT MODE
C    IPS2TM  - TOP MARGIN PORTRAIT MODE
C    IPS2BM  - BOTTOM MARGIN PORTRAIT MODE
C    PSTPPI  - POINTS PER INCH
C    IPSTFN  - POSTSCRIPT HARDWARE FONT
C    IPSTPS  - POSTSCRIPT POINT SIZE
C    IPSTFC  - CURRENT SETTING OF HARDWARE FONT
C    IPSTPC  - CURRENT SETTING OF POINT SIZE
C    IPSTPO  - INITIAL POINT SIZE (IS RESET WHENEVER A NEW PAGE DONE)
C    IPSTFO  - FONT SET IN GRINDE (THIS GETS RESET BY GRERSC)
C    IPSTPN  - PAGE NUMBER FOR POSTSCRIPT
C    IPSTSP  - "%!" START IN COLUMN 1 (UNIX) OR COLUMN 2 (VAX/VMS)
C    IPSTT1  - TABLE WITH POSTSCRIPT FONTS (SHORT NAMES)
C    IPSTT2  - TABLE WITH POSTSCRIPT FONTS (LONG NAMES)
C    IPSTMF  - NUMBER OF SUPPORTED POSTSCRIPT FONTS
C    IPSTBP  - (INITIAL) BLANK PAGE SWITCH (ON/OFF)
C    IPSTFS  - HARDWARE FILL SWITCH (ON/OFF)
C  IPSTFO ADDED JUNE, 1989.
C  IPSTPN ADDED JANUARY, 1990.
C  IPSTSP ADDED OCTOBER, 1991.
C  IPSTT1 ADDED OCTOBER, 1991.
C  IPSTT2 ADDED OCTOBER, 1991.
C  IPSTMF ADDED OCTOBER, 1991.
CCCCC IPSTBP (POSTSCRIPT BLANK PAGE SWITCH) ADDED  MAY 1992 (JJF)
CCCCC SEE ALSO INITOD.FOR                          MAY 1992
C
      CHARACTER*4 IPSTFN,IPSTFC,IPSTFO,IPSTSP,IPSTT1
      CHARACTER*40 IPSTT2
CCCCC THE FOLLOWING LINE WAS ADDED   MAY 1992
      CHARACTER*4 IPSTBP
      CHARACTER*4 IPSTFS
CCCCC THE FOLLOWING LINE WAS CHANGED   MAY 1992
CCCCC COMMON/CPST/IPSTFN,IPSTFC,IPSTFO,IPSTSP,
      COMMON/CPST/IPSTFN,IPSTFC,IPSTFO,IPSTSP,IPSTBP,
     1            IPSTT1(100),IPSTT2(100),
     1            IPSTFS
      COMMON/IPST/IPSTLM,IPSTRM,IPSTTM,IPSTBM,
     1            IPS2LM,IPS2RM,IPS2TM,IPS2BM,
     1            PSTPPI,IPSTPS,IPSTPC,IPSTPN,
     1            IPSTPO,IPSTMF
C
C ----------------------------------------------------
C    SUN WORKSTATION
C
C    IVSNAM     -
C    ISUNCL     - NUMBER OF COLORS ON SUN
C                 (SET TO 0 FOR BLACK AND WHITE)
C    PSUNTH     - LINE THICKNESS FOR SUN
C
      COMMON/ISUN/IVSNAM,ISUNCL
      COMMON/RSUN/PSUNTH
C
C ----------------------------------------------------
C    CGM, GENERAL DEVICE
C
C    ICGMSW     - "ON" IF A PICTURE IS OPEN
C    IGENFA     - SCALE FACTOR FOR "GENERAL CODED PACKED" DEVICE
C                 ADDED DECEMBER 1997
C
      CHARACTER*4 ICGMSW
      COMMON/CCGM/ICGMSW
      COMMON/IGENSW/IGENFA
C
C ----------------------------------------------------
C    TEKTRONIX
C
C    PTEKTH  - WIDTH OF TEKTRONIX LINE
C
      COMMON/RTEK/PTEKTH
C
C ----------------------------------------------------
C    HP-GL
C
C    PHPGTH  - WIDTH OF HP-GL LINE
C    IHPGSW  - "ON" AFTER FIRST SCREEN ERASE
C    IHPGPM  - HP-GL PEN MAP
C    IHPGPF  - FLAG FOR HP-GL PEN MAP
C    IHPGCL  - NUMBER OF PENS AVAILABLE ON PLOTTER
C    IHPGX   - X DIMENSION OF PLOTTER
C    IHPGY   - Y DIMENSION OF PLOTTER
C
      CHARACTER*4 IHPGSW
      CHARACTER*8 IHPGPM
      CHARACTER*4 IHPGPF
      COMMON/CHPGL/IHPGSW,IHPGPF,IHPGPM(16)
      COMMON/RHPGL/PHPGTH
      COMMON/IHPGL/IHPGCL,IHPGX,IHPGY
C
C ----------------------------------------------------
C    HP 7221
C
C    P722TH  - WIDTH OF HP-7221 LINE
C
      COMMON/RHP722/P722TH
C
C ----------------------------------------------------
C    HP-2622
C
C    P262TH  - WIDTH OF HP-2622 LINE
C
      COMMON/RHP262/P262TH
C
C ----------------------------------------------------
C    REGIS
C
C    PREGTH  - WIDTH OF REGIS LINE
C    IRGHUE  - HUES FOR 64 REGIS COLORS
C    IRGLGT  - LIGHT FOR 64 REGIS COLORS
C    IRGSAT  - SATURATION FOR 64 REGIS COLORS
C    IREGPM  - CURRENT INDEX
C    IREGMC  - MAXIMUM NUMBER OF FOREGROUND COLORS
C
      COMMON/RREGIS/PREGTH
      COMMON/IREGIS/IRGHUE(64),IRGLGT(64),IRGSAT(64),IREGPM(16),IREGMC
C
C ----------------------------------------------------
C    X11
C
C    IX11CS  - X11 CAP STYLE (BUTT, ROUND, PROJECT)
C    IX11JS  - X11 JOIN STYLE (MITER, ROUND, BEVEL)
C    IX11PM  - X11 PIXMAP
C    IX11FN  - X11 FONT NAME
C    IX11OF  - X11 WINDOW OPEN FLAG
C    IX11PA  - X11 PAUSE COMMAND
C    IX11DN  - X11 DISPLAY NAME
C    IX11FS  - X11 HARDWARE FILL SWITCH
CCCC FOLLOWING LINE ADDED OCTOBER 1997.
C    IX11W2  - X11 WINDOW ID FOR REPEAT/SAVE GRAPH COMMANDS
C
CCCC ADD SUPPORT FOR SAVING AND RESTORING PIXMAPS APRIL 1997.
C
      CHARACTER*8 IX11CS
      CHARACTER*8 IX11JS
      CHARACTER*4 IX11PM
      CHARACTER*80 IX11FN
      CHARACTER*4 IX11OF
      CHARACTER*4 IX11PA
      CHARACTER*4 IX11FS
      CHARACTER*8 IX11W2
CCCCC THE FOLLOWING LINE WAS CHANGED MAY 1992 (ALAN)
CCCCC CHARACTER*20 IX11DN
      CHARACTER*80 IX11DN
      COMMON/CX11/IX11CS,IX11JS,IX11PM,IX11FN,IX11OF,IX11PA,
     1            IX11DN,
     1            IX11FS,
     1            IX11W2
C
C ----------------------------------------------------
C    OPG
C
C    IOPGPM  - OPG PIXMAP
C    IOPGFN  - OPG FONT NAME
C    IOPGOF  - OPG WINDOW OPEN FLAG
C    IOPGDN  - OPG DISPLAY NAME
C    IOPGFS  - OPG HARDWARE FILL SWITCH
C    IOPGW2  - OPG WINDOW ID FOR REPEAT/SAVE GRAPH COMMANDS
C
      CHARACTER*4 IOPGPM
      CHARACTER*80 IOPGFN
      CHARACTER*4 IOPGOF
      CHARACTER*4 IOPGFS
      CHARACTER*8 IOPGW2
      CHARACTER*80 IOPGDN
      COMMON/COPG/IOPGPM,IOPGFN,IOPGOF,IOPGDN,IOPGFS,IOPGW2
C
CCCCC THE FOLLOWING TURBO-C SECTION WAS ADDED MAY 1991  (JJF)
C ----------------------------------------------------
C     TURBO-C / VGA
C
C     DEFINE THE 4 GENERAL TURBO-C SWITCHES.
C     NOTE--THERE ARE 4 TURBO-C SWITCHES--
C           1. TCLOAD
C              HAS CMAIN.EXE BEEN LOADED (& INIT. EXEC.)? YES/NO
C           2. TCMENU
C              IS THE TURBO C MENU ON/OFF THE SCREEN?     ON/OFF
C           3. TCPLFI
C              WHAT IS STATUS OF THE TURBO C PLOT FILE?   OPEN/CLOS
C           4. TCTEFI
C              WHAT IS STATUS OF THE TURBO C TEXT FILE?   OPEN/CLOS
C     NOTE--THEY ARE INITIALLY ALLOCATED IN DPCODV.INC
C           THEY ARE INITIALLY DEFINED   IN INITOD.FOR
C           THEY ARE USED                IN TCDRIV.FOR & CMAIN.C
C
      CHARACTER*4 TCLOAD
      CHARACTER*4 TCMENU
      CHARACTER*4 TCPLFI
      CHARACTER*4 TCTEFI
      CHARACTER*4 ITCST
CCCCC THE FOLLOWING LINE WAS ADDED MAY 1992 (JJF)
CCCCC IT DEFINES THE PLATFORM (WITHINMENU OR STANDALONE)
CCCCC FOR THE TURBO-C FRONTEND ROUTINE   do_vga_pass WITHIN magevga.c
      CHARACTER*10 IPLATF
C
C     DEFINE FORTRAN TO C COMMON
C
CCCCC THE FOLLOWING LINE WAS CHANGED MAY 1992 (JJF)
CCCCC CHARACTER*80 TEXTFC
      CHARACTER*84 TEXTFC
CCCCC THE FOLLOWING LINE WAS ADDED JUNE 1992 (JJF)
      CHARACTER*84 TEXTCF
CCCCC THE FOLLOWING LINE WAS ADDED MAY 1992 (JJF)
CCCCC THE FOLLOWING LINE WAS CHANGED JUNE 1992 (JJF)
CCCCC CHARACTER*84 ICOMLI
      CHARACTER*84 PLOTFC
C
CCCCC THE FOLLOWING LINE WAS CHANGED FEBRUARY 1993 (JJF)
CCCCC COMMON /TC/ TCLOAD,TCMENU,TCPLFI,TCTEFI,ITCST
CCCCC COMMON /TC/ TCLOAD,TCMENU,TCPLFI,TCTEFI,ITCST,IPLATF
      COMMON /TC/ TCLOAD,TCMENU,TCPLFI,TCTEFI,ITCST,IPLATF
C
CCCCC THE FOLLOWING 2 LINES WERE CHANGED MAY 1992 (JJF)
CCCCC COMMON /FC/ TEXTFC
CCCCC COMMON /FC2/NTEXTF
CCCCC NOTE--ON THE C SIDE, THE COMMON STRUCTURE IN CMAIN.C
CCCCC SHOULD BE IDENTICAL IN STRUCTURE TO THE FOLLOWING   5/92
C.... COMMON /FC/NTEXTF,NCOMLI
C.... COMMON /FC2/TEXTFC,ICOMLI(11)
C.... COMMON /FC/TEXTFC,ICOMLI(11)
C.... COMMON /FC2/NTEXTF,NCOMLI
CCCCC THE FOLLOWING LINE WAS CHANGED JUNE 1992
CCCCC COMMON /FC/NTEXTF,NCOMLI,TEXTFC,ICOMLI(11)
      COMMON /FC/NTEXTF,NTEXTC,NPLOTF,TEXTFC,TEXTCF,PLOTFC(11)
C
CCCCC ADD FOLLOWING SECTION JULY, 1996.
C ----------------------------------------------------
C    LAHEY:
C
C    ILAHSW  - OFF MEANS NORMAL TEXT MODE, ON MEANS GRAPHICS MODE
C    ILAHGR  - BIOS MEANS GRAPHICS VIA BIOS CALLS, DIRE MEANS WRITE
C              TO VIDEO MEMORY
C    ILAHCL  - ON MEANS SWITCH TO TEXT MODE AFTER PLOT IS DRAWN, OFF
C              MEANS LEAVE IN GRAPHICS MODE
C    ILAHPA  - ON MEANS PROMPT FOR CARRIAGE RETURN AT END OF PLOT, OFF
C              MEANS CONTINUE NORMALLY
C    ILAHNC  - NUMBER OF COLORS
C    ILAHCC  - CURRENT COLOR
C    PLAHTH  - WIDTH OF LAHEY LINE
C    ILAHPM  - LAHEY PEN MAP
C    ILAHPF  - FLAG FOR LAHEY PEN MAP
C
      CHARACTER*4 ILAHSW
      CHARACTER*4 ILAHGR
      CHARACTER*4 ILAHCL
      CHARACTER*4 ILAHPA
      CHARACTER*4 ILAHPM
      CHARACTER*4 ILAHPF
      COMMON/CLAHCP/ILAHSW,ILAHGR,ILAHCL,ILAHPA,ILAHPF,ILAHPM(16)
      COMMON/ILAHCP/ILAHNC,ILAHCC
      COMMON/RLAHCP/PLAHTH
C
CCCCC ADD FOLLOWING SECTION NOVEMBER, 1996.
C ----------------------------------------------------
C    MICROSOFT QUICK-WIN:
C
C    IQWNFC  - <TEXT/GRAPH> AFTER PLOT, FOCUS RETURNS TO TEXT SCREEN
C              IF TEXT, STAYS ON GRAPHICS SCREEN IF <GRAPHICS>
C    IQWNCL  - <VGA/SVGA/DIRECT OR RGB>
C    IQWNFN  - MICROSOFT QUICK-WIN FONT NAME
C    IQWNPF  - FLAG FOR MICROSOFT PEN MAP
C    IQWNBC  - COLOR FOR TEXT WINDOW BACKGROUND
C    IQWNF2  - COLOR FOR TEXT WINDOW FOREGROUND
C
      CHARACTER*4 IQWNFC
      CHARACTER*4 IQWNCL
      CHARACTER*80 IQWNFZ
      CHARACTER*4 IQWNPF
      CHARACTER*4 IQWNPM
      CHARACTER*4 IQWNTC
      COMMON/CQWNCP/IQWNFC,IQWNCL,IQWNFZ,IQWNPF,IQWNTC,IQWNPM(255)
      COMMON/CQWNIP/IQWNBC,IQWNF2
C
C
CCCCC ADD FOLLOWING SECTION FEBRUARY, 2001.
C ----------------------------------------------------
C    LAHEY WINTERACTOR:
C
C    IWINCL  - LAHEY COLOR <VGA/RGB>
C    IWINFN  - LAHEY QUICK-WIN FONT NAME <STANDARD/FIXED/DUPLEXR/
C              TRIPLEXR/SWISS>
C    IWINHP  - HORIZONTAL PIXELS
C    IWINVP  - VERTICAL PIXELS
C
      CHARACTER*4 IWINCL
      CHARACTER*4 IWINFN
      COMMON/CWINCP/IWINCL,IWINFN
      COMMON/IWINIP/IWINHP,IWINVP
C
CCCCC ADD FOLLOWING SECTION MARCH, 2002.
C ----------------------------------------------------
C    SVG (SCALABLE VECTOR GRAPHICS)
C
C    ISVGOS  - OPEN SWITCH (OFF/ON), NOT SET BY USER
C    ISVGCS  - COORDINATE SYSTEM (PIXEL/PERCENT)
C    ISVGFN  - FONT NAME (FAMILY)
C    ISVGFW  - FONT WEIGHT
C    ISVGST  - FONT STYLE
C    ISVGCA  - SVG CAP STYLE (BUTT, ROUND, SQUARE, NONE)
C    ISVGJS  - SVG JOIN STYLE (MITER, ROUND, BEVEL, NONE)
C    ISVGFS  - SVG HARDWARE FILL SWITCH (NONZERO/EVENODD/SOFTWARE)
C    ISVGSS  - SVG STYLE SHEET (INTERNAL/EXTERNAL/NONE)
C    ISVGSN  - SVG STYLE SHEET NAME (NAME OF FILE CONTAINING
C              EXTERNAL FILE SHEET)
C    ISVGFC  - SVG FOREGROUND COLOR (DEFAULT COLOR FOR STYLE SHEETS)
C    ISVGCN  - GRAPH COUNTER
C
      CHARACTER*4 ISVGOS
      CHARACTER*4 ISVGCS
      CHARACTER*4 ISVGCA
      CHARACTER*4 ISVGJS
      CHARACTER*4 ISVGST
      CHARACTER*4 ISVGSS
      CHARACTER*4 ISVGFW
      CHARACTER*4 ISVGFS
      CHARACTER*4 ISVGFC
      CHARACTER*32 ISVGFN
      CHARACTER*80 ISVGSN
      COMMON/CSVGCP/ISVGOS,ISVGCS,ISVGCA,ISVGJS,ISVGFS,ISVGSS,
     1              ISVGFW,ISVGST,ISVGFC
      COMMON/CSVGC2/ISVGFN
      COMMON/CSVGC3/ISVGSN
      COMMON/ISVGCP/ISVGCN
C
C ----------------------------------------------------
C    AQUATERM
C
C    IAQUCS  - AQUATERM CAP STYLE (BUTT, ROUND, PROJECT)
C    IAQUJS  - AQUATERM JOIN STYLE (MITER, ROUND, BEVEL)
C    IAQUFN  - AQUATERM FONT NAME
C    IAQUOF  - AQUATERM WINDOW OPEN FLAG
C    IAQUFS  - AQUATERM HARDWARE FILL SWITCH
C
      CHARACTER*8 IAQUCS
      CHARACTER*8 IAQUJS
      CHARACTER*80 IAQUFN
      CHARACTER*4 IAQUOF
      CHARACTER*4 IAQUFS
      COMMON/CAQU/IAQUCS,IAQUJS,IAQUFN,IAQUOF,IAQUFS
C
CCCCC ADD FOLLOWING SECTION FEBRUARY, 2006.
C ----------------------------------------------------
C    LATEK
C
C    ILATOS  - OPEN SWITCH (OFF/ON), NOT SET BY USER
C    ILATCO  - LATEX COLOR <OFF/ON>
C    ILATFS  - LATEX HARDWARE FILL <ON/OFF>
C    ILATLT  - LATEX LINE THICKNESS <HARDWARE/SOFTWARE>
C
      CHARACTER*4 ILATOS
      CHARACTER*4 ILATCO
      CHARACTER*4 ILATFS
      CHARACTER*4 ILATLT
      COMMON/CLATCP/ILATOS,ILATCO,ILATFS,ILATLT
C
