LAPACK_dlagsy()

void LAPACK_dlagsy	(	lapack_int *	n,
		lapack_int *	k,
		const double *	d,
		double *	a,
		lapack_int *	lda,
		lapack_int *	iseed,
		double *	work,
		lapack_int *	info
	)