dprcn1()

subroutine dprcn1	(	integer	nout,
		integer	nc,
		character*12	sname,
		integer	iorder,
		character*1	transa,
		character*1	transb,
		integer	m,
		integer	n,
		integer	k,
		double precision	alpha,
		integer	lda,
		integer	ldb,
		double precision	beta,
		integer	ldc
	)