COMMON	/PRMSYM/ OPCODE, OPVALU, OPFLAG, OPCSIZ, OPCNUM,
     $			 SUDONM, REGSYM, REGVAL, EQLIDX
	INTEGER		 OPCODE(3,124), OPVALU(124), OPFLAG(124),
     $			 OPCSIZ(124), OPCNUM, SUDONM, REGSYM(3,10),
     $			 REGVAL(10), EQLIDX