C*	C36CM - COMMON FOR 360 CONVERTER
C
	IMPLICIT LOGICAL (L)
	IMPLICIT BYTE    (B)
	IMPLICIT INTEGER*4	(K)
	INTEGER  C36SPC
C
	COMMON NINFI, NINU, NOUTFI, NOUTU, NUSCRA, NOUTI
	COMMON ICOM, LSPEC, LCMBF, LCMT, LDBOT, LEXSTM
	COMMON MXNEST, MXCBF, MXLINE
	COMMON ITYPE, IPSCL, IPECL
C
	COMMON NAME(10), IBUF(40), BCMTS(80), IDEFSP(20)
C
	DIMENSION BNAME(20), BUF(80)
	EQUIVALENCE (NAME,BNAME), (IBUF,BUF)
C
	COMMON LCDC, L360, LNONE, LS4, LS5
	DIMENSION LSW(5)
	EQUIVALENCE (LSW, LCDC)
C
	COMMON	NDVAR, MXDVAR, KDVAR(200)
	COMMON	NDATA, MXDATA, IDATA(50)
C
	COMMON NINCLS, BINLST(40,50)