LAPACK_zlanht_base()

double LAPACK_zlanht_base	(	char const *	norm,
		lapack_int const *	n,
		double const *	D,
		lapack_complex_double const *	E,
		size_t
	)