LAPACK_ztgsna()

void LAPACK_ztgsna	(	char *	job,
		char *	howmny,
		const lapack_logical *	select,
		lapack_int *	n,
		const lapack_complex_double *	a,
		lapack_int *	lda,
		const lapack_complex_double *	b,
		lapack_int *	ldb,
		const lapack_complex_double *	vl,
		lapack_int *	ldvl,
		const lapack_complex_double *	vr,
		lapack_int *	ldvr,
		double *	s,
		double *	dif,
		lapack_int *	mm,
		lapack_int *	m,
		lapack_complex_double *	work,
		lapack_int *	lwork,
		lapack_int *	iwork,
		lapack_int *	info
	)