LAPACK_dtgexc()

void LAPACK_dtgexc	(	lapack_logical *	wantq,
		lapack_logical *	wantz,
		lapack_int *	n,
		double *	a,
		lapack_int *	lda,
		double *	b,
		lapack_int *	ldb,
		double *	q,
		lapack_int *	ldq,
		double *	z,
		lapack_int *	ldz,
		lapack_int *	ifst,
		lapack_int *	ilst,
		double *	work,
		lapack_int *	lwork,
		lapack_int *	info
	)