-/C+/,/C-/
C+
	COMMON /BUFF/ INEXT, IBYE, BUFS(256,10)
	COMMON /ENTRY/ XENTRY, YENTRY, DIMEN, XMAX, YMAX, YMIN
	COMMON /HCDB/ ICASE, NVEC, IWIDTH, LL0, LL0D, SCALE, SCALED,
	1  COSUPC, SINUPC, COSUPD, SINUPD, COSUPT, SINUPT, DES, DEF
	COMMON /HCS/ XLINE, YLINE, XBASE, YBASE, MAJLVL, MINLVL,
	1  XLL, YLL, SIZEF, COSUPF, SINUPF, SIZEC, XDIV, YDIV,
	1  XSAVE, YSAVE, MAJSAV, MINSAV,
	1  XSNGLE, YSNGLE, MAJSNG, MINSNG,
	1  XDBLE, YDBLE, MAJDBL, MINDBL,
	1  XVEX, YVEX, MAJVEX, MINVEX
	COMMON /PLTR/ ILun, IDev, IsTerm, IMode, IXMax, IYMax,
	1  Cnvrsn, CMag, CnvMag, IX0, IY0, KSetNo, IFancy, IBfDv3,
	1  CSize, DeltaH, DeltaV, Upsiln, CosUp, SinUp, WidAdj
	INTEGER DES, DEF
	LOGICAL DIMEN
	LOGICAL*1 BUFS
C-
/