LAPACK_strsna_base()

void LAPACK_strsna_base	(	char const *	job,
		char const *	howmny,
		lapack_logical const *	select,
		lapack_int const *	n,
		float const *	T,
		lapack_int const *	ldt,
		float const *	VL,
		lapack_int const *	ldvl,
		float const *	VR,
		lapack_int const *	ldvr,
		float *	S,
		float *	SEP,
		lapack_int const *	mm,
		lapack_int *	m,
		float *	work,
		lapack_int const *	ldwork,
		lapack_int *	iwork,
		lapack_int *	info,
		size_t	,
		size_t
	)