LAPACK_strsna()

void LAPACK_strsna	(	char *	job,
		char *	howmny,
		const lapack_logical *	select,
		lapack_int *	n,
		const float *	t,
		lapack_int *	ldt,
		const float *	vl,
		lapack_int *	ldvl,
		const float *	vr,
		lapack_int *	ldvr,
		float *	s,
		float *	sep,
		lapack_int *	mm,
		lapack_int *	m,
		float *	work,
		lapack_int *	ldwork,
		lapack_int *	iwork,
		lapack_int *	info
	)