gpamela/gpgar/graphics.inc

*
* $Id$
*
* $Log$
*
*
* graphics.inc
*
*CMZ :  3.00/00 02/05/2001  20.42.25  by  Unknown
*-- Author :
       REAL USERX0,USERX1,USERY0,USERY1,FRXMIN,FRXMAX,FRYMIN,FRYMAX,
     -      ARRANG,ARRLEN,DISPX0,DISPX1,DISPY0,DISPY1,
     -      GPXN,GPXN10,GPYN,GPYN10,GPXL,GPYL,GPXT
       LOGICAL LGRID,LOGX,LOGY,LSTAMP,LGCLRB,LGCLRA,LWAITA,LWAITB,LXCCH
       INTEGER NWK,WKID(MXWKLS),WKCON(MXWKLS),WKFREF(MXWKLS),
     -         WKLUN(MXWKLS),WKSTAT(MXWKLS),NCWKNM(MXWKLS),NCSTMP
       CHARACTER*20 WKNAME(MXWKLS),WKATTR(MXWKLS)
       CHARACTER*80 STAMP
       COMMON /GRADAT/ USERX0,USERX1,USERY0,USERY1,ARRANG,ARRLEN,
     -      FRXMIN,FRXMAX,FRYMIN,FRYMAX,DISPX0,DISPX1,DISPY0,DISPY1,
     -      GPXN,GPXN10,GPYN,GPYN10,GPXL,GPYL,GPXT,
     -      LGRID,LOGX,LOGY,LSTAMP,LGCLRB,LGCLRA,LWAITA,LWAITB,LXCCH,
     -      NWK,WKID,WKCON,WKFREF,WKLUN,WKSTAT,NCWKNM,NCSTMP
       COMMON /GRACHR/ WKNAME,WKATTR,STAMP
1	cafagna	3.1	*
2			* $Id$
3			*
4			* $Log$
5			*
6			*
7			* graphics.inc
8			*
9			*CMZ : 3.00/00 02/05/2001 20.42.25 by Unknown
10			*-- Author :
11			REAL USERX0,USERX1,USERY0,USERY1,FRXMIN,FRXMAX,FRYMIN,FRYMAX,
12			- ARRANG,ARRLEN,DISPX0,DISPX1,DISPY0,DISPY1,
13			- GPXN,GPXN10,GPYN,GPYN10,GPXL,GPYL,GPXT
14			LOGICAL LGRID,LOGX,LOGY,LSTAMP,LGCLRB,LGCLRA,LWAITA,LWAITB,LXCCH
15			INTEGER NWK,WKID(MXWKLS),WKCON(MXWKLS),WKFREF(MXWKLS),
16			- WKLUN(MXWKLS),WKSTAT(MXWKLS),NCWKNM(MXWKLS),NCSTMP
17			CHARACTER*20 WKNAME(MXWKLS),WKATTR(MXWKLS)
18			CHARACTER*80 STAMP
19			COMMON /GRADAT/ USERX0,USERX1,USERY0,USERY1,ARRANG,ARRLEN,
20			- FRXMIN,FRXMAX,FRYMIN,FRYMAX,DISPX0,DISPX1,DISPY0,DISPY1,
21			- GPXN,GPXN10,GPYN,GPYN10,GPXL,GPYL,GPXT,
22			- LGRID,LOGX,LOGY,LSTAMP,LGCLRB,LGCLRA,LWAITA,LWAITB,LXCCH,
23			- NWK,WKID,WKCON,WKFREF,WKLUN,WKSTAT,NCWKNM,NCSTMP
24			COMMON /GRACHR/ WKNAME,WKATTR,STAMP