LAPACK_ztgsna_base()

void LAPACK_ztgsna_base	(	char const *	job,
		char const *	howmny,
		lapack_logical const *	select,
		lapack_int const *	n,
		lapack_complex_double const *	A,
		lapack_int const *	lda,
		lapack_complex_double const *	B,
		lapack_int const *	ldb,
		lapack_complex_double const *	VL,
		lapack_int const *	ldvl,
		lapack_complex_double const *	VR,
		lapack_int const *	ldvr,
		double *	S,
		double *	DIF,
		lapack_int const *	mm,
		lapack_int *	m,
		lapack_complex_double *	work,
		lapack_int const *	lwork,
		lapack_int *	iwork,
		lapack_int *	info,
		size_t	,
		size_t
	)