dinitmat()

subroutine dinitmat	(	character*1	uplo,
		character*1	diag,
		integer	m,
		integer	n,
		double precision, dimension(*)	mem,
		integer	lda,
		integer	ipre,
		integer	ipost,
		double precision	checkval,
		integer	testnum,
		integer	myrow,
		integer	mycol
	)

Definition at line 8525 of file blacstest.f.

      CHARACTER*1 UPLO, DIAG
      INTEGER M, N, LDA, IPRE, IPOST, TESTNUM, MYROW, MYCOL
      DOUBLE PRECISION CHECKVAL
      DOUBLE PRECISION MEM(*)
*
*     .. External subroutines ..
      EXTERNAL dgenmat, dpadmat
*     ..
*     .. executable statements ..
*
      CALL dgenmat( m, n, mem(ipre+1), lda, testnum, myrow, mycol )
      CALL dpadmat( uplo, diag, m, n, mem, lda, ipre, ipost, checkval )
*
      RETURN

Here is the call graph for this function:

Here is the caller graph for this function: