LAPACK_ztrsna_base()

void LAPACK_ztrsna_base	(	char const *	job,
		char const *	howmny,
		lapack_logical const *	select,
		lapack_int const *	n,
		lapack_complex_double const *	T,
		lapack_int const *	ldt,
		lapack_complex_double const *	VL,
		lapack_int const *	ldvl,
		lapack_complex_double const *	VR,
		lapack_int const *	ldvr,
		double *	S,
		double *	SEP,
		lapack_int const *	mm,
		lapack_int *	m,
		lapack_complex_double *	work,
		lapack_int const *	ldwork,
		double *	rwork,
		lapack_int *	info,
		size_t	,
		size_t
	)