LAPACK_dtrsen()

void LAPACK_dtrsen	(	char *	job,
		char *	compq,
		const lapack_logical *	select,
		lapack_int *	n,
		double *	t,
		lapack_int *	ldt,
		double *	q,
		lapack_int *	ldq,
		double *	wr,
		double *	wi,
		lapack_int *	m,
		double *	s,
		double *	sep,
		double *	work,
		lapack_int *	lwork,
		lapack_int *	iwork,
		lapack_int *	liwork,
		lapack_int *	info
	)