cprcn3()

subroutine cprcn3	(	integer	nout,
		integer	nc,
		character*12	sname,
		integer	iorder,
		character*1	side,
		character*1	uplo,
		character*1	transa,
		character*1	diag,
		integer	m,
		integer	n,
		complex	alpha,
		integer	lda,
		integer	ldb
	)