cprcn6()

subroutine cprcn6	(	integer	nout,
		integer	nc,
		character*12	sname,
		integer	iorder,
		character*1	uplo,
		character*1	transa,
		integer	n,
		integer	k,
		real	alpha,
		integer	lda,
		real	beta,
		integer	ldc
	)