COMMON A,B,C/ABC/M,N
	COMMON X,I,J
	COMMON /ABC/Q,R,S
	END
	subroutine noname
	common x,y,i,a,b,n
	common /abc/ m,n
	end