zmake()

subroutine zmake	(	character*2	type,
		character*1	uplo,
		character*1	diag,
		integer	m,
		integer	n,
		complex*16, dimension( nmax, * )	a,
		integer	nmax,
		complex*16, dimension( * )	aa,
		integer	lda,
		logical	reset,
		complex*16	transl
	)