lapack/SimTKlapack.h File Reference

Go to the source code of this file.

Classes
struct	SimTK_float_complex
struct	SimTK_double_complex
Defines
#define	SimTK_C_   SimTK_float_complex
#define	SimTK_Z_   SimTK_double_complex
#define	SimTK_FDIM_(n)   const int* n
#define	SimTK_FINC_(x)   const int* inc##x
#define	SimTK_FOPT_(c)   const char* c
#define	SimTK_FLEN_(c)   int c##_len
#define	SimTK_FSCL_(type, s)   type* s
#define	SimTK_INFO_   int *info
Typedefs
typedef int(*	SimTK_SELECT_2S )(const SimTK_FSCL_(float, wr), const SimTK_FSCL_(float, wi))
typedef int(*	SimTK_SELECT_3F )(const SimTK_FSCL_(float, ar), const SimTK_FSCL_(float, ai), const SimTK_FSCL_(float, b))
typedef int(*	SimTK_SELECT_2D )(const SimTK_FSCL_(double, wr), const SimTK_FSCL_(double, wi))
typedef int(*	SimTK_SELECT_3D )(const SimTK_FSCL_(double, ar), const SimTK_FSCL_(double, ai), const SimTK_FSCL_(double, b))
typedef int(*	SimTK_SELECT_C )(const SimTK_FSCL_(SimTK_C_, w))
typedef int(*	SimTK_SELECT_2C )(const SimTK_FSCL_(SimTK_C_, a), const SimTK_FSCL_(SimTK_C_, b))
typedef int(*	SimTK_SELECT_Z )(const SimTK_FSCL_(SimTK_Z_, w))
typedef int(*	SimTK_SELECT_2Z )(const SimTK_FSCL_(SimTK_Z_, a), const SimTK_FSCL_(SimTK_Z_, b))
Functions
void	SimTK_version_SimTKlapack (int *, int *, int *)
void	SimTK_about_SimTKlapack (const char *, int, char *)
float	sdot_ (SimTK_FDIM_(n), const float *x, SimTK_FINC_(x), const float *y, SimTK_FINC_(y))
double	ddot_ (SimTK_FDIM_(n), const double *x, SimTK_FINC_(x), const double *y, SimTK_FINC_(y))
double	dsdot_ (SimTK_FDIM_(n), const float *x, SimTK_FINC_(x), const float *y, SimTK_FINC_(y))
float	sdsdot_ (SimTK_FDIM_(n), const SimTK_FSCL_(float, alpha), const float *x, SimTK_FINC_(x), const float *y, SimTK_FINC_(y))
float	snrm2_ (SimTK_FDIM_(n), const float *x, SimTK_FINC_(x))
float	sasum_ (SimTK_FDIM_(n), const float *x, SimTK_FINC_(x))
double	dnrm2_ (SimTK_FDIM_(n), const double *x, SimTK_FINC_(x))
double	dasum_ (SimTK_FDIM_(n), const double *x, SimTK_FINC_(x))
float	scnrm2_ (SimTK_FDIM_(n), const SimTK_C_ *x, SimTK_FINC_(x))
float	scasum_ (SimTK_FDIM_(n), const SimTK_C_ *x, SimTK_FINC_(x))
double	dznrm2_ (SimTK_FDIM_(n), const SimTK_Z_ *x, SimTK_FINC_(x))
double	dzasum_ (SimTK_FDIM_(n), const SimTK_Z_ *x, SimTK_FINC_(x))
int	isamax_ (SimTK_FDIM_(n), const float *x, SimTK_FINC_(x))
int	idamax_ (SimTK_FDIM_(n), const double *x, SimTK_FINC_(x))
int	icamax_ (SimTK_FDIM_(n), const SimTK_C_ *x, SimTK_FINC_(x))
int	izamax_ (SimTK_FDIM_(n), const SimTK_Z_ *x, SimTK_FINC_(x))
void	sswap_ (SimTK_FDIM_(n), float *x, SimTK_FINC_(x), float *y, SimTK_FINC_(y))
void	dswap_ (SimTK_FDIM_(n), double *x, SimTK_FINC_(x), double *y, SimTK_FINC_(y))
void	cswap_ (SimTK_FDIM_(n), SimTK_C_ *x, SimTK_FINC_(x), SimTK_C_ *y, SimTK_FINC_(y))
void	zswap_ (SimTK_FDIM_(n), SimTK_Z_ *x, SimTK_FINC_(x), SimTK_Z_ *y, SimTK_FINC_(y))
void	scopy_ (SimTK_FDIM_(n), const float *x, SimTK_FINC_(x), float *y, SimTK_FINC_(y))
void	dcopy_ (SimTK_FDIM_(n), const double *x, SimTK_FINC_(x), double *y, SimTK_FINC_(y))
void	ccopy_ (SimTK_FDIM_(n), const SimTK_C_ *x, SimTK_FINC_(x), SimTK_C_ *y, SimTK_FINC_(y))
void	zcopy_ (SimTK_FDIM_(n), const SimTK_Z_ *x, SimTK_FINC_(x), SimTK_Z_ *y, SimTK_FINC_(y))
void	saxpy_ (SimTK_FDIM_(n), const SimTK_FSCL_(float, alpha), const float *x, SimTK_FINC_(x), float *y, SimTK_FINC_(y))
void	daxpy_ (SimTK_FDIM_(n), const SimTK_FSCL_(double, alpha), const double *x, SimTK_FINC_(x), double *y, SimTK_FINC_(y))
void	caxpy_ (SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_C_ *x, SimTK_FINC_(x), SimTK_C_ *y, SimTK_FINC_(y))
void	zaxpy_ (SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_Z_ *x, SimTK_FINC_(x), SimTK_Z_ *y, SimTK_FINC_(y))
void	srotg_ (SimTK_FSCL_(float, a), SimTK_FSCL_(float, b), SimTK_FSCL_(float, c), SimTK_FSCL_(float, s))
void	drotg_ (SimTK_FSCL_(double, a), SimTK_FSCL_(double, b), SimTK_FSCL_(double, c), SimTK_FSCL_(double, s))
void	srotmg_ (SimTK_FSCL_(float, d1), SimTK_FSCL_(float, d2), SimTK_FSCL_(float, b1), SimTK_FSCL_(float, b2), float P[5])
void	drotmg_ (SimTK_FSCL_(double, d1), SimTK_FSCL_(double, d2), SimTK_FSCL_(double, b1), SimTK_FSCL_(double, b2), double P[5])
void	srot_ (SimTK_FDIM_(n), float *x, SimTK_FINC_(x), float *y, SimTK_FINC_(y), const SimTK_FSCL_(float, c), const SimTK_FSCL_(float, s))
void	drot_ (SimTK_FDIM_(n), double *x, SimTK_FINC_(x), double *y, SimTK_FINC_(y), const SimTK_FSCL_(double, c), const SimTK_FSCL_(double, s))
void	srotm_ (SimTK_FDIM_(n), float *x, SimTK_FINC_(x), float *y, SimTK_FINC_(y), const float P[5])
void	drotm_ (SimTK_FDIM_(n), double *x, SimTK_FINC_(x), double *y, SimTK_FINC_(y), const double P[5])
void	sscal_ (SimTK_FDIM_(n), const SimTK_FSCL_(float, alpha), float *x, SimTK_FINC_(x))
void	dscal_ (SimTK_FDIM_(n), const SimTK_FSCL_(double, alpha), double *x, SimTK_FINC_(x))
void	cscal_ (SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_C_, alpha), SimTK_C_ *x, SimTK_FINC_(x))
void	zscal_ (SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_Z_, alpha), SimTK_Z_ *x, SimTK_FINC_(x))
void	csscal_ (SimTK_FDIM_(n), const SimTK_FSCL_(float, alpha), SimTK_C_ *x, SimTK_FINC_(x))
void	zdscal_ (SimTK_FDIM_(n), const SimTK_FSCL_(double, alpha), SimTK_Z_ *x, SimTK_FINC_(x))
void	crotg_ (SimTK_C_ *a, SimTK_C_ *b, float *c, SimTK_C_ *s)
void	zrotg_ (SimTK_Z_ *a, SimTK_Z_ *b, double *c, SimTK_Z_ *s)
void	csrot_ (SimTK_FDIM_(n), SimTK_C_ *x, SimTK_FINC_(x), SimTK_C_ *y, SimTK_FINC_(y), const SimTK_FSCL_(float, c), const SimTK_FSCL_(float, s))
void	zdrot_ (SimTK_FDIM_(n), SimTK_Z_ *x, SimTK_FINC_(x), SimTK_Z_ *y, SimTK_FINC_(y), const SimTK_FSCL_(double, c), const SimTK_FSCL_(double, s))
void	sgemv_ (SimTK_FOPT_(transA), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(float, alpha), const float *A, SimTK_FDIM_(lda), const float *x, SimTK_FINC_(x), const SimTK_FSCL_(float, beta), float *Y, SimTK_FINC_(Y), SimTK_FLEN_(transA))
void	sgbmv_ (SimTK_FOPT_(transA), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), const SimTK_FSCL_(float, alpha), const float *A, SimTK_FDIM_(lda), const float *x, SimTK_FINC_(x), const SimTK_FSCL_(float, beta), float *Y, SimTK_FINC_(Y), SimTK_FLEN_(transA))
void	strmv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), const float *A, SimTK_FDIM_(lda), float *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	stbmv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(k), const float *A, SimTK_FDIM_(lda), float *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	stpmv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), const float *Ap, float *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	strsv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), const float *A, SimTK_FDIM_(lda), float *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	stbsv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(k), const float *A, SimTK_FDIM_(lda), float *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	stpsv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), const float *Ap, float *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	dgemv_ (SimTK_FOPT_(transA), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(double, alpha), const double *A, SimTK_FDIM_(lda), const double *x, SimTK_FINC_(x), const SimTK_FSCL_(double, beta), double *Y, SimTK_FINC_(Y), SimTK_FLEN_(transA))
void	dgbmv_ (SimTK_FOPT_(transA), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), const SimTK_FSCL_(double, alpha), const double *A, SimTK_FDIM_(lda), const double *x, SimTK_FINC_(x), const SimTK_FSCL_(double, beta), double *Y, SimTK_FINC_(Y), SimTK_FLEN_(transA))
void	dtrmv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), const double *A, SimTK_FDIM_(lda), double *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	dtbmv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(k), const double *A, SimTK_FDIM_(lda), double *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	dtpmv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), const double *Ap, double *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	dtrsv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), const double *A, SimTK_FDIM_(lda), double *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	dtbsv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(k), const double *A, SimTK_FDIM_(lda), double *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	dtpsv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), const double *Ap, double *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	cgemv_ (SimTK_FOPT_(transA), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_C_ *A, SimTK_FDIM_(lda), const SimTK_C_ *x, SimTK_FINC_(x), const SimTK_FSCL_(SimTK_C_, beta), SimTK_C_ *Y, SimTK_FINC_(Y), SimTK_FLEN_(transA))
void	cgbmv_ (SimTK_FOPT_(transA), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_C_ *A, SimTK_FDIM_(lda), const SimTK_C_ *x, SimTK_FINC_(x), const SimTK_FSCL_(SimTK_C_, beta), SimTK_C_ *Y, SimTK_FINC_(Y), SimTK_FLEN_(transA))
void	ctrmv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), const SimTK_C_ *A, SimTK_FDIM_(lda), SimTK_C_ *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	ctbmv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_C_ *A, SimTK_FDIM_(lda), SimTK_C_ *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	ctpmv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), const SimTK_C_ *Ap, SimTK_C_ *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	ctrsv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), const SimTK_C_ *A, SimTK_FDIM_(lda), SimTK_C_ *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	ctbsv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_C_ *A, SimTK_FDIM_(lda), SimTK_C_ *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	ctpsv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), const SimTK_C_ *Ap, SimTK_C_ *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	zgemv_ (SimTK_FOPT_(transA), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_Z_ *A, SimTK_FDIM_(lda), const SimTK_Z_ *x, SimTK_FINC_(x), const SimTK_FSCL_(SimTK_Z_, beta), SimTK_Z_ *Y, SimTK_FINC_(Y), SimTK_FLEN_(transA))
void	zgbmv_ (SimTK_FOPT_(transA), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_Z_ *A, SimTK_FDIM_(lda), const SimTK_Z_ *x, SimTK_FINC_(x), const SimTK_FSCL_(SimTK_Z_, beta), SimTK_Z_ *Y, SimTK_FINC_(Y), SimTK_FLEN_(transA))
void	ztrmv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), const SimTK_Z_ *A, SimTK_FDIM_(lda), SimTK_Z_ *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	ztbmv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_Z_ *A, SimTK_FDIM_(lda), SimTK_Z_ *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	ztpmv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), const SimTK_Z_ *Ap, SimTK_Z_ *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	ztrsv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), const SimTK_Z_ *A, SimTK_FDIM_(lda), SimTK_Z_ *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	ztbsv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_Z_ *A, SimTK_FDIM_(lda), SimTK_Z_ *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	ztpsv_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(n), const SimTK_Z_ *Ap, SimTK_Z_ *x, SimTK_FINC_(x), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	ssymv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(float, alpha), const float *A, SimTK_FDIM_(lda), const float *x, SimTK_FINC_(x), const SimTK_FSCL_(float, beta), float *y, SimTK_FINC_(y), SimTK_FLEN_(uplo))
void	ssbmv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_FSCL_(float, alpha), const float *A, SimTK_FDIM_(lda), const float *x, SimTK_FINC_(x), const SimTK_FSCL_(float, beta), float *y, SimTK_FINC_(y), SimTK_FLEN_(uplo))
void	sspmv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(float, alpha), const float *Ap, const float *x, SimTK_FINC_(x), const SimTK_FSCL_(float, beta), float *y, SimTK_FINC_(y), SimTK_FLEN_(uplo))
void	dsymv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(double, alpha), const double *A, SimTK_FDIM_(lda), const double *x, SimTK_FINC_(x), const SimTK_FSCL_(double, beta), double *y, SimTK_FINC_(y), SimTK_FLEN_(uplo))
void	dsbmv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_FSCL_(double, alpha), const double *A, SimTK_FDIM_(lda), const double *x, SimTK_FINC_(x), const SimTK_FSCL_(double, beta), double *y, SimTK_FINC_(y), SimTK_FLEN_(uplo))
void	dspmv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(double, alpha), const double *Ap, const double *x, SimTK_FINC_(x), const SimTK_FSCL_(double, beta), double *y, SimTK_FINC_(y), SimTK_FLEN_(uplo))
void	sger_ (SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(float, alpha), const float *x, SimTK_FINC_(x), const float *y, SimTK_FINC_(y), float *A, SimTK_FDIM_(lda))
void	ssyr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(float, alpha), const float *x, SimTK_FINC_(x), float *A, SimTK_FDIM_(lda), SimTK_FLEN_(uplo))
void	sspr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(float, alpha), const float *x, SimTK_FINC_(x), float *Ap, SimTK_FLEN_(uplo))
void	ssyr2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(float, alpha), const float *x, SimTK_FINC_(x), const float *y, SimTK_FINC_(y), float *A, SimTK_FDIM_(lda), SimTK_FLEN_(uplo))
void	sspr2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(float, alpha), const float *x, SimTK_FINC_(x), const float *y, SimTK_FINC_(y), float *A, SimTK_FLEN_(uplo))
void	dger_ (SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(double, alpha), const double *x, SimTK_FINC_(x), const double *y, SimTK_FINC_(y), double *A, SimTK_FDIM_(lda))
void	dsyr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(double, alpha), const double *x, SimTK_FINC_(x), double *A, SimTK_FDIM_(lda), SimTK_FLEN_(uplo))
void	dspr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(double, alpha), const double *x, SimTK_FINC_(x), double *Ap, SimTK_FLEN_(uplo))
void	dsyr2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(double, alpha), const double *x, SimTK_FINC_(x), const double *y, SimTK_FINC_(y), double *A, SimTK_FDIM_(lda), SimTK_FLEN_(uplo))
void	dspr2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(double, alpha), const double *x, SimTK_FINC_(x), const double *y, SimTK_FINC_(y), double *A, SimTK_FLEN_(uplo))
void	chemv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_C_ *A, SimTK_FDIM_(lda), const SimTK_C_ *x, SimTK_FINC_(x), const SimTK_FSCL_(SimTK_C_, beta), SimTK_C_ *y, SimTK_FINC_(y), SimTK_FLEN_(uplo))
void	chbmv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_C_ *A, SimTK_FDIM_(lda), const SimTK_C_ *x, SimTK_FINC_(x), const SimTK_FSCL_(SimTK_C_, beta), SimTK_C_ *y, SimTK_FINC_(y), SimTK_FLEN_(uplo))
void	chpmv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_C_ *Ap, const SimTK_C_ *x, SimTK_FINC_(x), const SimTK_FSCL_(SimTK_C_, beta), SimTK_C_ *y, SimTK_FINC_(y), SimTK_FLEN_(uplo))
void	zhemv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_Z_ *A, SimTK_FDIM_(lda), const SimTK_Z_ *x, SimTK_FINC_(x), const SimTK_FSCL_(SimTK_Z_, beta), SimTK_Z_ *y, SimTK_FINC_(y), SimTK_FLEN_(uplo))
void	zhbmv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_Z_ *A, SimTK_FDIM_(lda), const SimTK_Z_ *x, SimTK_FINC_(x), const SimTK_FSCL_(SimTK_Z_, beta), SimTK_Z_ *y, SimTK_FINC_(y), SimTK_FLEN_(uplo))
void	zhpmv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_Z_ *Ap, const SimTK_Z_ *x, SimTK_FINC_(x), const SimTK_FSCL_(SimTK_Z_, beta), SimTK_Z_ *y, SimTK_FINC_(y), SimTK_FLEN_(uplo))
void	cgeru_ (SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_C_ *x, SimTK_FINC_(x), const SimTK_C_ *y, SimTK_FINC_(y), SimTK_C_ *A, SimTK_FDIM_(lda))
void	cgerc_ (SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_C_ *x, SimTK_FINC_(x), const SimTK_C_ *y, SimTK_FINC_(y), SimTK_C_ *A, SimTK_FDIM_(lda))
void	cher_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(float, alpha), const SimTK_C_ *x, SimTK_FINC_(x), SimTK_C_ *A, SimTK_FDIM_(lda), SimTK_FLEN_(uplo))
void	chpr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(float, alpha), const SimTK_C_ *x, SimTK_FINC_(x), SimTK_C_ *A, SimTK_FLEN_(uplo))
void	cher2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_C_ *x, SimTK_FINC_(x), const SimTK_C_ *y, SimTK_FINC_(y), SimTK_C_ *A, SimTK_FDIM_(lda), SimTK_FLEN_(uplo))
void	chpr2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_C_ *x, SimTK_FINC_(x), const SimTK_C_ *y, SimTK_FINC_(y), SimTK_C_ *Ap, SimTK_FLEN_(uplo))
void	zgeru_ (SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_Z_ *x, SimTK_FINC_(x), const SimTK_Z_ *y, SimTK_FINC_(y), SimTK_Z_ *A, SimTK_FDIM_(lda))
void	zgerc_ (SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_Z_ *x, SimTK_FINC_(x), const SimTK_Z_ *y, SimTK_FINC_(y), SimTK_Z_ *A, SimTK_FDIM_(lda))
void	zher_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(double, alpha), const SimTK_Z_ *x, SimTK_FINC_(x), SimTK_Z_ *A, SimTK_FDIM_(lda), SimTK_FLEN_(uplo))
void	zhpr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(double, alpha), const SimTK_Z_ *x, SimTK_FINC_(x), SimTK_Z_ *A, SimTK_FLEN_(uplo))
void	zher2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_Z_ *x, SimTK_FINC_(x), const SimTK_Z_ *y, SimTK_FINC_(y), SimTK_Z_ *A, SimTK_FDIM_(lda), SimTK_FLEN_(uplo))
void	zhpr2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_Z_ *x, SimTK_FINC_(x), const SimTK_Z_ *y, SimTK_FINC_(y), SimTK_Z_ *Ap, SimTK_FLEN_(uplo))
void	sgemm_ (SimTK_FOPT_(transA), SimTK_FOPT_(transB), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_FSCL_(float, alpha), const float *A, SimTK_FDIM_(lda), const float *B, SimTK_FDIM_(ldb), const SimTK_FSCL_(float, beta), float *C, SimTK_FDIM_(ldc), SimTK_FLEN_(transA), SimTK_FLEN_(transB))
void	ssymm_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(float, alpha), const float *A, SimTK_FDIM_(lda), const float *B, SimTK_FDIM_(ldb), const SimTK_FSCL_(float, beta), float *C, SimTK_FDIM_(ldc), SimTK_FLEN_(side), SimTK_FLEN_(uplo))
void	ssyrk_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_FSCL_(float, alpha), const float *A, SimTK_FDIM_(lda), const SimTK_FSCL_(float, beta), float *C, SimTK_FDIM_(ldc), SimTK_FLEN_(uplo), SimTK_FLEN_(transA))
void	ssyr2k_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_FSCL_(float, alpha), const float *A, SimTK_FDIM_(lda), const float *B, SimTK_FDIM_(ldb), const SimTK_FSCL_(float, beta), float *C, SimTK_FDIM_(ldc), SimTK_FLEN_(uplo), SimTK_FLEN_(transA))
void	dgemm_ (SimTK_FOPT_(transA), SimTK_FOPT_(transB), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_FSCL_(double, alpha), const double *A, SimTK_FDIM_(lda), const double *B, SimTK_FDIM_(ldb), const SimTK_FSCL_(double, beta), double *C, SimTK_FDIM_(ldc), SimTK_FLEN_(transA), SimTK_FLEN_(transB))
void	dsymm_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(double, alpha), const double *A, SimTK_FDIM_(lda), const double *B, SimTK_FDIM_(ldb), const SimTK_FSCL_(double, beta), double *C, SimTK_FDIM_(ldc), SimTK_FLEN_(side), SimTK_FLEN_(uplo))
void	dsyrk_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_FSCL_(double, alpha), const double *A, SimTK_FDIM_(lda), const SimTK_FSCL_(double, beta), double *C, SimTK_FDIM_(ldc), SimTK_FLEN_(uplo), SimTK_FLEN_(transA))
void	dsyr2k_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_FSCL_(double, alpha), const double *A, SimTK_FDIM_(lda), const double *B, SimTK_FDIM_(ldb), const SimTK_FSCL_(double, beta), double *C, SimTK_FDIM_(ldc), SimTK_FLEN_(uplo), SimTK_FLEN_(transA))
void	cgemm_ (SimTK_FOPT_(transA), SimTK_FOPT_(transB), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_C_ *A, SimTK_FDIM_(lda), const SimTK_C_ *B, SimTK_FDIM_(ldb), const SimTK_FSCL_(SimTK_C_, beta), SimTK_C_ *C, SimTK_FDIM_(ldc), SimTK_FLEN_(transA), SimTK_FLEN_(transB))
void	csymm_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_C_ *A, SimTK_FDIM_(lda), const SimTK_C_ *B, SimTK_FDIM_(ldb), const SimTK_FSCL_(SimTK_C_, beta), SimTK_C_ *C, SimTK_FDIM_(ldc), SimTK_FLEN_(side), SimTK_FLEN_(uplo))
void	csyrk_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_C_ *A, SimTK_FDIM_(lda), const SimTK_FSCL_(SimTK_C_, beta), SimTK_C_ *C, SimTK_FDIM_(ldc), SimTK_FLEN_(uplo), SimTK_FLEN_(transA))
void	csyr2k_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_C_ *A, SimTK_FDIM_(lda), const SimTK_C_ *B, SimTK_FDIM_(ldb), const SimTK_FSCL_(SimTK_C_, beta), SimTK_C_ *C, SimTK_FDIM_(ldc), SimTK_FLEN_(uplo), SimTK_FLEN_(transA))
void	zgemm_ (SimTK_FOPT_(transA), SimTK_FOPT_(transB), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_Z_ *A, SimTK_FDIM_(lda), const SimTK_Z_ *B, SimTK_FDIM_(ldb), const SimTK_FSCL_(SimTK_Z_, beta), SimTK_Z_ *C, SimTK_FDIM_(ldc), SimTK_FLEN_(transA), SimTK_FLEN_(transB))
void	zsymm_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_Z_ *A, SimTK_FDIM_(lda), const SimTK_Z_ *B, SimTK_FDIM_(ldb), const SimTK_FSCL_(SimTK_Z_, beta), SimTK_Z_ *C, SimTK_FDIM_(ldc), SimTK_FLEN_(side), SimTK_FLEN_(uplo))
void	zsyrk_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_Z_ *A, SimTK_FDIM_(lda), const SimTK_FSCL_(SimTK_Z_, beta), SimTK_Z_ *C, SimTK_FDIM_(ldc), SimTK_FLEN_(uplo), SimTK_FLEN_(trans))
void	zsyr2k_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_Z_ *A, SimTK_FDIM_(lda), const SimTK_Z_ *B, SimTK_FDIM_(ldb), const SimTK_FSCL_(SimTK_Z_, beta), SimTK_Z_ *C, SimTK_FDIM_(ldc), SimTK_FLEN_(uplo), SimTK_FLEN_(trans))
void	strmm_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(float, alpha), const float *A, SimTK_FDIM_(lda), float *B, SimTK_FDIM_(ldb), SimTK_FLEN_(side), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	strsm_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(float, alpha), const float *A, SimTK_FDIM_(lda), float *B, SimTK_FDIM_(ldb), SimTK_FLEN_(side), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	dtrmm_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(double, alpha), const double *A, SimTK_FDIM_(lda), double *B, SimTK_FDIM_(ldb), SimTK_FLEN_(side), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	dtrsm_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(double, alpha), const double *A, SimTK_FDIM_(lda), double *B, SimTK_FDIM_(ldb), SimTK_FLEN_(side), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	ctrmm_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_C_ *A, SimTK_FDIM_(lda), SimTK_C_ *B, SimTK_FDIM_(ldb), SimTK_FLEN_(side), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	ctrsm_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_C_ *A, SimTK_FDIM_(lda), SimTK_C_ *B, SimTK_FDIM_(ldb), SimTK_FLEN_(side), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	ztrmm_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_Z_ *A, SimTK_FDIM_(lda), SimTK_Z_ *B, SimTK_FDIM_(ldb), SimTK_FLEN_(side), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	ztrsm_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FOPT_(diag), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_Z_ *A, SimTK_FDIM_(lda), SimTK_Z_ *B, SimTK_FDIM_(ldb), SimTK_FLEN_(side), SimTK_FLEN_(uplo), SimTK_FLEN_(transA), SimTK_FLEN_(diag))
void	chemm_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_C_ *A, SimTK_FDIM_(lda), const SimTK_C_ *B, SimTK_FDIM_(ldb), const SimTK_FSCL_(SimTK_C_, beta), SimTK_C_ *C, SimTK_FDIM_(ldc), SimTK_FLEN_(side), SimTK_FLEN_(uplo))
void	cherk_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_FSCL_(float, alpha), const SimTK_C_ *A, SimTK_FDIM_(lda), const SimTK_FSCL_(float, beta), SimTK_C_ *C, SimTK_FDIM_(ldc), SimTK_FLEN_(uplo), SimTK_FLEN_(trans))
void	cher2k_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_C_ *A, SimTK_FDIM_(lda), const SimTK_C_ *B, SimTK_FDIM_(ldb), const SimTK_FSCL_(float, beta), SimTK_C_ *C, SimTK_FDIM_(ldc), SimTK_FLEN_(uplo), SimTK_FLEN_(trans))
void	zhemm_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_Z_ *A, SimTK_FDIM_(lda), const SimTK_Z_ *B, SimTK_FDIM_(ldb), const SimTK_FSCL_(SimTK_Z_, beta), SimTK_Z_ *C, SimTK_FDIM_(ldc), SimTK_FLEN_(side), SimTK_FLEN_(uplo))
void	zherk_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_FSCL_(double, alpha), const SimTK_Z_ *A, SimTK_FDIM_(lda), const SimTK_FSCL_(double, beta), SimTK_Z_ *C, SimTK_FDIM_(ldc), SimTK_FLEN_(uplo), SimTK_FLEN_(trans))
void	zher2k_ (SimTK_FOPT_(uplo), SimTK_FOPT_(transA), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_Z_ *A, SimTK_FDIM_(lda), const SimTK_Z_ *B, SimTK_FDIM_(ldb), const SimTK_FSCL_(double, beta), SimTK_Z_ *C, SimTK_FDIM_(ldc), SimTK_FLEN_(uplo), SimTK_FLEN_(trans))
void	cbdsqr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *ncvt, int *nru, int *ncc, float *d__, float *e, SimTK_C_ *vt, SimTK_FDIM_(ldvt), SimTK_C_ *u, SimTK_FDIM_(ldu), SimTK_C_ *c__, SimTK_FDIM_(ldc), float *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	cgbbrd_ (SimTK_FOPT_(vect), SimTK_FDIM_(m), SimTK_FDIM_(n), int *ncc, SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_C_ *ab, SimTK_FDIM_(ldab), float *d__, float *e, SimTK_C_ *q, SimTK_FDIM_(ldq), SimTK_C_ *pt, int *ldpt, SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(vect))
void	cgbcon_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), const SimTK_C_ *ab, SimTK_FDIM_(ldab), int *ipiv, float *anorm, float *rcond, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(norm))
void	cgbequ_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), const SimTK_C_ *ab, SimTK_FDIM_(ldab), float *r__, float *c__, float *rowcnd, float *colcnd, float *amax, SimTK_INFO_)
void	cgbrfs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_FDIM_(nrhs), const SimTK_C_ *ab, SimTK_FDIM_(ldab), const SimTK_C_ *afb, SimTK_FDIM_(ldafb), int *ipiv, const SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(trans))
void	cgbsv_ (SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_FDIM_(nrhs), SimTK_C_ *ab, SimTK_FDIM_(ldab), int *ipiv, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_)
void	cgbsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_FDIM_(nrhs), SimTK_C_ *ab, SimTK_FDIM_(ldab), SimTK_C_ *afb, SimTK_FDIM_(ldafb), int *ipiv, char *equed, float *r__, float *c__, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *rcond, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(trans), SimTK_FLEN_(equed))
void	cgbtf2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_C_ *ab, SimTK_FDIM_(ldab), int *ipiv, SimTK_INFO_)
void	cgbtrf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_C_ *ab, SimTK_FDIM_(ldab), int *ipiv, SimTK_INFO_)
void	cgbtrs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_FDIM_(nrhs), const SimTK_C_ *ab, SimTK_FDIM_(ldab), int *ipiv, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(trans))
void	cgebak_ (SimTK_FOPT_(job), SimTK_FOPT_(side), SimTK_FDIM_(n), int *ilo, int *ihi, float *scale, SimTK_FDIM_(m), SimTK_C_ *v, SimTK_FDIM_(ldv), SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(side))
void	cgebal_ (SimTK_FOPT_(job), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), int *ilo, int *ihi, float *scale, SimTK_INFO_, SimTK_FLEN_(job))
void	cgebd2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), float *d__, float *e, SimTK_C_ *tauq, SimTK_C_ *taup, SimTK_C_ *work, SimTK_INFO_)
void	cgebrd_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), float *d__, float *e, SimTK_C_ *tauq, SimTK_C_ *taup, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	cgecon_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), const SimTK_C_ *a, SimTK_FDIM_(lda), float *anorm, float *rcond, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(norm))
void	cgeequ_ (SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_C_ *a, SimTK_FDIM_(lda), float *r__, float *c__, float *rowcnd, float *colcnd, float *amax, SimTK_INFO_)
void	cgees_ (SimTK_FOPT_(jobvs), SimTK_FOPT_(sort), SimTK_SELECT_C select, SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), int *sdim, SimTK_C_ *w, SimTK_C_ *vs, SimTK_FDIM_(ldvs), SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, int *bwork, SimTK_INFO_, SimTK_FLEN_(jobvs), SimTK_FLEN_(sort))
void	cgeesx_ (SimTK_FOPT_(jobvs), SimTK_FOPT_(sort), SimTK_SELECT_C select, char *sense, SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), int *sdim, SimTK_C_ *w, SimTK_C_ *vs, SimTK_FDIM_(ldvs), float *rconde, float *rcondv, SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, int *bwork, SimTK_INFO_, SimTK_FLEN_(jobvs), SimTK_FLEN_(sort), SimTK_FLEN_(sense))
void	cgeev_ (SimTK_FOPT_(jobvl), SimTK_FOPT_(jobvr), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *w, SimTK_C_ *vl, SimTK_FDIM_(ldvl), SimTK_C_ *vr, SimTK_FDIM_(ldvr), SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, SimTK_INFO_, SimTK_FLEN_(jobvl), SimTK_FLEN_(jobvr))
void	cgeevx_ (SimTK_FOPT_(balanc), SimTK_FOPT_(jobvl), SimTK_FOPT_(jobvr), char *sense, SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *w, SimTK_C_ *vl, SimTK_FDIM_(ldvl), SimTK_C_ *vr, SimTK_FDIM_(ldvr), int *ilo, int *ihi, float *scale, float *abnrm, float *rconde, float *rcondv, SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, SimTK_INFO_, SimTK_FLEN_(balanc), SimTK_FLEN_(jobvl), SimTK_FLEN_(jobvr), SimTK_FLEN_(sense))
void	cgegs_ (SimTK_FOPT_(jobvsl), SimTK_FOPT_(jobvsr), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), const SimTK_FSCL_(SimTK_C_, alpha), SimTK_C_ *beta, SimTK_C_ *vsl, int *ldvsl, SimTK_C_ *vsr, int *ldvsr, SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, SimTK_INFO_, SimTK_FLEN_(jobvsl), SimTK_FLEN_(jobvsr))
void	cgegv_ (SimTK_FOPT_(jobvl), SimTK_FOPT_(jobvr), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_FSCL_(SimTK_C_, beta), SimTK_C_ *vl, SimTK_FDIM_(ldvl), SimTK_C_ *vr, SimTK_FDIM_(ldvr), SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, SimTK_INFO_, SimTK_FLEN_(jobvsl), SimTK_FLEN_(jobvsr))
void	cgehd2_ (SimTK_FDIM_(n), int *ilo, int *ihi, SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_INFO_)
void	cgehrd_ (SimTK_FDIM_(n), int *ilo, int *ihi, SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	cgelq2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_INFO_)
void	cgelqf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	cgels_ (SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(trans))
void	cgelsx_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), int *jpvt, float *rcond, int *rank, SimTK_C_ *work, float *rwork, SimTK_INFO_)
void	cgelsy_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), int *jpvt, float *rcond, int *rank, SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, SimTK_INFO_)
void	cgeql2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_INFO_)
void	cgeqlf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	cgeqp3_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), int *jpvt, SimTK_C_ *tau, SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, SimTK_INFO_)
void	cgeqpf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), int *jpvt, SimTK_C_ *tau, SimTK_C_ *work, float *rwork, SimTK_INFO_)
void	cgeqr2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_INFO_)
void	cgeqrf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	cgerfs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), const SimTK_C_ *a, SimTK_FDIM_(lda), const SimTK_C_ *af, int *ldaf, int *ipiv, const SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(trans))
void	cgerq2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_INFO_)
void	cgerqf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	cgesc2_ (SimTK_FDIM_(n), const SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *rhs, int *ipiv, int *jpiv, float *scale)
void	cgesv_ (SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_)
void	cgesvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *af, int *ldaf, int *ipiv, char *equed, float *r__, float *c__, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *rcond, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(trans), SimTK_FLEN_(equed))
void	cgetc2_ (SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), int *ipiv, int *jpiv, SimTK_INFO_)
void	cgetf2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_INFO_)
void	cgetrf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_INFO_)
void	cgetri_ (SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	cgetrs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(trans))
void	cggbak_ (SimTK_FOPT_(job), SimTK_FOPT_(side), SimTK_FDIM_(n), int *ilo, int *ihi, float *lscale, float *rscale, SimTK_FDIM_(m), SimTK_C_ *v, SimTK_FDIM_(ldv), SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(side))
void	cggbal_ (SimTK_FOPT_(job), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), int *ilo, int *ihi, float *lscale, float *rscale, float *work, SimTK_INFO_, SimTK_FLEN_(job))
void	cgges_ (SimTK_FOPT_(jobvsl), SimTK_FOPT_(jobvsr), SimTK_FOPT_(sort), SimTK_SELECT_2C selctg, SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), int *sdim, const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_FSCL_(SimTK_C_, beta), SimTK_C_ *vsl, int *ldvsl, SimTK_C_ *vsr, int *ldvsr, SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, int *bwork, SimTK_INFO_, SimTK_FLEN_(jobvsl), SimTK_FLEN_(jobvsr), SimTK_FLEN_(sort))
void	cggesx_ (SimTK_FOPT_(jobvsl), SimTK_FOPT_(jobvsr), SimTK_FOPT_(sort), SimTK_SELECT_2C selctg, char *sense, SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), int *sdim, const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_FSCL_(SimTK_C_, beta), SimTK_C_ *vsl, int *ldvsl, SimTK_C_ *vsr, int *ldvsr, float *rconde, float *rcondv, SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, int *iwork, int *liwork, int *bwork, SimTK_INFO_, SimTK_FLEN_(balanc), SimTK_FLEN_(jobvl), SimTK_FLEN_(jobvr), SimTK_FLEN_(sense))
void	cggev_ (SimTK_FOPT_(jobvl), SimTK_FOPT_(jobvr), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_FSCL_(SimTK_C_, beta), SimTK_C_ *vl, SimTK_FDIM_(ldvl), SimTK_C_ *vr, SimTK_FDIM_(ldvr), SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, SimTK_INFO_, SimTK_FLEN_(jobvl), SimTK_FLEN_(jobvr))
void	cggevx_ (SimTK_FOPT_(balanc), SimTK_FOPT_(jobvl), SimTK_FOPT_(jobvr), char *sense, SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_FSCL_(SimTK_C_, beta), SimTK_C_ *vl, SimTK_FDIM_(ldvl), SimTK_C_ *vr, SimTK_FDIM_(ldvr), int *ilo, int *ihi, float *lscale, float *rscale, float *abnrm, float *bbnrm, float *rconde, float *rcondv, SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, int *iwork, int *bwork, SimTK_INFO_, SimTK_FLEN_(balanc), SimTK_FLEN_(jobvl), SimTK_FLEN_(jobvr), SimTK_FLEN_(sense))
void	cggglm_ (SimTK_FDIM_(n), SimTK_FDIM_(m), int *p, SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *d__, SimTK_C_ *x, SimTK_C_ *y, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	cgghrd_ (SimTK_FOPT_(compq), SimTK_FOPT_(compz), SimTK_FDIM_(n), int *ilo, int *ihi, SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *q, SimTK_FDIM_(ldq), SimTK_C_ *z__, SimTK_FDIM_(ldz), SimTK_INFO_, SimTK_FLEN_(compq), SimTK_FLEN_(compz))
void	cgglse_ (SimTK_FDIM_(m), SimTK_FDIM_(n), int *p, SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *c__, SimTK_C_ *d__, SimTK_C_ *x, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	cggqrf_ (SimTK_FDIM_(n), SimTK_FDIM_(m), int *p, SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *taua, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *taub, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	cggrqf_ (SimTK_FDIM_(m), int *p, SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *taua, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *taub, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	cggsvd_ (SimTK_FOPT_(jobu), SimTK_FOPT_(jobv), SimTK_FOPT_(jobq), SimTK_FDIM_(m), SimTK_FDIM_(n), int *p, SimTK_FDIM_(k), int *l, SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), const SimTK_FSCL_(float, alpha), const SimTK_FSCL_(float, beta), SimTK_C_ *u, SimTK_FDIM_(ldu), SimTK_C_ *v, SimTK_FDIM_(ldv), SimTK_C_ *q, SimTK_FDIM_(ldq), SimTK_C_ *work, float *rwork, int *iwork, SimTK_INFO_, SimTK_FLEN_(jobu), SimTK_FLEN_(jobv), SimTK_FLEN_(jobq))
void	cggsvp_ (SimTK_FOPT_(jobu), SimTK_FOPT_(jobv), SimTK_FOPT_(jobq), SimTK_FDIM_(m), int *p, SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), float *tola, float *tolb, SimTK_FDIM_(k), int *l, SimTK_C_ *u, SimTK_FDIM_(ldu), SimTK_C_ *v, SimTK_FDIM_(ldv), SimTK_C_ *q, SimTK_FDIM_(ldq), int *iwork, float *rwork, SimTK_C_ *tau, SimTK_C_ *work, SimTK_INFO_, SimTK_FLEN_(jobu), SimTK_FLEN_(jobv), SimTK_FLEN_(jobq))
void	cgtcon_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), SimTK_C_ *dl, const SimTK_C_ *d__, const SimTK_C_ *du, const SimTK_C_ *du2, int *ipiv, float *anorm, float *rcond, SimTK_C_ *work, SimTK_INFO_, SimTK_FLEN_(norm))
void	cgtrfs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), const SimTK_C_ *dl, const SimTK_C_ *d__, const SimTK_C_ *du, const SimTK_C_ *dlf, const SimTK_C_ *df, const SimTK_C_ *duf, const SimTK_C_ *du2, int *ipiv, const SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(trans))
void	cgtsv_ (SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *dl, SimTK_C_ *d__, SimTK_C_ *du, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_)
void	cgtsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), const SimTK_C_ *dl, const SimTK_C_ *d__, const SimTK_C_ *du, SimTK_C_ *dlf, SimTK_C_ *df, SimTK_C_ *duf, SimTK_C_ *du2, int *ipiv, const SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *rcond, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(trans))
void	cgttrf_ (SimTK_FDIM_(n), SimTK_C_ *dl, SimTK_C_ *d__, SimTK_C_ *du, SimTK_C_ *du2, int *ipiv, SimTK_INFO_)
void	cgttrs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), const SimTK_C_ *dl, const SimTK_C_ *d__, const SimTK_C_ *du, const SimTK_C_ *du2, int *ipiv, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(trans))
void	cgtts2_ (int *itrans, SimTK_FDIM_(n), SimTK_FDIM_(nrhs), const SimTK_C_ *dl, const SimTK_C_ *d__, const SimTK_C_ *du, const SimTK_C_ *du2, int *ipiv, SimTK_C_ *b, SimTK_FDIM_(ldb))
void	chbev_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_C_ *ab, SimTK_FDIM_(ldab), float *w, SimTK_C_ *z__, SimTK_FDIM_(ldz), SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	chbevd_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_C_ *ab, SimTK_FDIM_(ldab), float *w, SimTK_C_ *z__, SimTK_FDIM_(ldz), SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, int *lrwork, int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	chbevx_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_C_ *ab, SimTK_FDIM_(ldab), SimTK_C_ *q, SimTK_FDIM_(ldq), float *vl, float *vu, int *il, int *iu, float *abstol, SimTK_FDIM_(m), float *w, SimTK_C_ *z__, SimTK_FDIM_(ldz), SimTK_C_ *work, float *rwork, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	chbgst_ (SimTK_FOPT_(vect), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *ka, int *kb, SimTK_C_ *ab, SimTK_FDIM_(ldab), const SimTK_C_ *bb, int *ldbb, SimTK_C_ *x, int *ldx, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(vect), SimTK_FLEN_(uplo))
void	chbgv_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *ka, int *kb, SimTK_C_ *ab, SimTK_FDIM_(ldab), SimTK_C_ *bb, int *ldbb, float *w, SimTK_C_ *z__, SimTK_FDIM_(ldz), SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	chbgvx_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *ka, int *kb, SimTK_C_ *ab, SimTK_FDIM_(ldab), SimTK_C_ *bb, int *ldbb, SimTK_C_ *q, SimTK_FDIM_(ldq), float *vl, float *vu, int *il, int *iu, float *abstol, SimTK_FDIM_(m), float *w, SimTK_C_ *z__, SimTK_FDIM_(ldz), SimTK_C_ *work, float *rwork, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	chbtrd_ (SimTK_FOPT_(vect), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_C_ *ab, SimTK_FDIM_(ldab), float *d__, float *e, SimTK_C_ *q, SimTK_FDIM_(ldq), SimTK_C_ *work, SimTK_INFO_, SimTK_FLEN_(vect), SimTK_FLEN_(uplo))
void	checon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), int *ipiv, float *anorm, float *rcond, SimTK_C_ *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	cheev_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), float *w, SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	cheevd_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), float *w, SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, int *lrwork, int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	cheevr_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), float *vl, float *vu, int *il, int *iu, float *abstol, SimTK_FDIM_(m), float *w, SimTK_C_ *z__, SimTK_FDIM_(ldz), int *isuppz, SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, int *lrwork, int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	cheevx_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), float *vl, float *vu, int *il, int *iu, float *abstol, SimTK_FDIM_(m), float *w, SimTK_C_ *z__, SimTK_FDIM_(ldz), SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	chegs2_ (int *itype, SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), const SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	chegst_ (int *itype, SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), const SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	chegv_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), float *w, SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	chegvd_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), float *w, SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, int *lrwork, int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	chegvx_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), float *vl, float *vu, int *il, int *iu, float *abstol, SimTK_FDIM_(m), float *w, SimTK_C_ *z__, SimTK_FDIM_(ldz), SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	cherfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), const SimTK_C_ *a, SimTK_FDIM_(lda), const SimTK_C_ *af, int *ldaf, int *ipiv, const SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	chesv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(uplo))
void	chesvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), const SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *af, int *ldaf, int *ipiv, const SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *rcond, float *ferr, float *berr, SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo))
void	chetf2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_INFO_, SimTK_FLEN_(uplo))
void	chetrd_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), float *d__, float *e, SimTK_C_ *tau, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(uplo))
void	chetrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(uplo))
void	chetri_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_C_ *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	chetrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	chgeqz_ (SimTK_FOPT_(job), SimTK_FOPT_(compq), SimTK_FOPT_(compz), SimTK_FDIM_(n), int *ilo, int *ihi, SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_FSCL_(SimTK_C_, beta), SimTK_C_ *q, SimTK_FDIM_(ldq), SimTK_C_ *z__, SimTK_FDIM_(ldz), SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(comq), SimTK_FLEN_(compz))
void	chpcon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, int *ipiv, float *anorm, float *rcond, SimTK_C_ *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	chpev_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, float *w, SimTK_C_ *z__, SimTK_FDIM_(ldz), SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	chpevd_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, float *w, SimTK_C_ *z__, SimTK_FDIM_(ldz), SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, int *lrwork, int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	chpevx_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, float *vl, float *vu, int *il, int *iu, float *abstol, SimTK_FDIM_(m), float *w, SimTK_C_ *z__, SimTK_FDIM_(ldz), SimTK_C_ *work, float *rwork, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	chpgst_ (int *itype, SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, SimTK_C_ *bp, SimTK_INFO_, SimTK_FLEN_(uplo))
void	chpgv_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, SimTK_C_ *bp, float *w, SimTK_C_ *z__, SimTK_FDIM_(ldz), SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	chpgvd_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, SimTK_C_ *bp, float *w, SimTK_C_ *z__, SimTK_FDIM_(ldz), SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, int *lrwork, int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	chpgvx_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, SimTK_C_ *bp, float *vl, float *vu, int *il, int *iu, float *abstol, SimTK_FDIM_(m), float *w, SimTK_C_ *z__, SimTK_FDIM_(ldz), SimTK_C_ *work, float *rwork, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	chprfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *ap, SimTK_C_ *afp, int *ipiv, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	chpsv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *ap, int *ipiv, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	chpsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *ap, SimTK_C_ *afp, int *ipiv, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *rcond, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo))
void	chptrd_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, float *d__, float *e, SimTK_C_ *tau, SimTK_INFO_, SimTK_FLEN_(uplo))
void	chptrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, int *ipiv, SimTK_INFO_, SimTK_FLEN_(uplo))
void	chptri_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, int *ipiv, SimTK_C_ *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	chptrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *ap, int *ipiv, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	chsein_ (SimTK_FOPT_(side), char *eigsrc, char *initv, int *select, SimTK_FDIM_(n), SimTK_C_ *h__, int *ldh, SimTK_C_ *w, SimTK_C_ *vl, SimTK_FDIM_(ldvl), SimTK_C_ *vr, SimTK_FDIM_(ldvr), int *mm, SimTK_FDIM_(m), SimTK_C_ *work, float *rwork, int *ifaill, int *ifailr, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(eigsrc), SimTK_FLEN_(initv))
void	chseqr_ (SimTK_FOPT_(job), SimTK_FOPT_(compz), SimTK_FDIM_(n), int *ilo, int *ihi, SimTK_C_ *h__, int *ldh, SimTK_C_ *w, SimTK_C_ *z__, SimTK_FDIM_(ldz), SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(compz))
void	clabrd_ (SimTK_FDIM_(m), SimTK_FDIM_(n), int *nb, SimTK_C_ *a, SimTK_FDIM_(lda), float *d__, float *e, SimTK_C_ *tauq, SimTK_C_ *taup, SimTK_C_ *x, int *ldx, SimTK_C_ *y, int *ldy)
void	clacgv_ (SimTK_FDIM_(n), SimTK_C_ *x, SimTK_FINC_(x))
void	clacon_ (SimTK_FDIM_(n), SimTK_C_ *v, SimTK_C_ *x, float *est, int *kase, int *j, int *jump, int *iter)
void	clacp2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_FLEN_(uplo))
void	clacpy_ (SimTK_FOPT_(uplo), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_FLEN_(uplo))
void	clacrm_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), SimTK_C_ *c__, SimTK_FDIM_(ldc), float *rwork)
void	clacrt_ (SimTK_FDIM_(n), SimTK_C_ *cx, SimTK_FINC_(x), SimTK_C_ *cy, SimTK_FINC_(y), SimTK_C_ *c__, SimTK_C_ *s)
void	claed0_ (int *qsiz, SimTK_FDIM_(n), float *d__, float *e, SimTK_C_ *q, SimTK_FDIM_(ldq), SimTK_C_ *qstore, SimTK_FDIM_(ldqs), float *rwork, int *iwork, SimTK_INFO_)
void	claed7_ (SimTK_FDIM_(n), int *cutpnt, int *qsiz, int *tlvls, int *curlvl, int *curpbm, float *d__, SimTK_C_ *q, SimTK_FDIM_(ldq), float *rho, int *indxq, float *qstore, int *qptr, int *prmptr, int *perm, int *givptr, int *givcol, float *givnum, SimTK_C_ *work, float *rwork, int *iwork, SimTK_INFO_)
void	claed8_ (SimTK_FDIM_(k), SimTK_FDIM_(n), int *qsiz, SimTK_C_ *q, SimTK_FDIM_(ldq), float *d__, float *rho, int *cutpnt, float *z__, float *dlamda, SimTK_C_ *q2, SimTK_FDIM_(ldq2), float *w, int *indxp, int *indx, int *indxq, int *perm, int *givptr, int *givcol, float *givnum, SimTK_INFO_)
void	claein_ (int *rightv, int *noinit, SimTK_FDIM_(n), SimTK_C_ *h__, int *ldh, SimTK_C_ *w, SimTK_C_ *v, SimTK_C_ *b, SimTK_FDIM_(ldb), float *rwork, float *eps3, float *smlnum, SimTK_INFO_)
void	claesy_ (SimTK_C_ *a, SimTK_C_ *b, SimTK_C_ *c__, SimTK_C_ *rt1, SimTK_C_ *rt2, SimTK_C_ *evscal, SimTK_C_ *cs1, SimTK_C_ *sn1)
void	claev2_ (SimTK_C_ *a, SimTK_C_ *b, SimTK_C_ *c__, float *rt1, float *rt2, float *cs1, SimTK_C_ *sn1)
void	clags2_ (int *upper, float *a1, SimTK_C_ *a2, float *a3, float *b1, SimTK_C_ *b2, float *b3, float *csu, SimTK_C_ *snu, float *csv, SimTK_C_ *snv, float *csq, SimTK_C_ *snq)
void	clagtm_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *alpha, SimTK_C_ *dl, SimTK_C_ *d__, SimTK_C_ *du, SimTK_C_ *x, int *ldx, const SimTK_FSCL_(float, beta), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_FLEN_(trans))
void	clahef_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *nb, int *kb, SimTK_C_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_C_ *w, int *ldw, SimTK_INFO_, SimTK_FLEN_(uplo))
void	clahqr_ (int *wantt, int *wantz, SimTK_FDIM_(n), int *ilo, int *ihi, SimTK_C_ *h__, int *ldh, SimTK_C_ *w, int *iloz, int *ihiz, SimTK_C_ *z__, SimTK_FDIM_(ldz), SimTK_INFO_)
void	clahrd_ (SimTK_FDIM_(n), SimTK_FDIM_(k), int *nb, SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *t, SimTK_FDIM_(ldt), SimTK_C_ *y, int *ldy)
void	claic1_ (int *job, int *j, SimTK_C_ *x, float *sest, SimTK_C_ *w, SimTK_C_ *gamma, float *sestpr, SimTK_C_ *s, SimTK_C_ *c__)
void	clals0_ (int *icompq, int *nl, int *nr, int *sqre, SimTK_FDIM_(nrhs), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *bx, int *ldbx, int *perm, int *givptr, int *givcol, int *ldgcol, float *givnum, int *ldgnum, float *poles, float *difl, float *difr, float *z__, SimTK_FDIM_(k), float *c__, float *s, float *rwork, SimTK_INFO_)
void	clalsa_ (int *icompq, int *smlsiz, SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *bx, int *ldbx, float *u, SimTK_FDIM_(ldu), float *vt, SimTK_FDIM_(k), float *difl, float *difr, float *z__, float *poles, int *givptr, int *givcol, int *ldgcol, int *perm, float *givnum, float *c__, float *s, float *rwork, int *iwork, SimTK_INFO_)
void	clapll_ (SimTK_FDIM_(n), SimTK_C_ *x, SimTK_FINC_(x), SimTK_C_ *y, SimTK_FINC_(y), float *ssmin)
void	clapmt_ (int *forwrd, SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *x, int *ldx, SimTK_FDIM_(k))
void	claqgb_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_C_ *ab, SimTK_FDIM_(ldab), float *r__, float *c__, float *rowcnd, float *colcnd, float *amax, char *equed, SimTK_FLEN_(equed))
void	claqge_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), float *r__, float *c__, float *rowcnd, float *colcnd, float *amax, char *equed, SimTK_FLEN_(equed))
void	claqhb_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_C_ *ab, SimTK_FDIM_(ldab), float *s, float *scond, float *amax, char *equed, SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	claqhe_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), float *s, float *scond, float *amax, char *equed, SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	claqhp_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, float *s, float *scond, float *amax, char *equed, SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	claqp2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), int *offset, SimTK_C_ *a, SimTK_FDIM_(lda), int *jpvt, SimTK_C_ *tau, float *vn1, float *vn2, SimTK_C_ *work)
void	claqps_ (SimTK_FDIM_(m), SimTK_FDIM_(n), int *offset, int *nb, int *kb, SimTK_C_ *a, SimTK_FDIM_(lda), int *jpvt, SimTK_C_ *tau, float *vn1, float *vn2, SimTK_C_ *auxv, SimTK_C_ *f, int *ldf)
void	claqsb_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_C_ *ab, SimTK_FDIM_(ldab), float *s, float *scond, float *amax, char *equed, SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	claqsp_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, float *s, float *scond, float *amax, char *equed, SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	claqsy_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), float *s, float *scond, float *amax, char *equed, SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	clar1v_ (SimTK_FDIM_(n), int *b1, int *bn, float *sigma, float *d__, float *l, float *ld, float *lld, float *gersch, SimTK_C_ *z__, float *ztz, float *mingma, int *r__, int *isuppz, float *work)
void	clar2v_ (SimTK_FDIM_(n), SimTK_C_ *x, SimTK_C_ *y, SimTK_C_ *z__, SimTK_FINC_(x), float *c__, SimTK_C_ *s, SimTK_FINC_(c))
void	clarcm_ (SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *c__, SimTK_FDIM_(ldc), float *rwork)
void	clarf_ (SimTK_FOPT_(side), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *v, SimTK_FINC_(v), SimTK_C_ *tau, SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *work, SimTK_FLEN_(side))
void	clarfb_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FOPT_(direct), SimTK_FOPT_(storev), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_C_ *v, SimTK_FDIM_(ldv), SimTK_C_ *t, SimTK_FDIM_(ldt), SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *work, int *ldwork, SimTK_FLEN_(side), SimTK_FLEN_(trans), SimTK_FLEN_(direct), SimTK_FLEN_(storev))
void	clarfg_ (SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_C_, alpha), SimTK_C_ *x, int *incx, SimTK_C_ *tau)
void	clarft_ (SimTK_FOPT_(direct), SimTK_FOPT_(storev), SimTK_FDIM_(n), int *k, SimTK_C_ *v, SimTK_FDIM_(ldv), SimTK_C_ *tau, SimTK_C_ *t, SimTK_FDIM_(ldt), SimTK_FLEN_(direct), SimTK_FLEN_(storev))
void	clarfx_ (SimTK_FOPT_(side), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *v, SimTK_C_ *tau, SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *work, SimTK_FLEN_(side))
void	clargv_ (SimTK_FDIM_(n), SimTK_C_ *x, SimTK_FINC_(x), SimTK_C_ *y, SimTK_FINC_(y), float *c__, SimTK_FINC_(c))
void	clarnv_ (int *idist, int *iseed, SimTK_FDIM_(n), SimTK_C_ *x)
void	clarrv_ (SimTK_FDIM_(n), float *d__, float *l, int *isplit, SimTK_FDIM_(m), float *w, int *iblock, float *gersch, float *tol, SimTK_C_ *z__, SimTK_FDIM_(ldz), int *isuppz, float *work, int *iwork, SimTK_INFO_)
void	clartg_ (SimTK_C_ *f, SimTK_C_ *g, float *cs, SimTK_C_ *sn, SimTK_C_ *r__)
void	clartv_ (SimTK_FDIM_(n), SimTK_C_ *x, SimTK_FINC_(x), SimTK_C_ *y, SimTK_FINC_(y), float *c__, SimTK_C_ *s, SimTK_FINC_(c))
void	clarz_ (SimTK_FOPT_(side), SimTK_FDIM_(m), SimTK_FDIM_(n), int *l, SimTK_C_ *v, SimTK_FINC_(v), SimTK_C_ *tau, SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *work, SimTK_FLEN_(side))
void	clarzb_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FOPT_(direct), SimTK_FOPT_(storev), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), int *l, SimTK_C_ *v, SimTK_FDIM_(ldv), SimTK_C_ *t, SimTK_FDIM_(ldt), SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *work, int *ldwork, SimTK_FLEN_(side), SimTK_FLEN_(trans), SimTK_FLEN_(direct), SimTK_FLEN_(storev))
void	clarzt_ (SimTK_FOPT_(direct), SimTK_FOPT_(storev), SimTK_FDIM_(n), int *k, SimTK_C_ *v, SimTK_FDIM_(ldv), SimTK_C_ *tau, SimTK_C_ *t, SimTK_FDIM_(ldt), SimTK_FLEN_(direct), SimTK_FLEN_(storev))
void	clascl_ (char *type__, SimTK_FDIM_(kl), SimTK_FDIM_(ku), float *cfrom, float *cto, SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(type))
void	claset_ (SimTK_FOPT_(uplo), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *alpha, const SimTK_FSCL_(SimTK_C_, beta), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_FLEN_(uplo))
void	clasr_ (SimTK_FOPT_(side), char *pivot, SimTK_FOPT_(direct), SimTK_FDIM_(m), SimTK_FDIM_(n), float *c__, float *s, SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_FLEN_(side), SimTK_FLEN_(pivot), SimTK_FLEN_(direct))
void	classq_ (SimTK_FDIM_(n), SimTK_C_ *x, SimTK_FINC_(x), float *scale, float *sumsq)
void	claswp_ (SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), int *k1, int *k2, int *ipiv, SimTK_FINC_(x))
void	clasyf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *nb, int *kb, SimTK_C_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_C_ *w, int *ldw, SimTK_INFO_, SimTK_FLEN_(uplo))
void	clatbs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), char *normin, SimTK_FDIM_(n), int *kd, SimTK_C_ *ab, SimTK_FDIM_(ldab), SimTK_C_ *x, float *scale, float *cnorm, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag), SimTK_FLEN_(normin))
void	clatdf_ (int *ijob, SimTK_FDIM_(n), SimTK_C_ *z__, SimTK_FDIM_(ldz), SimTK_C_ *rhs, float *rdsum, float *rdscal, int *ipiv, int *jpiv)
void	clatps_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), char *normin, SimTK_FDIM_(n), SimTK_C_ *ap, SimTK_C_ *x, float *scale, float *cnorm, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag), SimTK_FLEN_(normin))
void	clatrd_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *nb, SimTK_C_ *a, SimTK_FDIM_(lda), float *e, SimTK_C_ *tau, SimTK_C_ *w, int *ldw, SimTK_FLEN_(uplo))
void	clatrs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), char *normin, SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *x, float *scale, float *cnorm, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag), SimTK_FLEN_(normin))
void	clatrz_ (SimTK_FDIM_(m), SimTK_FDIM_(n), int *l, SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work)
void	clatzm_ (SimTK_FOPT_(side), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *v, SimTK_FINC_(v), SimTK_C_ *tau, SimTK_C_ *c1, SimTK_C_ *c2, SimTK_FDIM_(ldc), SimTK_C_ *work, SimTK_FLEN_(side))
void	clauu2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo))
void	clauum_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo))
void	cpbcon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_C_ *ab, SimTK_FDIM_(ldab), float *anorm, float *rcond, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	cpbequ_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_C_ *ab, SimTK_FDIM_(ldab), float *s, float *scond, float *amax, SimTK_INFO_, SimTK_FLEN_(uplo))
void	cpbrfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), SimTK_C_ *ab, SimTK_FDIM_(ldab), SimTK_C_ *afb, SimTK_FDIM_(ldafb), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	cpbstf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_C_ *ab, SimTK_FDIM_(ldab), SimTK_INFO_, SimTK_FLEN_(uplo))
void	cpbsv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), SimTK_C_ *ab, SimTK_FDIM_(ldab), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	cpbsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), SimTK_C_ *ab, SimTK_FDIM_(ldab), SimTK_C_ *afb, SimTK_FDIM_(ldafb), char *equed, float *s, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *rcond, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	cpbtf2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_C_ *ab, SimTK_FDIM_(ldab), SimTK_INFO_, SimTK_FLEN_(uplo))
void	cpbtrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_C_ *ab, SimTK_FDIM_(ldab), SimTK_INFO_, SimTK_FLEN_(uplo))
void	cpbtrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), SimTK_C_ *ab, SimTK_FDIM_(ldab), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	cpocon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), float *anorm, float *rcond, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	cpoequ_ (SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), float *s, float *scond, float *amax, SimTK_INFO_)
void	cporfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *af, int *ldaf, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	cposv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	cposvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *af, int *ldaf, char *equed, float *s, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *rcond, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	cpotf2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo))
void	cpotrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo))
void	cpotri_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo))
void	cpotrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	cppcon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, float *anorm, float *rcond, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	cppequ_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, float *s, float *scond, float *amax, SimTK_INFO_, SimTK_FLEN_(uplo))
void	cpprfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *ap, SimTK_C_ *afp, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	cppsv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *ap, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	cppsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *ap, SimTK_C_ *afp, char *equed, float *s, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *rcond, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	cpptrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, SimTK_INFO_, SimTK_FLEN_(uplo))
void	cpptri_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, SimTK_INFO_, SimTK_FLEN_(uplo))
void	cpptrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *ap, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	cptcon_ (SimTK_FDIM_(n), float *d__, SimTK_C_ *e, float *anorm, float *rcond, float *rwork, SimTK_INFO_)
void	cptrfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *d__, SimTK_C_ *e, float *df, SimTK_C_ *ef, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	cptsv_ (SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *d__, SimTK_C_ *e, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_)
void	cptsvx_ (SimTK_FOPT_(fact), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *d__, SimTK_C_ *e, float *df, SimTK_C_ *ef, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *rcond, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(fact))
void	cpttrf_ (SimTK_FDIM_(n), float *d__, SimTK_C_ *e, SimTK_INFO_)
void	cpttrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *d__, SimTK_C_ *e, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	cptts2_ (int *iuplo, SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *d__, SimTK_C_ *e, SimTK_C_ *b, SimTK_FDIM_(ldb))
void	crot_ (SimTK_FDIM_(n), SimTK_C_ *cx, SimTK_FINC_(x), SimTK_C_ *cy, SimTK_FINC_(y), float *c__, SimTK_C_ *s)
void	cspcon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, int *ipiv, float *anorm, float *rcond, SimTK_C_ *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	cspmv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_C_, alpha), SimTK_C_ *ap, SimTK_C_ *x, SimTK_FINC_(x), const SimTK_FSCL_(SimTK_C_, beta), SimTK_C_ *y, int *incy, SimTK_FLEN_(uplo))
void	cspr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_C_, alpha), SimTK_C_ *x, SimTK_FINC_(x), SimTK_C_ *ap, SimTK_FLEN_(uplo))
void	csprfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *ap, SimTK_C_ *afp, int *ipiv, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	cspsv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *ap, int *ipiv, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	cspsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *ap, SimTK_C_ *afp, int *ipiv, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *rcond, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo))
void	csptrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, int *ipiv, SimTK_INFO_, SimTK_FLEN_(uplo))
void	csptri_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, int *ipiv, SimTK_C_ *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	csptrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *ap, int *ipiv, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	csrscl_ (SimTK_FDIM_(n), float *sa, SimTK_C_ *sx, SimTK_FINC_(x))
void	cstedc_ (SimTK_FOPT_(compz), SimTK_FDIM_(n), float *d__, float *e, SimTK_C_ *z__, SimTK_FDIM_(ldz), SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, int *lrwork, int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(compz))
void	cstein_ (SimTK_FDIM_(n), float *d__, float *e, SimTK_FDIM_(m), float *w, int *iblock, int *isplit, SimTK_C_ *z__, SimTK_FDIM_(ldz), float *work, int *iwork, int *ifail, SimTK_INFO_)
void	csteqr_ (SimTK_FOPT_(compz), SimTK_FDIM_(n), float *d__, float *e, SimTK_C_ *z__, SimTK_FDIM_(ldz), float *work, SimTK_INFO_, SimTK_FLEN_(compz))
void	csycon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), int *ipiv, float *anorm, float *rcond, SimTK_C_ *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	csymv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_C_, alpha), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *x, SimTK_FINC_(x), const SimTK_FSCL_(SimTK_C_, beta), SimTK_C_ *y, SimTK_FINC_(y), SimTK_FLEN_(uplo))
void	csyr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_C_, alpha), SimTK_C_ *x, SimTK_FINC_(x), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_FLEN_(uplo))
void	csyrfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *af, int *ldaf, int *ipiv, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	csysv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(uplo))
void	csysvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *af, int *ldaf, int *ipiv, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *rcond, float *ferr, float *berr, SimTK_C_ *work, SimTK_FDIM_(lwork), float *rwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo))
void	csytf2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_INFO_, SimTK_FLEN_(uplo))
void	csytrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(uplo))
void	csytri_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_C_ *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	csytrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	ctbcon_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), int *kd, SimTK_C_ *ab, SimTK_FDIM_(ldab), float *rcond, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	ctbrfs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), SimTK_C_ *ab, SimTK_FDIM_(ldab), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	ctbtrs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), SimTK_C_ *ab, SimTK_FDIM_(ldab), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	ctgevc_ (SimTK_FOPT_(side), SimTK_FOPT_(howmny), int *select, SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *vl, SimTK_FDIM_(ldvl), SimTK_C_ *vr, SimTK_FDIM_(ldvr), int *mm, SimTK_FDIM_(m), SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(howmny))
void	ctgex2_ (int *wantq, int *wantz, SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *q, SimTK_FDIM_(ldq), SimTK_C_ *z__, SimTK_FDIM_(ldz), int *j1, SimTK_INFO_)
void	ctgexc_ (int *wantq, int *wantz, SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *q, SimTK_FDIM_(ldq), SimTK_C_ *z__, SimTK_FDIM_(ldz), int *ifst, int *ilst, SimTK_INFO_)
void	ctgsen_ (int *ijob, int *wantq, int *wantz, int *select, SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), const SimTK_FSCL_(SimTK_C_, alpha), const SimTK_FSCL_(SimTK_C_, beta), SimTK_C_ *q, SimTK_FDIM_(ldq), SimTK_C_ *z__, SimTK_FDIM_(ldz), SimTK_FDIM_(m), float *pl, float *pr, float *dif, SimTK_C_ *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_)
void	ctgsja_ (SimTK_FOPT_(jobu), SimTK_FOPT_(jobv), SimTK_FOPT_(jobq), SimTK_FDIM_(m), int *p, SimTK_FDIM_(n), SimTK_FDIM_(k), int *l, SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), float *tola, float *tolb, const SimTK_FSCL_(float, alpha), const SimTK_FSCL_(float, beta), SimTK_C_ *u, SimTK_FDIM_(ldu), SimTK_C_ *v, SimTK_FDIM_(ldv), SimTK_C_ *q, SimTK_FDIM_(ldq), SimTK_C_ *work, int *ncycle, SimTK_INFO_, SimTK_FLEN_(jobu), SimTK_FLEN_(jobv), SimTK_FLEN_(jobq))
void	ctgsna_ (SimTK_FOPT_(job), SimTK_FOPT_(howmny), int *select, SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *vl, SimTK_FDIM_(ldvl), SimTK_C_ *vr, SimTK_FDIM_(ldvr), float *s, float *dif, int *mm, SimTK_FDIM_(m), SimTK_C_ *work, SimTK_FDIM_(lwork), int *iwork, SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(howmny))
void	ctgsy2_ (SimTK_FOPT_(trans), int *ijob, SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *d__, int *ldd, SimTK_C_ *e, int *lde, SimTK_C_ *f, int *ldf, float *scale, float *rdsum, float *rdscal, SimTK_INFO_, SimTK_FLEN_(trans))
void	ctgsyl_ (SimTK_FOPT_(trans), int *ijob, SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *d__, int *ldd, SimTK_C_ *e, int *lde, SimTK_C_ *f, int *ldf, float *scale, float *dif, SimTK_C_ *work, SimTK_FDIM_(lwork), int *iwork, SimTK_INFO_, SimTK_FLEN_(trans))
void	ctpcon_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_C_ *ap, float *rcond, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	ctprfs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *ap, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	ctptri_ (SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_C_ *ap, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	ctptrs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *ap, SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	ctrcon_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), float *rcond, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	ctrevc_ (SimTK_FOPT_(side), SimTK_FOPT_(howmny), int *select, SimTK_FDIM_(n), SimTK_C_ *t, SimTK_FDIM_(ldt), SimTK_C_ *vl, SimTK_FDIM_(ldvl), SimTK_C_ *vr, SimTK_FDIM_(ldvr), int *mm, SimTK_FDIM_(m), SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(howmny))
void	ctrexc_ (SimTK_FOPT_(compq), SimTK_FDIM_(n), SimTK_C_ *t, SimTK_FDIM_(ldt), SimTK_C_ *q, SimTK_FDIM_(ldq), int *ifst, int *ilst, SimTK_INFO_, SimTK_FLEN_(compq))
void	ctrrfs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *x, int *ldx, float *ferr, float *berr, SimTK_C_ *work, float *rwork, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	ctrsen_ (SimTK_FOPT_(job), SimTK_FOPT_(compq), int *select, SimTK_FDIM_(n), SimTK_C_ *t, SimTK_FDIM_(ldt), SimTK_C_ *q, SimTK_FDIM_(ldq), SimTK_C_ *w, SimTK_FDIM_(m), float *s, float *sep, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(compq))
void	ctrsna_ (SimTK_FOPT_(job), SimTK_FOPT_(howmny), int *select, SimTK_FDIM_(n), SimTK_C_ *t, SimTK_FDIM_(ldt), SimTK_C_ *vl, SimTK_FDIM_(ldvl), SimTK_C_ *vr, SimTK_FDIM_(ldvr), float *s, float *sep, int *mm, SimTK_FDIM_(m), SimTK_C_ *work, int *ldwork, float *rwork, SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(howmny))
void	ctrsyl_ (SimTK_FOPT_(trana), SimTK_FOPT_(tranb), int *isgn, SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_C_ *c__, SimTK_FDIM_(ldc), float *scale, SimTK_INFO_, SimTK_FLEN_(trana), SimTK_FLEN_(tranb))
void	ctrti2_ (SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	ctrtri_ (SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	ctrtrs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	ctzrqf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_INFO_)
void	ctzrzf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	cung2l_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_INFO_)
void	cung2r_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_INFO_)
void	cungbr_ (SimTK_FOPT_(vect), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(vect))
void	cunghr_ (SimTK_FDIM_(n), int *ilo, int *ihi, SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_FDIM_(lwork), int *info)
void	cungl2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_INFO_)
void	cunglq_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	cungql_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	cungqr_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	cungr2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_INFO_)
void	cungrq_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	cungtr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(uplo))
void	cunm2l_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	cunm2r_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	cunmbr_ (SimTK_FOPT_(vect), SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(vect), SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	cunmhr_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), int *ilo, int *ihi, SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	cunml2_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	cunmlq_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	cunmql_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	cunmqr_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	cunmr2_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	cunmr3_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), int *l, SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	cunmrq_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	cunmrz_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), int *l, SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	cunmtr_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), SimTK_C_ *tau, SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(uplo), SimTK_FLEN_(trans))
void	cupgtr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *ap, SimTK_C_ *tau, SimTK_C_ *q, SimTK_FDIM_(ldq), SimTK_C_ *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	cupmtr_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_C_ *ap, SimTK_C_ *tau, SimTK_C_ *c__, SimTK_FDIM_(ldc), SimTK_C_ *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(uplo), SimTK_FLEN_(trans))
void	dbdsdc_ (SimTK_FOPT_(uplo), SimTK_FOPT_(compq), SimTK_FDIM_(n), double *d__, double *e, double *u, SimTK_FDIM_(ldu), double *vt, SimTK_FDIM_(ldvt), double *q, int *iq, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(compq))
void	dbdsqr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *ncvt, int *nru, int *ncc, double *d__, double *e, double *vt, SimTK_FDIM_(ldvt), double *u, SimTK_FDIM_(ldu), double *c__, int *ldc, double *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	ddisna_ (SimTK_FOPT_(job), SimTK_FDIM_(m), SimTK_FDIM_(n), double *d__, double *sep, SimTK_INFO_, SimTK_FLEN_(job))
void	dgbbrd_ (SimTK_FOPT_(vect), SimTK_FDIM_(m), SimTK_FDIM_(n), int *ncc, SimTK_FDIM_(kl), SimTK_FDIM_(ku), double *ab, SimTK_FDIM_(ldab), double *d__, double *e, double *q, SimTK_FDIM_(ldq), double *pt, int *ldpt, double *c__, SimTK_FDIM_(ldc), double *work, SimTK_INFO_, SimTK_FLEN_(vect))
void	dgbcon_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), double *ab, SimTK_FDIM_(ldab), int *ipiv, double *anorm, double *rcond, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(norm))
void	dgbequ_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), double *ab, SimTK_FDIM_(ldab), double *r__, double *c__, double *rowcnd, double *colcnd, double *amax, SimTK_INFO_)
void	dgbrfs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_FDIM_(nrhs), double *ab, SimTK_FDIM_(ldab), double *afb, SimTK_FDIM_(ldafb), int *ipiv, double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(trans))
void	dgbsv_ (SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_FDIM_(nrhs), double *ab, SimTK_FDIM_(ldab), int *ipiv, double *b, SimTK_FDIM_(ldb), SimTK_INFO_)
void	dgbsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_FDIM_(nrhs), double *ab, SimTK_FDIM_(ldab), double *afb, SimTK_FDIM_(ldafb), int *ipiv, char *equed, double *r__, double *c__, double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(trans), SimTK_FLEN_(equed))
void	dgbtf2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), double *ab, SimTK_FDIM_(ldab), int *ipiv, SimTK_INFO_)
void	dgbtrf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), double *ab, SimTK_FDIM_(ldab), int *ipiv, SimTK_INFO_)
void	dgbtrs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_FDIM_(nrhs), double *ab, SimTK_FDIM_(ldab), int *ipiv, double *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(trans))
void	dgebak_ (SimTK_FOPT_(job), SimTK_FOPT_(side), SimTK_FDIM_(n), int *ilo, int *ihi, double *scale, SimTK_FDIM_(m), double *v, SimTK_FDIM_(ldv), SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(side))
void	dgebal_ (SimTK_FOPT_(job), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), int *ilo, int *ihi, double *scale, SimTK_INFO_, SimTK_FLEN_(job))
void	dgebd2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *d__, double *e, double *tauq, double *taup, double *work, SimTK_INFO_)
void	dgebrd_ (SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *d__, double *e, double *tauq, double *taup, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dgecon_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *anorm, double *rcond, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(norm))
void	dgeequ_ (SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *r__, double *c__, double *rowcnd, double *colcnd, double *amax, SimTK_INFO_)
void	dgees_ (SimTK_FOPT_(jobvs), SimTK_FOPT_(sort), SimTK_SELECT_2D select, SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), int *sdim, double *wr, double *wi, double *vs, SimTK_FDIM_(ldvs), double *work, SimTK_FDIM_(lwork), int *bwork, SimTK_INFO_, SimTK_FLEN_(jobvs), SimTK_FLEN_(sort))
void	dgeesx_ (SimTK_FOPT_(jobvs), SimTK_FOPT_(sort), SimTK_SELECT_2D select, char *sense, SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), int *sdim, double *wr, double *wi, double *vs, SimTK_FDIM_(ldvs), double *rconde, double *rcondv, double *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, int *bwork, SimTK_INFO_, SimTK_FLEN_(jobvs), SimTK_FLEN_(sort), SimTK_FLEN_(sense))
void	dgeev_ (SimTK_FOPT_(jobvl), SimTK_FOPT_(jobvr), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *wr, double *wi, double *vl, SimTK_FDIM_(ldvl), double *vr, SimTK_FDIM_(ldvr), double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(jobvl), SimTK_FLEN_(jobvr))
void	dgeevx_ (SimTK_FOPT_(balanc), SimTK_FOPT_(jobvl), SimTK_FOPT_(jobvr), char *sense, SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *wr, double *wi, double *vl, SimTK_FDIM_(ldvl), double *vr, SimTK_FDIM_(ldvr), int *ilo, int *ihi, double *scale, double *abnrm, double *rconde, double *rcondv, double *work, SimTK_FDIM_(lwork), int *iwork, SimTK_INFO_, SimTK_FLEN_(balanc), SimTK_FLEN_(jobvl), SimTK_FLEN_(jobvr), SimTK_FLEN_(sense))
void	dgegs_ (SimTK_FOPT_(jobvsl), SimTK_FOPT_(jobvsr), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *alphar, double *alphai, const SimTK_FSCL_(double, beta), double *vsl, int *ldvsl, double *vsr, int *ldvsr, double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(jobvsl), SimTK_FLEN_(jobvsr))
void	dgegv_ (SimTK_FOPT_(jobvl), SimTK_FOPT_(jobvr), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *alphar, double *alphai, const SimTK_FSCL_(double, beta), double *vl, SimTK_FDIM_(ldvl), double *vr, SimTK_FDIM_(ldvr), double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(jobvsl), SimTK_FLEN_(jobvsr))
void	dgehd2_ (SimTK_FDIM_(n), int *ilo, int *ihi, double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_INFO_)
void	dgehrd_ (SimTK_FDIM_(n), int *ilo, int *ihi, double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dgelq2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_INFO_)
void	dgelqf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dgels_ (SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(trans))
void	dgelsd_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *s, double *rcond, int *rank, double *work, SimTK_FDIM_(lwork), int *iwork, SimTK_INFO_)
void	dgelss_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *s, double *rcond, int *rank, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dgelsx_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), int *jpvt, double *rcond, int *rank, double *work, SimTK_INFO_)
void	dgelsy_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), int *jpvt, double *rcond, int *rank, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dgeql2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_INFO_)
void	dgeqlf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dgeqp3_ (SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), int *jpvt, double *tau, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dgeqpf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), int *jpvt, double *tau, double *work, SimTK_INFO_)
void	dgeqr2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_INFO_)
void	dgeqrf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dgerfs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *a, SimTK_FDIM_(lda), double *af, int *ldaf, int *ipiv, double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(trans))
void	dgerq2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_INFO_)
void	dgerqf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dgesc2_ (SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *rhs, int *ipiv, int *jpiv, double *scale)
void	dgesdd_ (SimTK_FOPT_(jobz), SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *s, double *u, SimTK_FDIM_(ldu), double *vt, SimTK_FDIM_(ldvt), double *work, SimTK_FDIM_(lwork), int *iwork, SimTK_INFO_, SimTK_FLEN_(jobz))
void	dgesv_ (SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *a, SimTK_FDIM_(lda), int *ipiv, double *b, SimTK_FDIM_(ldb), SimTK_INFO_)
void	dgesvd_ (SimTK_FOPT_(jobu), char *jobvt, SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *s, double *u, SimTK_FDIM_(ldu), double *vt, SimTK_FDIM_(ldvt), double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(jobu), SimTK_FLEN_(jobvt))
void	dgesvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *a, SimTK_FDIM_(lda), double *af, int *ldaf, int *ipiv, char *equed, double *r__, double *c__, double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(trans), SimTK_FLEN_(equed))
void	dgetc2_ (SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), int *ipiv, int *jpiv, SimTK_INFO_)
void	dgetf2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), int *ipiv, SimTK_INFO_)
void	dgetrf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), int *ipiv, SimTK_INFO_)
void	dgetri_ (SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), const int *ipiv, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dgetrs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *a, SimTK_FDIM_(lda), int *ipiv, double *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(trans))
void	dggbak_ (SimTK_FOPT_(job), SimTK_FOPT_(side), SimTK_FDIM_(n), int *ilo, int *ihi, double *lscale, double *rscale, SimTK_FDIM_(m), double *v, SimTK_FDIM_(ldv), SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(side))
void	dggbal_ (SimTK_FOPT_(job), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), int *ilo, int *ihi, double *lscale, double *rscale, double *work, SimTK_INFO_, SimTK_FLEN_(job))
void	dgges_ (SimTK_FOPT_(jobvsl), SimTK_FOPT_(jobvsr), SimTK_FOPT_(sort), SimTK_SELECT_3D delctg, SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), int *sdim, double *alphar, double *alphai, const SimTK_FSCL_(double, beta), double *vsl, int *ldvsl, double *vsr, int *ldvsr, double *work, SimTK_FDIM_(lwork), int *bwork, SimTK_INFO_, SimTK_FLEN_(jobvsl), SimTK_FLEN_(jobvsr), SimTK_FLEN_(sort))
void	dggesx_ (SimTK_FOPT_(jobvsl), SimTK_FOPT_(jobvsr), SimTK_FOPT_(sort), SimTK_SELECT_3D delctg, char *sense, SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), int *sdim, double *alphar, double *alphai, const SimTK_FSCL_(double, beta), double *vsl, int *ldvsl, double *vsr, int *ldvsr, double *rconde, double *rcondv, double *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, int *bwork, SimTK_INFO_, SimTK_FLEN_(jobvsl), SimTK_FLEN_(jobvsr), SimTK_FLEN_(sort), SimTK_FLEN_(sense))
void	dggev_ (SimTK_FOPT_(jobvl), SimTK_FOPT_(jobvr), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *alphar, double *alphai, const SimTK_FSCL_(double, beta), double *vl, SimTK_FDIM_(ldvl), double *vr, SimTK_FDIM_(ldvr), double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(jobvl), SimTK_FLEN_(jobvr))
void	dggevx_ (SimTK_FOPT_(balanc), SimTK_FOPT_(jobvl), SimTK_FOPT_(jobvr), char *sense, SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *alphar, double *alphai, double *beta, double *vl, SimTK_FDIM_(ldvl), double *vr, SimTK_FDIM_(ldvr), int *ilo, int *ihi, double *lscale, double *rscale, double *abnrm, double *bbnrm, double *rconde, double *rcondv, double *work, SimTK_FDIM_(lwork), int *iwork, int *bwork, SimTK_INFO_, SimTK_FLEN_(balanc), SimTK_FLEN_(jobvl), SimTK_FLEN_(jobvr), SimTK_FLEN_(sense))
void	dggglm_ (SimTK_FDIM_(n), SimTK_FDIM_(m), int *p, double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *d__, double *x, double *y, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dgghrd_ (SimTK_FOPT_(compq), SimTK_FOPT_(compz), SimTK_FDIM_(n), int *ilo, int *ihi, double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *q, SimTK_FDIM_(ldq), double *z__, SimTK_FDIM_(ldz), SimTK_INFO_, SimTK_FLEN_(compq), SimTK_FLEN_(compz))
void	dgglse_ (SimTK_FDIM_(m), SimTK_FDIM_(n), int *p, double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *c__, double *d__, double *x, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dggqrf_ (SimTK_FDIM_(n), SimTK_FDIM_(m), int *p, double *a, SimTK_FDIM_(lda), double *taua, double *b, SimTK_FDIM_(ldb), double *taub, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dggrqf_ (SimTK_FDIM_(m), int *p, SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *taua, double *b, SimTK_FDIM_(ldb), double *taub, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dggsvd_ (SimTK_FOPT_(jobu), SimTK_FOPT_(jobv), SimTK_FOPT_(jobq), SimTK_FDIM_(m), SimTK_FDIM_(n), int *p, SimTK_FDIM_(k), int *l, double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), const SimTK_FSCL_(double, alpha), const SimTK_FSCL_(double, beta), double *u, SimTK_FDIM_(ldu), double *v, SimTK_FDIM_(ldv), double *q, SimTK_FDIM_(ldq), double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(jobu), SimTK_FLEN_(jobv), SimTK_FLEN_(jobq))
void	dggsvp_ (SimTK_FOPT_(jobu), SimTK_FOPT_(jobv), SimTK_FOPT_(jobq), SimTK_FDIM_(m), int *p, SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *tola, double *tolb, SimTK_FDIM_(k), int *l, double *u, SimTK_FDIM_(ldu), double *v, SimTK_FDIM_(ldv), double *q, SimTK_FDIM_(ldq), int *iwork, double *tau, double *work, SimTK_INFO_, SimTK_FLEN_(jobu), SimTK_FLEN_(jobv), SimTK_FLEN_(jobq))
void	dgtcon_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), double *dl, double *d__, double *du, double *du2, int *ipiv, double *anorm, double *rcond, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(norm))
void	dgtrfs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *dl, double *d__, double *du, double *dlf, double *df, double *duf, double *du2, int *ipiv, double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(trans))
void	dgtsv_ (SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *dl, double *d__, double *du, double *b, SimTK_FDIM_(ldb), int *info)
void	dgtsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *dl, double *d__, double *du, double *dlf, double *df, double *duf, double *du2, int *ipiv, double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(trans))
void	dgttrf_ (SimTK_FDIM_(n), double *dl, double *d__, double *du, double *du2, int *ipiv, SimTK_INFO_)
void	dgttrs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *dl, double *d__, double *du, double *du2, int *ipiv, double *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(trans))
void	dgtts2_ (int *itrans, SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *dl, double *d__, double *du, double *du2, int *ipiv, double *b, SimTK_FDIM_(ldb))
void	dhgeqz_ (SimTK_FOPT_(job), SimTK_FOPT_(compq), SimTK_FOPT_(compz), SimTK_FDIM_(n), int *ilo, int *ihi, double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *alphar, double *alphai, double *beta, double *q, SimTK_FDIM_(ldq), double *z__, SimTK_FDIM_(ldz), double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(compq), SimTK_FLEN_(compz))
void	dhsein_ (SimTK_FOPT_(side), char *eigsrc, char *initv, int *select, SimTK_FDIM_(n), double *h__, int *ldh, double *wr, double *wi, double *vl, SimTK_FDIM_(ldvl), double *vr, SimTK_FDIM_(ldvr), int *mm, SimTK_FDIM_(m), double *work, int *ifaill, int *ifailr, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(eigsrc), SimTK_FLEN_(initv))
double	dlamch_ (SimTK_FOPT_(cmach), SimTK_FLEN_(cmach))
void	dhseqr_ (SimTK_FOPT_(job), SimTK_FOPT_(compz), SimTK_FDIM_(n), int *ilo, int *ihi, double *h__, int *ldh, double *wr, double *wi, double *z__, SimTK_FDIM_(ldz), double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(comqz))
void	dlabad_ (double *small, double *large)
void	dlabrd_ (SimTK_FDIM_(m), SimTK_FDIM_(n), int *nb, double *a, SimTK_FDIM_(lda), double *d__, double *e, double *tauq, double *taup, double *x, int *ldx, double *y, int *ldy)
void	dlacon_ (SimTK_FDIM_(n), double *v, double *x, int *isgn, double *est, int *kase, int *j, int *jump, int *iter)
void	dlacpy_ (SimTK_FOPT_(uplo), SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), SimTK_FLEN_(uplo))
void	dladiv_ (double *a, double *b, double *c__, double *d__, double *p, double *q)
void	dlae2_ (double *a, double *b, double *c__, double *rt1, double *rt2)
void	dlaebz_ (int *ijob, int *nitmax, SimTK_FDIM_(n), int *mmax, int *minp, int *nbmin, double *abstol, double *reltol, double *pivmin, double *d__, double *e, double *e2, int *nval, double *ab, double *c__, int *mout, int *nab, double *work, int *iwork, SimTK_INFO_)
void	dlaed0_ (int *icompq, int *qsiz, SimTK_FDIM_(n), double *d__, double *e, double *q, SimTK_FDIM_(ldq), double *qstore, SimTK_FDIM_(ldqs), double *work, int *iwork, SimTK_INFO_)
void	dlaed1_ (SimTK_FDIM_(n), double *d__, double *q, SimTK_FDIM_(ldq), int *indxq, double *rho, int *cutpnt, double *work, int *iwork, SimTK_INFO_)
void	dlaed2_ (SimTK_FDIM_(k), SimTK_FDIM_(n), int *n1, double *d__, double *q, SimTK_FDIM_(ldq), int *indxq, double *rho, double *z__, double *dlamda, double *w, double *q2, int *indx, int *indxc, int *indxp, int *coltyp, SimTK_INFO_)
void	dlaed3_ (SimTK_FDIM_(k), SimTK_FDIM_(n), int *n1, double *d__, double *q, SimTK_FDIM_(ldq), double *rho, double *dlamda, double *q2, int *indx, int *ctot, double *w, double *s, SimTK_INFO_)
void	dlaed4_ (SimTK_FDIM_(n), int *i__, double *d__, double *z__, double *delta, double *rho, double *dlam, SimTK_INFO_)
void	dlaed5_ (int *i__, double *d__, double *z__, double *delta, double *rho, double *dlam)
void	dlaed6_ (int *kniter, int *orgati, double *rho, double *d__, double *z__, double *finit, double *tau, SimTK_INFO_)
void	dlaed7_ (int *icompq, SimTK_FDIM_(n), int *qsiz, int *tlvls, int *curlvl, int *curpbm, double *d__, double *q, SimTK_FDIM_(ldq), int *indxq, double *rho, int *cutpnt, double *qstore, int *qptr, int *prmptr, int *perm, int *givptr, int *givcol, double *givnum, double *work, int *iwork, SimTK_INFO_)
void	dlaed8_ (int *icompq, SimTK_FDIM_(k), SimTK_FDIM_(n), int *qsiz, double *d__, double *q, SimTK_FDIM_(ldq), int *indxq, double *rho, int *cutpnt, double *z__, double *dlamda, double *q2, SimTK_FDIM_(ldq2), double *w, int *perm, int *givptr, int *givcol, double *givnum, int *indxp, int *indx, SimTK_INFO_)
void	dlaed9_ (SimTK_FDIM_(k), int *kstart, int *kstop, SimTK_FDIM_(n), double *d__, double *q, SimTK_FDIM_(ldq), double *rho, double *dlamda, double *w, double *s, int *lds, SimTK_INFO_)
void	dlaeda_ (SimTK_FDIM_(n), int *tlvls, int *curlvl, int *curpbm, int *prmptr, int *perm, int *givptr, int *givcol, double *givnum, double *q, int *qptr, double *z__, double *ztemp, SimTK_INFO_)
void	dlaein_ (int *rightv, int *noinit, SimTK_FDIM_(n), double *h__, int *ldh, double *wr, double *wi, double *vr, double *vi, double *b, SimTK_FDIM_(ldb), double *work, double *eps3, double *smlnum, double *bignum, SimTK_INFO_)
void	dlaev2_ (double *a, double *b, double *c__, double *rt1, double *rt2, double *cs1, double *sn1)
void	dlaexc_ (int *wantq, SimTK_FDIM_(n), double *t, SimTK_FDIM_(ldt), double *q, SimTK_FDIM_(ldq), int *j1, int *n1, int *n2, double *work, SimTK_INFO_)
void	dlag2_ (double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *safmin, double *scale1, double *scale2, double *wr1, double *wr2, double *wi)
void	dlags2_ (int *upper, double *a1, double *a2, double *a3, double *b1, double *b2, double *b3, double *csu, double *snu, double *csv, double *snv, double *csq, double *snq)
void	dlagtf_ (SimTK_FDIM_(n), double *a, double *lambda, double *b, double *c__, double *tol, double *d__, int *in, SimTK_INFO_)
void	dlagtm_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), const SimTK_FSCL_(double, alpha), double *dl, double *d__, double *du, double *x, int *ldx, const SimTK_FSCL_(double, beta), double *b, SimTK_FDIM_(ldb), SimTK_FLEN_(trans))
void	dlagts_ (int *job, SimTK_FDIM_(n), double *a, double *b, double *c__, double *d__, int *in, double *y, double *tol, SimTK_INFO_)
void	dlagv2_ (double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *alphar, double *alphai, double *beta, double *csl, double *snl, double *csr, double *snr)
void	dlahqr_ (int *wantt, int *wantz, SimTK_FDIM_(n), int *ilo, int *ihi, double *h__, int *ldh, double *wr, double *wi, int *iloz, int *ihiz, double *z__, SimTK_FDIM_(ldz), SimTK_INFO_)
void	dlahrd_ (SimTK_FDIM_(n), SimTK_FDIM_(k), int *nb, double *a, SimTK_FDIM_(lda), double *tau, double *t, SimTK_FDIM_(ldt), double *y, int *ldy)
void	dlaic1_ (int *job, int *j, double *x, double *sest, double *w, double *gamma, double *sestpr, double *s, double *c__)
void	dlaln2_ (int *ltrans, int *na, int *nw, double *smin, double *ca, double *a, SimTK_FDIM_(lda), double *d1, double *d2, double *b, SimTK_FDIM_(ldb), double *wr, double *wi, double *x, int *ldx, double *scale, double *xnorm, SimTK_INFO_)
void	dlals0_ (int *icompq, int *nl, int *nr, int *sqre, SimTK_FDIM_(nrhs), double *b, SimTK_FDIM_(ldb), double *bx, int *ldbx, int *perm, int *givptr, int *givcol, int *ldgcol, double *givnum, int *ldgnum, double *poles, double *difl, double *difr, double *z__, int *k, double *c__, double *s, double *work, SimTK_INFO_)
void	dlalsa_ (int *icompq, int *smlsiz, SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *b, SimTK_FDIM_(ldb), double *bx, int *ldbx, double *u, SimTK_FDIM_(ldu), double *vt, SimTK_FDIM_(k), double *difl, double *difr, double *z__, double *poles, int *givptr, int *givcol, int *ldgcol, int *perm, double *givnum, double *c__, double *s, double *work, int *iwork, SimTK_INFO_)
void	dlalsd_ (SimTK_FOPT_(uplo), int *smlsiz, SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *d__, double *e, double *b, SimTK_FDIM_(ldb), double *rcond, int *rank, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dlamc1_ (int *beta, int *t, int *rnd, int *ieee1)
void	dlamc2_ (int *beta, int *t, int *rnd, double *eps, int *emin, double *rmin, int *emax, double *rmax)
void	dlamc4_ (int *emin, double *start, int *base)
void	dlamc5_ (int *beta, int *p, int *emin, int *ieee, int *emax, double *rmax)
void	dlamrg_ (int *n1, int *n2, double *a, int *dtrd1, int *dtrd2, int *index)
void	dlanv2_ (double *a, double *b, double *c__, double *d__, double *rt1r, double *rt1i, double *rt2r, double *rt2i, double *cs, double *sn)
void	dlapll_ (SimTK_FDIM_(n), double *x, SimTK_FINC_(x), double *y, SimTK_FINC_(y), double *ssmin)
void	dlapmt_ (int *forwrd, SimTK_FDIM_(m), SimTK_FDIM_(n), double *x, int *ldx, SimTK_FDIM_(k))
void	dlaqgb_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), double *ab, SimTK_FDIM_(ldab), double *r__, double *c__, double *rowcnd, double *colcnd, double *amax, char *equed, SimTK_FLEN_(equed))
void	dlaqge_ (SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *r__, double *c__, double *rowcnd, double *colcnd, double *amax, char *equed, SimTK_FLEN_(equed))
void	dlaqp2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), int *offset, double *a, SimTK_FDIM_(lda), int *jpvt, double *tau, double *vn1, double *vn2, double *work)
void	dlaqps_ (SimTK_FDIM_(m), SimTK_FDIM_(n), int *offset, int *nb, int *kb, double *a, SimTK_FDIM_(lda), int *jpvt, double *tau, double *vn1, double *vn2, double *auxv, double *f, int *ldf)
void	dlaqsb_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, double *ab, SimTK_FDIM_(ldab), double *s, double *scond, double *amax, char *equed, SimTK_FLEN_(uplo), SimTK_FLEN_(equedk))
void	dlaqsp_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *ap, double *s, double *scond, double *amax, char *equed, SimTK_FLEN_(uplo), SimTK_FLEN_(equedk))
void	dlaqsy_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *s, double *scond, double *amax, char *equedk, SimTK_FLEN_(uplo), SimTK_FLEN_(equedk))
void	dlaqtr_ (int *ltran, int *lfloat, SimTK_FDIM_(n), double *t, SimTK_FDIM_(ldt), double *b, double *w, double *scale, double *x, double *work, SimTK_INFO_)
void	dlar1v_ (SimTK_FDIM_(n), int *b1, int *bn, double *sigma, double *d__, double *l, double *ld, double *lld, double *gersch, double *z__, double *ztz, double *mingma, int *r__, int *isuppz, double *work)
void	dlar2v_ (SimTK_FDIM_(n), double *x, double *y, double *z__, SimTK_FINC_(x), double *c__, double *s, SimTK_FINC_(c))
void	dlarf_ (SimTK_FOPT_(side), SimTK_FDIM_(m), SimTK_FDIM_(n), double *v, SimTK_FINC_(v), double *tau, double *c__, SimTK_FDIM_(ldc), double *work, SimTK_FLEN_(side))
void	dlarfb_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FOPT_(direct), SimTK_FOPT_(storev), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), double *v, SimTK_FDIM_(ldv), double *t, SimTK_FDIM_(ldt), double *c__, SimTK_FDIM_(ldc), double *work, int *ldwork, SimTK_FLEN_(side), SimTK_FLEN_(trans), SimTK_FLEN_(direct), SimTK_FLEN_(storev))
void	dlarfg_ (SimTK_FDIM_(n), const SimTK_FSCL_(double, alpha), double *x, SimTK_FINC_(x), double *tau)
void	dlarft_ (SimTK_FOPT_(direct), SimTK_FOPT_(storev), SimTK_FDIM_(n), int *k, double *v, SimTK_FDIM_(ldv), double *tau, double *t, SimTK_FDIM_(ldt), SimTK_FLEN_(direct), SimTK_FLEN_(storev))
void	dlarfx_ (SimTK_FOPT_(side), SimTK_FDIM_(m), SimTK_FDIM_(n), double *v, double *tau, double *c__, SimTK_FDIM_(ldc), double *work, SimTK_FLEN_(side))
void	dlargv_ (SimTK_FDIM_(n), double *x, SimTK_FINC_(x), double *y, SimTK_FINC_(y), double *c__, SimTK_FINC_(c))
void	dlarnv_ (int *idist, int *iseed, SimTK_FDIM_(n), double *x)
void	dlarrb_ (SimTK_FDIM_(n), double *d__, double *l, double *ld, double *lld, int *ifirst, int *ilast, double *sigma, double *reltol, double *w, double *wgap, double *werr, double *work, int *iwork, SimTK_INFO_)
void	dlarre_ (SimTK_FDIM_(n), double *d__, double *e, double *tol, int *nsplit, int *isplit, SimTK_FDIM_(m), double *w, double *woff, double *gersch, double *work, SimTK_INFO_)
void	dlarrf_ (SimTK_FDIM_(n), double *d__, double *l, double *ld, double *lld, int *ifirst, int *ilast, double *w, double *dplus, double *lplus, double *work, int *iwork, SimTK_INFO_)
void	dlarrv_ (SimTK_FDIM_(n), double *d__, double *l, int *isplit, SimTK_FDIM_(m), double *w, int *iblock, double *gersch, double *tol, double *z__, SimTK_FDIM_(ldz), int *isuppz, double *work, int *iwork, SimTK_INFO_)
void	dlartg_ (double *f, double *g, double *cs, double *sn, double *r__)
void	dlartv_ (SimTK_FDIM_(n), double *x, SimTK_FINC_(x), double *y, SimTK_FINC_(y), double *c__, double *s, int *incc)
void	dlaruv_ (int *iseed, SimTK_FDIM_(n), double *x)
void	dlarz_ (SimTK_FOPT_(side), SimTK_FDIM_(m), SimTK_FDIM_(n), int *l, double *v, SimTK_FINC_(v), double *tau, double *c__, SimTK_FDIM_(ldc), double *work, SimTK_FLEN_(side))
void	dlarzb_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FOPT_(direct), SimTK_FOPT_(storev), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), int *l, double *v, SimTK_FDIM_(ldv), double *t, SimTK_FDIM_(ldt), double *c__, int *ldc, double *work, int *ldwork, SimTK_FLEN_(side), SimTK_FLEN_(trans), SimTK_FLEN_(direct), SimTK_FLEN_(storev))
void	dlarzt_ (SimTK_FOPT_(direct), SimTK_FOPT_(storev), SimTK_FDIM_(n), int *k, double *v, SimTK_FDIM_(ldv), double *tau, double *t, SimTK_FDIM_(ldt), SimTK_FLEN_(direct), SimTK_FLEN_(storev))
void	dlas2_ (double *f, double *g, double *h__, double *ssmin, double *ssmax)
void	dlascl_ (char *type__, SimTK_FDIM_(kl), SimTK_FDIM_(ku), double *cfrom, double *cto, SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(type))
void	dlasd0_ (SimTK_FDIM_(n), int *sqre, double *d__, double *e, double *u, SimTK_FDIM_(ldu), double *vt, SimTK_FDIM_(ldvt), int *smlsiz, int *iwork, double *work, SimTK_INFO_)
void	dlasd1_ (int *nl, int *nr, int *sqre, double *d__, const SimTK_FSCL_(double, alpha), const SimTK_FSCL_(double, beta), double *u, SimTK_FDIM_(ldu), double *vt, SimTK_FDIM_(ldvt), int *idxq, int *iwork, double *work, SimTK_INFO_)
void	dlasd2_ (int *nl, int *nr, int *sqre, int *k, double *d__, double *z__, const SimTK_FSCL_(double, alpha), double *beta, double *u, SimTK_FDIM_(ldu), double *vt, SimTK_FDIM_(ldvt), double *dsigma, double *u2, int *ldu2, double *vt2, int *ldvt2, int *idxp, int *idx, int *idxc, int *idxq, int *coltyp, SimTK_INFO_)
void	dlasd3_ (int *nl, int *nr, int *sqre, int *k, double *d__, double *q, SimTK_FDIM_(ldq), double *dsigma, double *u, SimTK_FDIM_(ldu), double *u2, int *ldu2, double *vt, SimTK_FDIM_(ldvt), double *vt2, int *ldvt2, int *idxc, int *ctot, double *z__, SimTK_INFO_)
void	dlasd4_ (SimTK_FDIM_(n), int *i__, double *d__, double *z__, double *delta, double *rho, double *sigma, double *work, SimTK_INFO_)
void	dlasd5_ (int *i__, double *d__, double *z__, double *delta, double *rho, double *dsigma, double *work)
void	dlasd6_ (int *icompq, int *nl, int *nr, int *sqre, double *d__, double *vf, double *vl, const SimTK_FSCL_(double, alpha), const SimTK_FSCL_(double, beta), int *idxq, int *perm, int *givptr, int *givcol, int *ldgcol, double *givnum, int *ldgnum, double *poles, double *difl, double *difr, double *z__, SimTK_FDIM_(k), double *c__, double *s, double *work, int *iwork, SimTK_INFO_)
void	dlasd7_ (int *icompq, int *nl, int *nr, int *sqre, SimTK_FDIM_(k), double *d__, double *z__, double *zw, double *vf, double *vfw, double *vl, double *vlw, const SimTK_FSCL_(double, alpha), const SimTK_FSCL_(double, beta), double *dsigma, int *idx, int *idxp, int *idxq, int *perm, int *givptr, int *givcol, int *ldgcol, double *givnum, int *ldgnum, double *c__, double *s, SimTK_INFO_)
void	dlasd8_ (int *icompq, SimTK_FDIM_(k), double *d__, double *z__, double *vf, double *vl, double *difl, double *difr, int *lddifr, double *dsigma, double *work, SimTK_INFO_)
void	dlasd9_ (int *icompq, SimTK_FDIM_(ldu), SimTK_FDIM_(k), double *d__, double *z__, double *vf, double *vl, double *difl, double *difr, double *dsigma, double *work, SimTK_INFO_)
void	dlasda_ (int *icompq, int *smlsiz, SimTK_FDIM_(n), int *sqre, double *d__, double *e, double *u, SimTK_FDIM_(ldu), double *vt, SimTK_FDIM_(k), double *difl, double *difr, double *z__, double *poles, int *givptr, int *givcol, int *ldgcol, int *perm, double *givnum, double *c__, double *s, double *work, int *iwork, SimTK_INFO_)
void	dlasdq_ (SimTK_FOPT_(uplo), int *sqre, SimTK_FDIM_(n), int *ncvt, int *nru, int *ncc, double *d__, double *e, double *vt, SimTK_FDIM_(ldvt), double *u, SimTK_FDIM_(ldu), double *c__, SimTK_FDIM_(ldc), double *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dlasdt_ (SimTK_FDIM_(n), int *lvl, int *nd, int *inode, int *ndiml, int *ndimr, int *msub)
void	dlaset_ (SimTK_FOPT_(uplo), SimTK_FDIM_(m), SimTK_FDIM_(n), double *alpha, const SimTK_FSCL_(double, beta), double *a, SimTK_FDIM_(lda), SimTK_FLEN_(uplo))
void	dlasq1_ (SimTK_FDIM_(n), double *d__, double *e, double *work, SimTK_INFO_)
void	dlasq2_ (SimTK_FDIM_(n), double *z__, SimTK_INFO_)
void	dlasq3_ (int *i0, int *n0, double *z__, int *pp, double *dmin__, double *sigma, double *desig, double *qmax, int *nfail, int *iter, int *ndiv, int *ieee, int *ttype, double *dmin1, double *dmin2, double *dn, double *dn1, double *dn2, double *tau)
void	dlasq4_ (int *i0, int *n0, double *z__, int *pp, int *n0in, double *dmin__, double *dmin1, double *dmin2, double *dn, double *dn1, double *dn2, double *tau, int *ttype, double *g)
void	dlasq5_ (int *i0, int *n0, double *z__, int *pp, double *tau, double *dmin__, double *dmin1, double *dmin2, double *dn, double *dnm1, double *dnm2, int *ieee)
void	dlasq6_ (int *i0, int *n0, double *z__, int *pp, double *dmin__, double *dmin1, double *dmin2, double *dn, double *dnm1, double *dnm2)
void	dlasr_ (SimTK_FOPT_(side), char *pivot, SimTK_FOPT_(direct), SimTK_FDIM_(m), SimTK_FDIM_(n), double *c__, double *s, double *a, SimTK_FDIM_(lda), SimTK_FLEN_(side), SimTK_FLEN_(pivot), SimTK_FLEN_(direct))
void	dlasrt_ (char *id, SimTK_FDIM_(n), double *d__, SimTK_INFO_, SimTK_FLEN_(id))
void	dlassq_ (SimTK_FDIM_(n), double *x, SimTK_FINC_(x), double *scale, double *sumsq)
void	dlasv2_ (double *f, double *g, double *h__, double *ssmin, double *ssmax, double *snr, double *csr, double *snl, double *csl)
void	dlaswp_ (SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), int *k1, int *k2, int *ipiv, SimTK_FINC_(x))
void	dlasy2_ (int *ltranl, int *ltranr, int *isgn, int *n1, int *n2, double *tl, int *ldtl, double *tr, int *ldtr, double *b, SimTK_FDIM_(ldb), double *scale, double *x, int *ldx, double *xnorm, SimTK_INFO_)
void	dlasyf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *nb, int *kb, double *a, SimTK_FDIM_(lda), int *ipiv, double *w, int *ldw, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dlatbs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), char *normin, SimTK_FDIM_(n), int *kd, double *ab, SimTK_FDIM_(ldab), double *x, double *scale, double *cnorm, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag), SimTK_FLEN_(normin))
void	dlatdf_ (int *ijob, SimTK_FDIM_(n), double *z__, SimTK_FDIM_(ldz), double *rhs, double *rdsum, double *rdscal, int *ipiv, int *jpiv)
void	dlatps_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), char *normin, SimTK_FDIM_(n), double *ap, double *x, double *scale, double *cnorm, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag), SimTK_FLEN_(normin))
void	dlatrd_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *nb, double *a, SimTK_FDIM_(lda), double *e, double *tau, double *w, int *ldw, SimTK_FLEN_(uplo))
void	dlatrs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), char *normin, SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *x, double *scale, double *cnorm, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	dlatrz_ (SimTK_FDIM_(m), SimTK_FDIM_(n), int *l, double *a, SimTK_FDIM_(lda), double *tau, double *work)
void	dlatzm_ (SimTK_FOPT_(side), SimTK_FDIM_(m), SimTK_FDIM_(n), double *v, SimTK_FINC_(v), double *tau, double *c1, double *c2, SimTK_FDIM_(ldc), double *work, SimTK_FLEN_(side))
void	dlauu2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dlauum_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dopgtr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *ap, double *tau, double *q, SimTK_FDIM_(ldq), double *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dopmtr_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), double *ap, double *tau, double *c__, int *ldc, double *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(uplo), SimTK_FLEN_(trans))
void	dorg2l_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_INFO_)
void	dorg2r_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_INFO_)
void	dorgbr_ (SimTK_FOPT_(vect), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(vect))
void	dorghr_ (SimTK_FDIM_(n), int *ilo, int *ihi, double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dorgl2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_INFO_)
void	dorglq_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dorgql_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dorgqr_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dorgr2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_INFO_)
void	dorgrq_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dorgtr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dorm2l_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), double *a, SimTK_FDIM_(lda), double *tau, double *c__, SimTK_FDIM_(ldc), double *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	dorm2r_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), double *a, SimTK_FDIM_(lda), double *tau, double *c__, SimTK_FDIM_(ldc), double *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	dormbr_ (SimTK_FOPT_(vect), SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), double *a, SimTK_FDIM_(lda), double *tau, double *c__, SimTK_FDIM_(ldc), double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(vect), SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	dormhr_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), int *ilo, int *ihi, double *a, SimTK_FDIM_(lda), double *tau, double *c__, SimTK_FDIM_(ldc), double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	dorml2_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), double *a, SimTK_FDIM_(lda), double *tau, double *c__, SimTK_FDIM_(ldc), double *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	dormlq_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), double *a, SimTK_FDIM_(lda), double *tau, double *c__, SimTK_FDIM_(ldc), double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	dormql_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), double *a, SimTK_FDIM_(lda), double *tau, double *c__, SimTK_FDIM_(ldc), double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	dormqr_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), double *a, SimTK_FDIM_(lda), double *tau, double *c__, SimTK_FDIM_(ldc), double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	dormr2_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), double *a, SimTK_FDIM_(lda), double *tau, double *c__, SimTK_FDIM_(ldc), double *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	dormr3_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), int *l, double *a, SimTK_FDIM_(lda), double *tau, double *c__, SimTK_FDIM_(ldc), double *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	dormrq_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), double *a, SimTK_FDIM_(lda), double *tau, double *c__, SimTK_FDIM_(ldc), double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	dormrz_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), int *l, double *a, SimTK_FDIM_(lda), double *tau, double *c__, SimTK_FDIM_(ldc), double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	dormtr_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *tau, double *c__, SimTK_FDIM_(ldc), double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(uplo), SimTK_FLEN_(trans))
void	dpbcon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, double *ab, SimTK_FDIM_(ldab), double *anorm, double *rcond, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dpbequ_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, double *ab, SimTK_FDIM_(ldab), double *s, double *scond, double *amax, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dpbrfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), double *ab, SimTK_FDIM_(ldab), double *afb, SimTK_FDIM_(ldafb), double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dpbstf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, double *ab, SimTK_FDIM_(ldab), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dpbsv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), double *ab, SimTK_FDIM_(ldab), double *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dpbsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), double *ab, SimTK_FDIM_(ldab), double *afb, SimTK_FDIM_(ldafb), char *equed, double *s, double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	dpbtf2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, double *ab, SimTK_FDIM_(ldab), SimTK_INFO_)
void	dpbtrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, double *ab, SimTK_FDIM_(ldab), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dpbtrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), double *ab, SimTK_FDIM_(ldab), double *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dpocon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *anorm, double *rcond, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dpoequ_ (SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *s, double *scond, double *amax, SimTK_INFO_)
void	dporfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *a, SimTK_FDIM_(lda), double *af, int *ldaf, double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dposv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dposvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *a, SimTK_FDIM_(lda), double *af, int *ldaf, char *equed, double *s, double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	dpotf2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dpotrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dpotri_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dpotrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dppcon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *ap, double *anorm, double *rcond, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dppequ_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *ap, double *s, double *scond, double *amax, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dpprfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *ap, double *afp, double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dppsv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *ap, double *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dppsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *ap, double *afp, char *equed, double *s, double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	dpptrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *ap, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dpptri_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *ap, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dpptrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *ap, double *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dptcon_ (SimTK_FDIM_(n), double *d__, double *e, double *anorm, double *rcond, double *work, SimTK_INFO_)
void	dpteqr_ (SimTK_FOPT_(compz), SimTK_FDIM_(n), double *d__, double *e, double *z__, SimTK_FDIM_(ldz), double *work, SimTK_INFO_, SimTK_FLEN_(compz))
void	dptrfs_ (SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *d__, double *e, double *df, double *ef, double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *ferr, double *berr, double *work, SimTK_INFO_)
void	dptsv_ (SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *d__, double *e, double *b, SimTK_FDIM_(ldb), SimTK_INFO_)
void	dptsvx_ (SimTK_FOPT_(fact), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *d__, double *e, double *df, double *ef, double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, SimTK_INFO_, SimTK_FLEN_(fact))
void	dpttrf_ (SimTK_FDIM_(n), double *d__, double *e, SimTK_INFO_)
void	dpttrs_ (SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *d__, double *e, double *b, SimTK_FDIM_(ldb), SimTK_INFO_)
void	dptts2_ (SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *d__, double *e, double *b, SimTK_FDIM_(ldb))
void	drscl_ (SimTK_FDIM_(n), double *sa, double *sx, SimTK_FINC_(x))
void	dsbev_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, double *ab, SimTK_FDIM_(ldab), double *w, double *z__, SimTK_FDIM_(ldz), double *work, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	dsbevd_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, double *ab, SimTK_FDIM_(ldab), double *w, double *z__, SimTK_FDIM_(ldz), double *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	dsbevx_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, double *ab, SimTK_FDIM_(ldab), double *q, SimTK_FDIM_(ldq), double *vl, double *vu, int *il, int *iu, double *abstol, SimTK_FDIM_(m), double *w, double *z__, SimTK_FDIM_(ldz), double *work, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	dsbgst_ (SimTK_FOPT_(vect), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *ka, int *kb, double *ab, SimTK_FDIM_(ldab), double *bb, int *ldbb, double *x, int *ldx, double *work, SimTK_INFO_, SimTK_FLEN_(vect), SimTK_FLEN_(uplo))
void	dsbgv_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *ka, int *kb, double *ab, SimTK_FDIM_(ldab), double *bb, int *ldbb, double *w, double *z__, SimTK_FDIM_(ldz), double *work, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	dsbgvd_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *ka, int *kb, double *ab, SimTK_FDIM_(ldab), double *bb, int *ldbb, double *w, double *z__, SimTK_FDIM_(ldz), double *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	dsbgvx_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *ka, int *kb, double *ab, SimTK_FDIM_(ldab), double *bb, int *ldbb, double *q, SimTK_FDIM_(ldq), double *vl, double *vu, int *il, int *iu, double *abstol, SimTK_FDIM_(m), double *w, double *z__, SimTK_FDIM_(ldz), double *work, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	dsbtrd_ (SimTK_FOPT_(vect), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, double *ab, SimTK_FDIM_(ldab), double *d__, double *e, double *q, SimTK_FDIM_(ldq), double *work, SimTK_INFO_, SimTK_FLEN_(vect), SimTK_FLEN_(uplo))
void	dspcon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *ap, int *ipiv, double *anorm, double *rcond, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dspev_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *ap, double *w, double *z__, SimTK_FDIM_(ldz), double *work, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	dspevd_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *ap, double *w, double *z__, SimTK_FDIM_(ldz), double *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	dspevx_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *ap, double *vl, double *vu, int *il, int *iu, double *abstol, SimTK_FDIM_(m), double *w, double *z__, SimTK_FDIM_(ldz), double *work, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	dspgst_ (int *itype, SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *ap, double *bp, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dspgv_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *ap, double *bp, double *w, double *z__, SimTK_FDIM_(ldz), double *work, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	dspgvd_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *ap, double *bp, double *w, double *z__, SimTK_FDIM_(ldz), double *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	dspgvx_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *ap, double *bp, double *vl, double *vu, int *il, int *iu, double *abstol, SimTK_FDIM_(m), double *w, double *z__, SimTK_FDIM_(ldz), double *work, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	dsprfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *ap, double *afp, int *ipiv, double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dspsv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *ap, int *ipiv, double *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dspsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *ap, double *afp, int *ipiv, double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(face), SimTK_FLEN_(uplo))
void	dsptrd_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *ap, double *d__, double *e, double *tau, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dsptrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *ap, int *ipiv, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dsptri_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *ap, int *ipiv, double *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dsptrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *ap, int *ipiv, double *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dstebz_ (SimTK_FOPT_(range), char *order, SimTK_FDIM_(n), double *vl, double *vu, int *il, int *iu, double *abstol, double *d__, double *e, SimTK_FDIM_(m), int *nsplit, double *w, int *iblock, int *isplit, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(range), SimTK_FLEN_(order))
void	dstedc_ (SimTK_FOPT_(compz), SimTK_FDIM_(n), double *d__, double *e, double *z__, SimTK_FDIM_(ldz), double *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(compz))
void	dstegr_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FDIM_(n), double *d__, double *e, double *vl, double *vu, int *il, int *iu, double *abstol, SimTK_FDIM_(m), double *w, double *z__, SimTK_FDIM_(ldz), int *isuppz, double *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range))
void	dstein_ (SimTK_FDIM_(n), double *d__, double *e, SimTK_FDIM_(m), double *w, int *iblock, int *isplit, double *z__, SimTK_FDIM_(ldz), double *work, int *iwork, int *ifail, SimTK_INFO_)
void	dsteqr_ (SimTK_FOPT_(compz), SimTK_FDIM_(n), double *d__, double *e, double *z__, SimTK_FDIM_(ldz), double *work, SimTK_INFO_, SimTK_FLEN_(compz))
void	dsterf_ (SimTK_FDIM_(n), double *d__, double *e, SimTK_INFO_)
void	dstev_ (SimTK_FOPT_(jobz), SimTK_FDIM_(n), double *d__, double *e, double *z__, SimTK_FDIM_(ldz), double *work, SimTK_INFO_, SimTK_FLEN_(jobz))
void	dstevd_ (SimTK_FOPT_(jobz), SimTK_FDIM_(n), double *d__, double *e, double *z__, SimTK_FDIM_(ldz), double *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz))
void	dstevr_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FDIM_(n), double *d__, double *e, double *vl, double *vu, int *il, int *iu, double *abstol, SimTK_FDIM_(m), double *w, double *z__, SimTK_FDIM_(ldz), int *isuppz, double *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range))
void	dstevx_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FDIM_(n), double *d__, double *e, double *vl, double *vu, int *il, int *iu, double *abstol, SimTK_FDIM_(m), double *w, double *z__, SimTK_FDIM_(ldz), double *work, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range))
void	dsycon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), int *ipiv, double *anorm, double *rcond, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dsyev_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *w, double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	dsyevd_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *w, double *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	dsyevr_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *vl, double *vu, int *il, int *iu, double *abstol, SimTK_FDIM_(m), double *w, double *z__, SimTK_FDIM_(ldz), int *isuppz, double *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	dsyevx_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *vl, double *vu, int *il, int *iu, double *abstol, SimTK_FDIM_(m), double *w, double *z__, SimTK_FDIM_(ldz), double *work, SimTK_FDIM_(lwork), int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	dsygs2_ (int *itype, SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dsygst_ (int *itype, SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dsygv_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *w, double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	dsygvd_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *w, double *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	dsygvx_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *vl, double *vu, int *il, int *iu, double *abstol, SimTK_FDIM_(m), double *w, double *z__, SimTK_FDIM_(ldz), double *work, SimTK_FDIM_(lwork), int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	dsyrfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *a, SimTK_FDIM_(lda), double *af, int *ldaf, int *ipiv, double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dsysv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *a, SimTK_FDIM_(lda), int *ipiv, double *b, SimTK_FDIM_(ldb), double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dsysvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *a, SimTK_FDIM_(lda), double *af, int *ldaf, int *ipiv, double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *rcond, double *ferr, double *berr, double *work, SimTK_FDIM_(lwork), int *iwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo))
void	dsytd2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *d__, double *e, double *tau, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dsytf2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), int *ipiv, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dsytrd_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *d__, double *e, double *tau, double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dsytrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), int *ipiv, double *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dsytri_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), int *ipiv, double *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	dsytrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *a, SimTK_FDIM_(lda), int *ipiv, double *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	dtbcon_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), int *kd, double *ab, SimTK_FDIM_(ldab), double *rcond, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	dtbrfs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), double *ab, SimTK_FDIM_(ldab), double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	dtbtrs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), double *ab, SimTK_FDIM_(ldab), double *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	dtgevc_ (SimTK_FOPT_(side), SimTK_FOPT_(howmny), int *select, SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *vl, SimTK_FDIM_(ldvl), double *vr, SimTK_FDIM_(ldvr), int *mm, SimTK_FDIM_(m), double *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(howmny))
void	dtgex2_ (int *wantq, int *wantz, SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *q, SimTK_FDIM_(ldq), double *z__, SimTK_FDIM_(ldz), int *j1, int *n1, int *n2, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dtgexc_ (int *wantq, int *wantz, SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *q, SimTK_FDIM_(ldq), double *z__, SimTK_FDIM_(ldz), int *ifst, int *ilst, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	dtgsen_ (int *ijob, int *wantq, int *wantz, int *select, SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *alphar, double *alphai, double *beta, double *q, SimTK_FDIM_(ldq), double *z__, SimTK_FDIM_(ldz), SimTK_FDIM_(m), double *pl, double *pr, double *dif, double *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_)
void	dtgsja_ (SimTK_FOPT_(jobu), SimTK_FOPT_(jobv), SimTK_FOPT_(jobq), SimTK_FDIM_(m), int *p, SimTK_FDIM_(n), SimTK_FDIM_(k), int *l, double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *tola, double *tolb, const SimTK_FSCL_(double, alpha), const SimTK_FSCL_(double, beta), double *u, SimTK_FDIM_(ldu), double *v, SimTK_FDIM_(ldv), double *q, SimTK_FDIM_(ldq), double *work, int *ncycle, SimTK_INFO_, SimTK_FLEN_(jobu), SimTK_FLEN_(jobv), SimTK_FLEN_(jobq))
void	dtgsna_ (SimTK_FOPT_(job), SimTK_FOPT_(howmny), int *select, SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *vl, SimTK_FDIM_(ldvl), double *vr, SimTK_FDIM_(ldvr), double *s, double *dif, int *mm, SimTK_FDIM_(m), double *work, SimTK_FDIM_(lwork), int *iwork, SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(howmny))
void	dtgsy2_ (SimTK_FOPT_(trans), int *ijob, SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *c__, SimTK_FDIM_(ldc), double *d__, int *ldd, double *e, int *lde, double *f, int *ldf, double *scale, double *rdsum, double *rdscal, int *iwork, int *pq, SimTK_INFO_, SimTK_FLEN_(trans))
void	dtgsyl_ (SimTK_FOPT_(trans), int *ijob, SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *c__, SimTK_FDIM_(ldc), double *d__, int *ldd, double *e, int *lde, double *f, int *ldf, double *scale, double *dif, double *work, SimTK_FDIM_(lwork), int *iwork, SimTK_INFO_, SimTK_FLEN_(trans))
void	dtpcon_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), double *ap, double *rcond, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	dtprfs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *ap, double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	dtptri_ (SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), double *ap, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	dtptrs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *ap, double *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	dtrcon_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *rcond, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	dtrevc_ (SimTK_FOPT_(side), SimTK_FOPT_(howmny), int *select, SimTK_FDIM_(n), double *t, SimTK_FDIM_(ldt), double *vl, SimTK_FDIM_(ldvl), double *vr, SimTK_FDIM_(ldvr), int *mm, SimTK_FDIM_(m), double *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(howmny))
void	dtrexc_ (SimTK_FOPT_(compq), SimTK_FDIM_(n), double *t, SimTK_FDIM_(ldt), double *q, SimTK_FDIM_(ldq), int *ifst, int *ilst, double *work, SimTK_INFO_, SimTK_FLEN_(compq))
void	dtrrfs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *x, int *ldx, double *ferr, double *berr, double *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	dtrsen_ (SimTK_FOPT_(job), SimTK_FOPT_(compq), int *select, SimTK_FDIM_(n), double *t, SimTK_FDIM_(ldt), double *q, SimTK_FDIM_(ldq), double *wr, double *wi, SimTK_FDIM_(m), double *s, double *sep, double *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(compq))
void	dtrsna_ (SimTK_FOPT_(job), SimTK_FOPT_(howmny), int *select, SimTK_FDIM_(n), double *t, SimTK_FDIM_(ldt), double *vl, SimTK_FDIM_(ldvl), double *vr, SimTK_FDIM_(ldvr), double *s, double *sep, int *mm, SimTK_FDIM_(m), double *work, int *ldwork, int *iwork, SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(howmny))
void	dtrsyl_ (SimTK_FOPT_(trana), SimTK_FOPT_(tranb), int *isgn, SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), double *c__, SimTK_FDIM_(ldc), double *scale, SimTK_INFO_, SimTK_FLEN_(trana), SimTK_FLEN_(tranb))
void	dtrti2_ (SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	dtrtri_ (SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans))
void	dtrtrs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	dtzrqf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *tau, SimTK_INFO_)
void	dtzrzf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), double *tau, double *work, SimTK_FDIM_(lwork), SimTK_INFO_)
int	icmax1_ (SimTK_FDIM_(n), SimTK_C_ *cx, SimTK_FINC_(x))
int	ieeeck_ (int *ispec, float *zero, float *one)
int	ilaenv_ (int *ispec, const char *name__, const char *opts, int *n1, int *n2, int *n3, int *n4, SimTK_FLEN_(name), SimTK_FLEN_(opts))
int	izmax1_ (SimTK_FDIM_(n), SimTK_Z_ *cx, SimTK_FINC_(x))
void	sbdsdc_ (SimTK_FOPT_(uplo), SimTK_FOPT_(compq), SimTK_FDIM_(n), float *d__, float *e, float *u, SimTK_FDIM_(ldu), float *vt, SimTK_FDIM_(ldvt), float *q, int *iq, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(compq))
void	sbdsqr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *ncvt, int *nru, int *ncc, float *d__, float *e, float *vt, SimTK_FDIM_(ldvt), float *u, SimTK_FDIM_(ldu), float *c__, SimTK_FDIM_(ldc), float *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	sdisna_ (SimTK_FOPT_(job), SimTK_FDIM_(m), SimTK_FDIM_(n), float *d__, float *sep, SimTK_INFO_, SimTK_FLEN_(job))
void	sgbbrd_ (SimTK_FOPT_(vect), SimTK_FDIM_(m), SimTK_FDIM_(n), int *ncc, SimTK_FDIM_(kl), SimTK_FDIM_(ku), float *ab, SimTK_FDIM_(ldab), float *d__, float *e, float *q, SimTK_FDIM_(ldq), float *pt, int *ldpt, float *c__, int *ldc, float *work, SimTK_INFO_, SimTK_FLEN_(vect))
void	sgbcon_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), float *ab, SimTK_FDIM_(ldab), int *ipiv, float *anorm, float *rcond, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(norm))
void	sgbequ_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), float *ab, SimTK_FDIM_(ldab), float *r__, float *c__, float *rowcnd, float *colcnd, float *amax, SimTK_INFO_)
void	sgbrfs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_FDIM_(nrhs), float *ab, SimTK_FDIM_(ldab), float *afb, SimTK_FDIM_(ldafb), int *ipiv, float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(trans))
void	sgbsv_ (SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_FDIM_(nrhs), float *ab, SimTK_FDIM_(ldab), int *ipiv, float *b, SimTK_FDIM_(ldb), SimTK_INFO_)
void	sgbsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_FDIM_(nrhs), float *ab, SimTK_FDIM_(ldab), float *afb, SimTK_FDIM_(ldafb), int *ipiv, char *equed, float *r__, float *c__, float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(trans), SimTK_FLEN_(equed))
void	sgbtf2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), float *ab, SimTK_FDIM_(ldab), int *ipiv, SimTK_INFO_)
void	sgbtrf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), float *ab, SimTK_FDIM_(ldab), int *ipiv, SimTK_INFO_)
void	sgbtrs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_FDIM_(nrhs), float *ab, SimTK_FDIM_(ldab), int *ipiv, float *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(trans))
void	sgebak_ (SimTK_FOPT_(job), SimTK_FOPT_(side), SimTK_FDIM_(n), int *ilo, int *ihi, float *scale, SimTK_FDIM_(m), float *v, SimTK_FDIM_(ldv), SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(side))
void	sgebal_ (SimTK_FOPT_(job), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), int *ilo, int *ihi, float *scale, SimTK_INFO_, SimTK_FLEN_(job))
void	sgebd2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *d__, float *e, float *tauq, float *taup, float *work, SimTK_INFO_)
void	sgebrd_ (SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *d__, float *e, float *tauq, float *taup, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	sgecon_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *anorm, float *rcond, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(norm))
void	sgeequ_ (SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *r__, float *c__, float *rowcnd, float *colcnd, float *amax, int *info)
void	sgees_ (SimTK_FOPT_(jobvs), SimTK_FOPT_(sort), SimTK_SELECT_2S select, SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), int *sdim, float *wr, float *wi, float *vs, SimTK_FDIM_(ldvs), float *work, SimTK_FDIM_(lwork), int *bwork, SimTK_INFO_, SimTK_FLEN_(jobvs), SimTK_FLEN_(sort))
void	sgeesx_ (SimTK_FOPT_(jobvs), SimTK_FOPT_(sort), SimTK_SELECT_2S select, char *sense, SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), int *sdim, float *wr, float *wi, float *vs, SimTK_FDIM_(ldvs), float *rconde, float *rcondv, float *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, int *bwork, SimTK_INFO_, SimTK_FLEN_(jobvs), SimTK_FLEN_(sort), SimTK_FLEN_(sense))
void	sgeev_ (SimTK_FOPT_(jobvl), SimTK_FOPT_(jobvr), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *wr, float *wi, float *vl, SimTK_FDIM_(ldvl), float *vr, SimTK_FDIM_(ldvr), float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(jobvl), SimTK_FLEN_(jobvr))
void	sgeevx_ (SimTK_FOPT_(balanc), SimTK_FOPT_(jobvl), SimTK_FOPT_(jobvr), char *sense, SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *wr, float *wi, float *vl, SimTK_FDIM_(ldvl), float *vr, SimTK_FDIM_(ldvr), int *ilo, int *ihi, float *scale, float *abnrm, float *rconde, float *rcondv, float *work, SimTK_FDIM_(lwork), int *iwork, SimTK_INFO_, SimTK_FLEN_(balanc), SimTK_FLEN_(jobvl), SimTK_FLEN_(jobvr), SimTK_FLEN_(alpahr))
void	sgegs_ (SimTK_FOPT_(jobvsl), SimTK_FOPT_(jobvsr), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *alphar, float *alphai, float *beta, float *vsl, int *ldvsl, float *vsr, int *ldvsr, float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(jobvl), SimTK_FLEN_(jobvsr))
void	sgegv_ (SimTK_FOPT_(jobvl), SimTK_FOPT_(jobvr), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *alphar, float *alphai, float *beta, float *vl, SimTK_FDIM_(ldvl), float *vr, SimTK_FDIM_(ldvr), float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(jobvl), SimTK_FLEN_(jobvr))
void	sgehd2_ (SimTK_FDIM_(n), int *ilo, int *ihi, float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_INFO_)
void	sgehrd_ (SimTK_FDIM_(n), int *ilo, int *ihi, float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	sgelq2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_INFO_)
void	sgelqf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	sgels_ (SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(trans))
void	sgelsd_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *s, float *rcond, int *rank, float *work, SimTK_FDIM_(lwork), int *iwork, SimTK_INFO_)
void	sgelss_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *s, float *rcond, int *rank, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	sgelsx_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), int *jpvt, float *rcond, int *rank, float *work, SimTK_INFO_)
void	sgelsy_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), int *jpvt, float *rcond, int *rank, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	sgeql2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_INFO_)
void	sgeqlf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	sgeqp3_ (SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), int *jpvt, float *tau, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	sgeqpf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), int *jpvt, float *tau, float *work, SimTK_INFO_)
void	sgeqr2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_INFO_)
void	sgeqrf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	sgerfs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *a, SimTK_FDIM_(lda), float *af, int *ldaf, int *ipiv, float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(trans))
void	sgerq2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_INFO_)
void	sgerqf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	sgesc2_ (SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *rhs, int *ipiv, int *jpiv, float *scale)
void	sgesdd_ (SimTK_FOPT_(jobz), SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *s, float *u, SimTK_FDIM_(ldu), float *vt, SimTK_FDIM_(ldvt), float *work, SimTK_FDIM_(lwork), int *iwork, SimTK_INFO_, SimTK_FLEN_(jobz))
void	sgesv_ (SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *a, SimTK_FDIM_(lda), int *ipiv, float *b, SimTK_FDIM_(ldb), SimTK_INFO_)
void	sgesvd_ (SimTK_FOPT_(jobu), char *jobvt, SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *s, float *u, SimTK_FDIM_(ldu), float *vt, SimTK_FDIM_(ldvt), float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(jobu), SimTK_FLEN_(jobvt))
void	sgesvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *a, SimTK_FDIM_(lda), float *af, int *ldaf, int *ipiv, char *equed, float *r__, float *c__, float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(trans), SimTK_FLEN_(equed))
void	sgetc2_ (SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), int *ipiv, int *jpiv, SimTK_INFO_)
void	sgetf2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), int *ipiv, SimTK_INFO_)
void	sgetrf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), int *ipiv, SimTK_INFO_)
void	sgetri_ (SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), const int *ipiv, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	sgetrs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *a, SimTK_FDIM_(lda), int *ipiv, float *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(trans))
void	sggbak_ (SimTK_FOPT_(job), SimTK_FOPT_(side), SimTK_FDIM_(n), int *ilo, int *ihi, float *lscale, float *rscale, SimTK_FDIM_(m), float *v, SimTK_FDIM_(ldv), SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(side))
void	sggbal_ (SimTK_FOPT_(job), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), int *ilo, int *ihi, float *lscale, float *rscale, float *work, SimTK_INFO_, SimTK_FLEN_(job))
void	sgges_ (SimTK_FOPT_(jobvsl), SimTK_FOPT_(jobvsr), SimTK_FOPT_(sort), SimTK_SELECT_3F selctg, SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), int *sdim, float *alphar, float *alphai, const SimTK_FSCL_(float, beta), float *vsl, int *ldvsl, float *vsr, int *ldvsr, float *work, SimTK_FDIM_(lwork), int *bwork, SimTK_INFO_, SimTK_FLEN_(jobvsl), SimTK_FLEN_(jobvsr), SimTK_FLEN_(sort))
void	sggesx_ (SimTK_FOPT_(jobvsl), SimTK_FOPT_(jobvsr), SimTK_FOPT_(sort), SimTK_SELECT_3F selctg, char *sense, SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), int *sdim, float *alphar, float *alphai, const SimTK_FSCL_(float, beta), float *vsl, int *ldvsl, float *vsr, int *ldvsr, float *rconde, float *rcondv, float *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, int *bwork, SimTK_INFO_, SimTK_FLEN_(jobvsl), SimTK_FLEN_(jobvsr), SimTK_FLEN_(sort), SimTK_FLEN_(sense))
void	sggev_ (SimTK_FOPT_(jobvl), SimTK_FOPT_(jobvr), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *alphar, float *alphai, float *beta, float *vl, SimTK_FDIM_(ldvl), float *vr, SimTK_FDIM_(ldvr), float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(jobvsl), SimTK_FLEN_(jobvsr))
void	sggevx_ (SimTK_FOPT_(balanc), SimTK_FOPT_(jobvl), SimTK_FOPT_(jobvr), char *sense, SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *alphar, float *alphai, const SimTK_FSCL_(float, beta), float *vl, SimTK_FDIM_(ldvl), float *vr, SimTK_FDIM_(ldvr), int *ilo, int *ihi, float *lscale, float *rscale, float *abnrm, float *bbnrm, float *rconde, float *rcondv, float *work, SimTK_FDIM_(lwork), int *iwork, int *bwork, SimTK_INFO_, SimTK_FLEN_(balanc), SimTK_FLEN_(jobvl), SimTK_FLEN_(jobvr), SimTK_FLEN_(alpahr))
void	sggglm_ (SimTK_FDIM_(n), SimTK_FDIM_(m), int *p, float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *d__, float *x, float *y, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	sgghrd_ (SimTK_FOPT_(compq), SimTK_FOPT_(compz), SimTK_FDIM_(n), int *ilo, int *ihi, float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *q, SimTK_FDIM_(ldq), float *z__, SimTK_FDIM_(ldz), SimTK_INFO_, SimTK_FLEN_(compq), SimTK_FLEN_(compz))
void	sgglse_ (SimTK_FDIM_(m), SimTK_FDIM_(n), int *p, float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *c__, float *d__, float *x, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	sggqrf_ (SimTK_FDIM_(n), SimTK_FDIM_(m), int *p, float *a, SimTK_FDIM_(lda), float *taua, float *b, SimTK_FDIM_(ldb), float *taub, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	sggrqf_ (SimTK_FDIM_(m), int *p, SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *taua, float *b, SimTK_FDIM_(ldb), float *taub, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	sggsvd_ (SimTK_FOPT_(jobu), SimTK_FOPT_(jobv), SimTK_FOPT_(jobq), SimTK_FDIM_(m), SimTK_FDIM_(n), int *p, SimTK_FDIM_(k), int *l, float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), const SimTK_FSCL_(float, alpha), const SimTK_FSCL_(float, beta), float *u, SimTK_FDIM_(ldu), float *v, SimTK_FDIM_(ldv), float *q, SimTK_FDIM_(ldq), float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(jobu), SimTK_FLEN_(jobv), SimTK_FLEN_(jobq))
void	sggsvp_ (SimTK_FOPT_(jobu), SimTK_FOPT_(jobv), SimTK_FOPT_(jobq), SimTK_FDIM_(m), int *p, SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *tola, float *tolb, SimTK_FDIM_(k), int *l, float *u, SimTK_FDIM_(ldu), float *v, SimTK_FDIM_(ldv), float *q, SimTK_FDIM_(ldq), int *iwork, float *tau, float *work, SimTK_INFO_, SimTK_FLEN_(jobu), SimTK_FLEN_(jobv), SimTK_FLEN_(jobq))
void	sgtcon_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), float *dl, float *d__, float *du, float *du2, int *ipiv, float *anorm, float *rcond, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(norm))
void	sgtrfs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *dl, float *d__, float *du, float *dlf, float *df, float *duf, float *du2, int *ipiv, float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(trans))
void	sgtsv_ (SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *dl, float *d__, float *du, float *b, SimTK_FDIM_(ldb), SimTK_INFO_)
void	sgtsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *dl, float *d__, float *du, float *dlf, float *df, float *duf, float *du2, int *ipiv, float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(trans))
void	sgttrf_ (SimTK_FDIM_(n), float *dl, float *d__, float *du, float *du2, int *ipiv, SimTK_INFO_)
void	sgttrs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *dl, float *d__, float *du, float *du2, int *ipiv, float *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(trans))
void	sgtts2_ (int *itrans, SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *dl, float *d__, float *du, float *du2, int *ipiv, float *b, SimTK_FDIM_(ldb))
void	shgeqz_ (SimTK_FOPT_(job), SimTK_FOPT_(compq), SimTK_FOPT_(compz), SimTK_FDIM_(n), int *ilo, int *ihi, float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *alphar, float *alphai, const SimTK_FSCL_(float, beta), float *q, SimTK_FDIM_(ldq), float *z__, SimTK_FDIM_(ldz), float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(compq), SimTK_FLEN_(compz))
void	shsein_ (SimTK_FOPT_(side), char *eigsrc, char *initv, int *select, SimTK_FDIM_(n), float *h__, int *ldh, float *wr, float *wi, float *vl, SimTK_FDIM_(ldvl), float *vr, SimTK_FDIM_(ldvr), int *mm, SimTK_FDIM_(m), float *work, int *ifaill, int *ifailr, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(eigsrc), SimTK_FLEN_(initv))
double	slamch_ (SimTK_FOPT_(cmach), SimTK_FLEN_(cmach))
void	shseqr_ (SimTK_FOPT_(job), SimTK_FOPT_(compz), SimTK_FDIM_(n), int *ilo, int *ihi, float *h__, int *ldh, float *wr, float *wi, float *z__, SimTK_FDIM_(ldz), float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(compz))
void	slabad_ (float *small, float *large)
void	slabrd_ (SimTK_FDIM_(m), SimTK_FDIM_(n), int *nb, float *a, SimTK_FDIM_(lda), float *d__, float *e, float *tauq, float *taup, float *x, int *ldx, float *y, int *ldy)
void	slacon_ (SimTK_FDIM_(n), float *v, float *x, int *isgn, float *est, int *kase, int *j, int *jump, int *iter)
void	slacpy_ (SimTK_FOPT_(uplo), SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), SimTK_FLEN_(uplo))
void	sladiv_ (float *a, float *b, float *c__, float *d__, float *p, float *q)
void	slae2_ (float *a, float *b, float *c__, float *rt1, float *rt2)
void	slaebz_ (int *ijob, int *nitmax, SimTK_FDIM_(n), int *mmax, int *minp, int *nbmin, float *abstol, float *reltol, float *pivmin, float *d__, float *e, float *e2, int *nval, float *ab, float *c__, int *mout, int *nab, float *work, int *iwork, SimTK_INFO_)
void	slaed0_ (int *icompq, int *qsiz, SimTK_FDIM_(n), float *d__, float *e, float *q, SimTK_FDIM_(ldq), float *qstore, SimTK_FDIM_(ldqs), float *work, int *iwork, SimTK_INFO_)
void	slaed1_ (SimTK_FDIM_(n), float *d__, float *q, SimTK_FDIM_(ldq), int *indxq, float *rho, int *cutpnt, float *work, int *iwork, SimTK_INFO_)
void	slaed2_ (SimTK_FDIM_(k), SimTK_FDIM_(n), int *n1, float *d__, float *q, SimTK_FDIM_(ldq), int *indxq, float *rho, float *z__, float *dlamda, float *w, float *q2, int *indx, int *indxc, int *indxp, int *coltyp, SimTK_INFO_)
void	slaed3_ (SimTK_FDIM_(k), SimTK_FDIM_(n), int *n1, float *d__, float *q, SimTK_FDIM_(ldq), float *rho, float *dlamda, float *q2, int *indx, int *ctot, float *w, float *s, SimTK_INFO_)
void	slaed4_ (SimTK_FDIM_(n), int *i__, float *d__, float *z__, float *delta, float *rho, float *dlam, SimTK_INFO_)
void	slaed5_ (int *i__, float *d__, float *z__, float *delta, float *rho, float *dlam)
void	slaed6_ (int *kniter, int *orgati, float *rho, float *d__, float *z__, float *finit, float *tau, SimTK_INFO_)
void	slaed7_ (int *icompq, SimTK_FDIM_(n), int *qsiz, int *tlvls, int *curlvl, int *curpbm, float *d__, float *q, SimTK_FDIM_(ldq), int *indxq, float *rho, int *cutpnt, float *qstore, int *qptr, int *prmptr, int *perm, int *givptr, int *givcol, float *givnum, float *work, int *iwork, SimTK_INFO_)
void	slaed8_ (int *icompq, SimTK_FDIM_(k), SimTK_FDIM_(n), int *qsiz, float *d__, float *q, SimTK_FDIM_(ldq), int *indxq, float *rho, int *cutpnt, float *z__, float *dlamda, float *q2, SimTK_FDIM_(ldq2), float *w, int *perm, int *givptr, int *givcol, float *givnum, int *indxp, int *indx, SimTK_INFO_)
void	slaed9_ (SimTK_FDIM_(k), int *kstart, int *kstop, SimTK_FDIM_(n), float *d__, float *q, SimTK_FDIM_(ldq), float *rho, float *dlamda, float *w, float *s, int *lds, SimTK_INFO_)
void	slaeda_ (SimTK_FDIM_(n), int *tlvls, int *curlvl, int *curpbm, int *prmptr, int *perm, int *givptr, int *givcol, float *givnum, float *q, int *qptr, float *z__, float *ztemp, SimTK_INFO_)
void	slaein_ (int *rightv, int *noinit, SimTK_FDIM_(n), float *h__, int *ldh, float *wr, float *wi, float *vr, float *vi, float *b, SimTK_FDIM_(ldb), float *work, float *eps3, float *smlnum, float *bignum, SimTK_INFO_)
void	slaev2_ (float *a, float *b, float *c__, float *rt1, float *rt2, float *cs1, float *sn1)
void	slaexc_ (int *wantq, SimTK_FDIM_(n), float *t, SimTK_FDIM_(ldt), float *q, SimTK_FDIM_(ldq), int *j1, int *n1, int *n2, float *work, SimTK_INFO_)
void	slag2_ (float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *safmin, float *scale1, float *scale2, float *wr1, float *wr2, float *wi)
void	slags2_ (int *upper, float *a1, float *a2, float *a3, float *b1, float *b2, float *b3, float *csu, float *snu, float *csv, float *snv, float *csq, float *snq)
void	slagtf_ (SimTK_FDIM_(n), float *a, float *lambda, float *b, float *c__, float *tol, float *d__, int *in, SimTK_INFO_)
void	slagtm_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *alpha, float *dl, float *d__, float *du, float *x, int *ldx, float *beta, float *b, SimTK_FDIM_(ldb), SimTK_FLEN_(trans))
void	slagts_ (int *job, SimTK_FDIM_(n), float *a, float *b, float *c__, float *d__, int *in, float *y, float *tol, SimTK_INFO_)
void	slagv2_ (float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *alphar, float *alphai, const SimTK_FSCL_(float, beta), float *csl, float *snl, float *csr, float *snr)
void	slahqr_ (int *wantt, int *wantz, SimTK_FDIM_(n), int *ilo, int *ihi, float *h__, int *ldh, float *wr, float *wi, int *iloz, int *ihiz, float *z__, SimTK_FDIM_(ldz), SimTK_INFO_)
void	slahrd_ (SimTK_FDIM_(n), SimTK_FDIM_(k), int *nb, float *a, SimTK_FDIM_(lda), float *tau, float *t, SimTK_FDIM_(ldt), float *y, int *ldy)
void	slaic1_ (int *job, int *j, float *x, float *sest, float *w, float *gamma, float *sestpr, float *s, float *c__)
void	slaln2_ (int *ltrans, int *na, int *nw, float *smin, float *ca, float *a, SimTK_FDIM_(lda), float *d1, float *d2, float *b, SimTK_FDIM_(ldb), float *wr, float *wi, float *x, int *ldx, float *scale, float *xnorm, SimTK_INFO_)
void	slals0_ (int *icompq, int *nl, int *nr, int *sqre, SimTK_FDIM_(nrhs), float *b, SimTK_FDIM_(ldb), float *bx, int *ldbx, int *perm, int *givptr, int *givcol, int *ldgcol, float *givnum, int *ldgnum, float *poles, float *difl, float *difr, float *z__, SimTK_FDIM_(k), float *c__, float *s, float *work, SimTK_INFO_)
void	slalsa_ (int *icompq, int *smlsiz, SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *b, SimTK_FDIM_(ldb), float *bx, int *ldbx, float *u, SimTK_FDIM_(ldu), float *vt, SimTK_FDIM_(k), float *difl, float *difr, float *z__, float *poles, int *givptr, int *givcol, int *ldgcol, int *perm, float *givnum, float *c__, float *s, float *work, int *iwork, SimTK_INFO_)
void	slalsd_ (SimTK_FOPT_(uplo), int *smlsiz, SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *d__, float *e, float *b, SimTK_FDIM_(ldb), float *rcond, int *rank, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
double	slangb_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), const float *ab, SimTK_FDIM_(ldab), float *work, SimTK_FLEN_(norm))
double	clangb_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), const SimTK_C_ *ab, SimTK_FDIM_(ldab), float *work, SimTK_FLEN_(norm))
double	dlangb_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), const float *ab, SimTK_FDIM_(ldab), double *work, SimTK_FLEN_(norm))
double	zlangb_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), const SimTK_Z_ *ab, SimTK_FDIM_(ldab), double *work, SimTK_FLEN_(norm))
double	slange_ (SimTK_FOPT_(norm), SimTK_FDIM_(m), SimTK_FDIM_(n), const float *a, SimTK_FDIM_(lda), float *work, SimTK_FLEN_(norm))
double	clange_ (SimTK_FOPT_(norm), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_C_ *a, SimTK_FDIM_(lda), float *work, SimTK_FLEN_(norm))
double	dlange_ (SimTK_FOPT_(norm), SimTK_FDIM_(m), SimTK_FDIM_(n), const double *a, SimTK_FDIM_(lda), double *work, SimTK_FLEN_(norm))
double	zlange_ (SimTK_FOPT_(norm), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_Z_ *a, SimTK_FDIM_(lda), double *work, SimTK_FLEN_(norm))
double	slansb_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(k), const float *ab, SimTK_FDIM_(ldab), float *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo))
double	dlansb_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(k), const double *ab, SimTK_FDIM_(ldab), double *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo))
double	clansb_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_C_ *ab, SimTK_FDIM_(ldab), float *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo))
double	zlansb_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_Z_ *ab, SimTK_FDIM_(ldab), double *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo))
double	clanhb_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_C_ *ab, SimTK_FDIM_(ldab), float *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo))
double	zlanhb_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_Z_ *ab, SimTK_FDIM_(ldab), double *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo))
double	slansp_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FDIM_(n), const float *ap, float *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo))
double	dlansp_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FDIM_(n), const double *ap, double *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo))
double	clansp_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_C_ *ap, float *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo))
double	zlansp_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_Z_ *ap, double *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo))
double	slanhs_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), const float *a, SimTK_FDIM_(lda), float *work, SimTK_FLEN_(norm))
double	dlanhs_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), const double *a, SimTK_FDIM_(lda), double *work, SimTK_FLEN_(norm))
double	clanhs_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), const SimTK_C_ *a, SimTK_FDIM_(lda), float *work, SimTK_FLEN_(norm))
double	zlanhs_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), const SimTK_Z_ *a, SimTK_FDIM_(lda), double *work, SimTK_FLEN_(norm))
double	slangt_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), const float *dl, const float *d, const float *du, SimTK_FLEN_(norm))
double	dlangt_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), const double *dl, const double *d, const double *du, SimTK_FLEN_(norm))
double	clangt_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), const SimTK_C_ *dl, const SimTK_C_ *d, const SimTK_C_ *du, SimTK_FLEN_(norm))
double	zlangt_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), const SimTK_Z_ *dl, const SimTK_Z_ *d, const SimTK_Z_ *du, SimTK_FLEN_(norm))
double	clanhp_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_C_ *ap, float *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo))
double	zlanhp_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_Z_ *ap, double *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo))
double	clanht_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), const float *d, const SimTK_C_ *e, SimTK_FLEN_(norm))
double	zlanht_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), const double *d, const SimTK_Z_ *e, SimTK_FLEN_(norm))
double	slansy_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FDIM_(n), const float *a, SimTK_FDIM_(lda), float *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo))
double	dlansy_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FDIM_(n), const double *a, SimTK_FDIM_(lda), double *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo))
double	clansy_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_C_ *a, SimTK_FDIM_(lda), float *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo))
double	zlansy_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_Z_ *a, SimTK_FDIM_(lda), double *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo))
double	clanhe_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_C_ *a, SimTK_FDIM_(lda), float *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo))
double	zlanhe_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_Z_ *a, SimTK_FDIM_(lda), double *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo))
double	slantb_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(k), const float *ab, SimTK_FDIM_(ldab), float *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
double	dlantb_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(k), const double *ab, SimTK_FDIM_(ldab), double *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
double	clantb_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_C_ *ab, SimTK_FDIM_(ldab), float *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
double	zlantb_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(k), const SimTK_Z_ *ab, SimTK_FDIM_(ldab), double *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
double	slantp_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), const float *ap, float *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
double	dlantp_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), const double *ap, double *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
double	clantp_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), const SimTK_C_ *ap, float *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
double	zlantp_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), const SimTK_Z_ *ap, double *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
double	slantr_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(m), SimTK_FDIM_(n), const float *a, SimTK_FDIM_(lda), float *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
double	dlantr_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(m), SimTK_FDIM_(n), const double *a, SimTK_FDIM_(lda), double *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
double	clantr_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_C_ *a, SimTK_FDIM_(lda), float *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
double	zlantr_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_Z_ *a, SimTK_FDIM_(lda), double *work, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
double	slapy2_ (const float *x, const float *y)
double	dlapy2_ (const double *x, const double *y)
double	slapy3_ (const float *x, const float *y, const float *z)
double	dlapy3_ (const double *x, const double *y, const double *z)
void	chetd2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_C_ *a, SimTK_FDIM_(lda), float *d, float *e, SimTK_C_ *tau, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zhetd2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), double *d, double *e, SimTK_Z_ *tau, SimTK_INFO_, SimTK_FLEN_(uplo))
void	slamc1_ (int *beta, int *t, int *rnd, int *ieee1)
void	slamc2_ (int *beta, int *t, int *rnd, float *eps, int *emin, float *rmin, int *emax, float *rmax)
void	slamc4_ (int *emin, float *start, int *base)
void	slamc5_ (int *beta, int *p, int *emin, int *ieee, int *emax, float *rmax)
void	slamrg_ (int *n1, int *n2, float *a, int *strd1, int *strd2, int *index)
void	slanv2_ (float *a, float *b, float *c__, float *d__, float *rt1r, float *rt1i, float *rt2r, float *rt2i, float *cs, float *sn)
void	slapll_ (SimTK_FDIM_(n), float *x, SimTK_FINC_(x), float *y, SimTK_FINC_(y), float *ssmin)
void	slapmt_ (int *forwrd, SimTK_FDIM_(m), SimTK_FDIM_(n), float *x, int *ldx, SimTK_FDIM_(k))
void	slaqgb_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), float *ab, SimTK_FDIM_(ldab), float *r__, float *c__, float *rowcnd, float *colcnd, float *amax, char *equed, SimTK_FLEN_(equed))
void	slaqge_ (SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *r__, float *c__, float *rowcnd, float *colcnd, float *amax, char *equed, SimTK_FLEN_(equed))
void	slaqp2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), int *offset, float *a, SimTK_FDIM_(lda), int *jpvt, float *tau, float *vn1, float *vn2, float *work)
void	slaqps_ (SimTK_FDIM_(m), SimTK_FDIM_(n), int *offset, int *nb, int *kb, float *a, SimTK_FDIM_(lda), int *jpvt, float *tau, float *vn1, float *vn2, float *auxv, float *f, int *ldf)
void	slaqsb_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, float *ab, SimTK_FDIM_(ldab), float *s, float *scond, float *amax, char *equed, SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	slaqsp_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *ap, float *s, float *scond, float *amax, char *equed, SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	slaqsy_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *s, float *scond, float *amax, char *equed, SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	slaqtr_ (int *ltran, int *lfloat, SimTK_FDIM_(n), float *t, SimTK_FDIM_(ldt), float *b, float *w, float *scale, float *x, float *work, SimTK_INFO_)
void	slar1v_ (SimTK_FDIM_(n), int *b1, int *bn, float *sigma, float *d__, float *l, float *ld, float *lld, float *gersch, float *z__, float *ztz, float *mingma, int *r__, int *isuppz, float *work)
void	slar2v_ (SimTK_FDIM_(n), float *x, float *y, float *z__, int *incx, float *c__, float *s, SimTK_FINC_(c))
void	slarf_ (SimTK_FOPT_(side), SimTK_FDIM_(m), SimTK_FDIM_(n), float *v, SimTK_FINC_(v), float *tau, float *c__, SimTK_FDIM_(ldc), float *work, SimTK_FLEN_(side))
void	slarfb_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FOPT_(direct), SimTK_FOPT_(storev), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), float *v, SimTK_FDIM_(ldv), float *t, SimTK_FDIM_(ldt), float *c__, SimTK_FDIM_(ldc), float *work, int *ldwork, SimTK_FLEN_(side), SimTK_FLEN_(trans), SimTK_FLEN_(direct))
void	slarfg_ (SimTK_FDIM_(n), const SimTK_FSCL_(float, alpha), float *x, SimTK_FINC_(x), float *tau)
void	slarft_ (SimTK_FOPT_(direct), SimTK_FOPT_(storev), SimTK_FDIM_(n), int *k, float *v, SimTK_FDIM_(ldv), float *tau, float *t, SimTK_FDIM_(ldt), SimTK_FLEN_(direct), SimTK_FLEN_(storev))
void	slarfx_ (SimTK_FOPT_(side), SimTK_FDIM_(m), SimTK_FDIM_(n), float *v, float *tau, float *c__, SimTK_FDIM_(ldc), float *work, SimTK_FLEN_(side))
void	slargv_ (SimTK_FDIM_(n), float *x, SimTK_FINC_(x), float *y, SimTK_FINC_(y), float *c__, SimTK_FINC_(c))
void	slarnv_ (int *idist, int *iseed, SimTK_FDIM_(n), float *x)
void	slarrb_ (SimTK_FDIM_(n), float *d__, float *l, float *ld, float *lld, int *ifirst, int *ilast, float *sigma, float *reltol, float *w, float *wgap, float *werr, float *work, int *iwork, SimTK_INFO_)
void	slarre_ (SimTK_FDIM_(n), float *d__, float *e, float *tol, int *nsplit, int *isplit, SimTK_FDIM_(m), float *w, float *woff, float *gersch, float *work, SimTK_INFO_)
void	slarrf_ (SimTK_FDIM_(n), float *d__, float *l, float *ld, float *lld, int *ifirst, int *ilast, float *w, float *dplus, float *lplus, float *work, int *iwork, SimTK_INFO_)
void	slarrv_ (SimTK_FDIM_(n), float *d__, float *l, int *isplit, SimTK_FDIM_(m), float *w, int *iblock, float *gersch, float *tol, float *z__, SimTK_FDIM_(ldz), int *isuppz, float *work, int *iwork, SimTK_INFO_)
void	slartg_ (float *f, float *g, float *cs, float *sn, float *r__)
void	slartv_ (SimTK_FDIM_(n), float *x, SimTK_FINC_(x), float *y, SimTK_FINC_(y), float *c__, float *s, SimTK_FINC_(c))
void	slaruv_ (int *iseed, SimTK_FDIM_(n), float *x)
void	slarz_ (SimTK_FOPT_(side), SimTK_FDIM_(m), SimTK_FDIM_(n), int *l, float *v, SimTK_FINC_(v), float *tau, float *c__, SimTK_FDIM_(ldc), float *work, SimTK_FLEN_(side))
void	slarzb_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FOPT_(direct), SimTK_FOPT_(storev), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), int *l, float *v, SimTK_FDIM_(ldv), float *t, SimTK_FDIM_(ldt), float *c__, SimTK_FDIM_(ldc), float *work, int *ldwork, SimTK_FLEN_(side), SimTK_FLEN_(trans), SimTK_FLEN_(direct))
void	slarzt_ (SimTK_FOPT_(direct), SimTK_FOPT_(storev), SimTK_FDIM_(n), int *k, float *v, SimTK_FDIM_(ldv), float *tau, float *t, SimTK_FDIM_(ldt), SimTK_FLEN_(direct), SimTK_FLEN_(storev))
void	slas2_ (float *f, float *g, float *h__, float *ssmin, float *ssmax)
void	slascl_ (char *type__, SimTK_FDIM_(kl), SimTK_FDIM_(ku), float *cfrom, float *cto, SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(type))
void	slasd0_ (SimTK_FDIM_(n), int *sqre, float *d__, float *e, float *u, SimTK_FDIM_(ldu), float *vt, SimTK_FDIM_(ldvt), int *smlsiz, int *iwork, float *work, SimTK_INFO_)
void	slasd1_ (int *nl, int *nr, int *sqre, float *d__, const SimTK_FSCL_(float, alpha), const SimTK_FSCL_(float, beta), float *u, SimTK_FDIM_(ldu), float *vt, SimTK_FDIM_(ldvt), int *idxq, int *iwork, float *work, SimTK_INFO_)
void	slasd2_ (int *nl, int *nr, int *sqre, int *k, float *d__, float *z__, const SimTK_FSCL_(float, alpha), const SimTK_FSCL_(float, beta), float *u, SimTK_FDIM_(ldu), float *vt, SimTK_FDIM_(ldvt), float *dsigma, float *u2, int *ldu2, float *vt2, int *ldvt2, int *idxp, int *idx, int *idxc, int *idxq, int *coltyp, SimTK_INFO_)
void	slasd3_ (int *nl, int *nr, int *sqre, int *k, float *d__, float *q, SimTK_FDIM_(ldq), float *dsigma, float *u, SimTK_FDIM_(ldu), float *u2, int *ldu2, float *vt, SimTK_FDIM_(ldvt), float *vt2, int *ldvt2, int *idxc, int *ctot, float *z__, SimTK_INFO_)
void	slasd4_ (SimTK_FDIM_(n), int *i__, float *d__, float *z__, float *delta, float *rho, float *sigma, float *work, SimTK_INFO_)
void	slasd5_ (int *i__, float *d__, float *z__, float *delta, float *rho, float *dsigma, float *work)
void	slasd6_ (int *icompq, int *nl, int *nr, int *sqre, float *d__, float *vf, float *vl, const SimTK_FSCL_(float, alpha), const SimTK_FSCL_(float, beta), int *idxq, int *perm, int *givptr, int *givcol, int *ldgcol, float *givnum, int *ldgnum, float *poles, float *difl, float *difr, float *z__, SimTK_FDIM_(k), float *c__, float *s, float *work, int *iwork, SimTK_INFO_)
void	slasd7_ (int *icompq, int *nl, int *nr, int *sqre, SimTK_FDIM_(k), float *d__, float *z__, float *zw, float *vf, float *vfw, float *vl, float *vlw, const SimTK_FSCL_(float, alpha), const SimTK_FSCL_(float, beta), float *dsigma, int *idx, int *idxp, int *idxq, int *perm, int *givptr, int *givcol, int *ldgcol, float *givnum, int *ldgnum, float *c__, float *s, SimTK_INFO_)
void	slasd8_ (int *icompq, SimTK_FDIM_(k), float *d__, float *z__, float *vf, float *vl, float *difl, float *difr, int *lddifr, float *dsigma, float *work, SimTK_INFO_)
void	slasd9_ (int *icompq, SimTK_FDIM_(ldu), SimTK_FDIM_(k), float *d__, float *z__, float *vf, float *vl, float *difl, float *difr, float *dsigma, float *work, SimTK_INFO_)
void	slasda_ (int *icompq, int *smlsiz, SimTK_FDIM_(n), int *sqre, float *d__, float *e, float *u, SimTK_FDIM_(ldu), float *vt, SimTK_FDIM_(k), float *difl, float *difr, float *z__, float *poles, int *givptr, int *givcol, int *ldgcol, int *perm, float *givnum, float *c__, float *s, float *work, int *iwork, SimTK_INFO_)
void	slasdq_ (SimTK_FOPT_(uplo), int *sqre, SimTK_FDIM_(n), int *ncvt, int *nru, int *ncc, float *d__, float *e, float *vt, SimTK_FDIM_(ldvt), float *u, SimTK_FDIM_(ldu), float *c__, SimTK_FDIM_(ldc), float *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	slasdt_ (SimTK_FDIM_(n), int *lvl, int *nd, int *inode, int *ndiml, int *ndimr, int *msub)
void	slaset_ (SimTK_FOPT_(uplo), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(float, alpha), const SimTK_FSCL_(float, beta), float *a, SimTK_FDIM_(lda), SimTK_FLEN_(uplo))
void	slasq1_ (SimTK_FDIM_(n), float *d__, float *e, float *work, SimTK_INFO_)
void	slasq2_ (SimTK_FDIM_(n), float *z__, SimTK_INFO_)
void	slasq3_ (int *i0, int *n0, float *z__, int *pp, float *dmin__, float *sigma, float *desig, float *qmax, int *nfail, int *iter, int *ndiv, int *ieee, int *ttype, float *dmin1, float *dmin2, float *dn, float *dn1, float *dn2, float *tau)
void	slasq4_ (int *i0, int *n0, float *z__, int *pp, int *n0in, float *dmin__, float *dmin1, float *dmin2, float *dn, float *dn1, float *dn2, float *tau, int *ttype, float *g)
void	slasq5_ (int *i0, int *n0, float *z__, int *pp, float *tau, float *dmin__, float *dmin1, float *dmin2, float *dn, float *dnm1, float *dnm2, int *ieee)
void	slasq6_ (int *i0, int *n0, float *z__, int *pp, float *dmin__, float *dmin1, float *dmin2, float *dn, float *dnm1, float *dnm2)
void	slasr_ (SimTK_FOPT_(side), char *pivot, SimTK_FOPT_(direct), SimTK_FDIM_(m), SimTK_FDIM_(n), float *c__, float *s, float *a, SimTK_FDIM_(lda), SimTK_FLEN_(side), SimTK_FLEN_(pivot), SimTK_FLEN_(direct))
void	slasrt_ (char *id, SimTK_FDIM_(n), float *d__, SimTK_INFO_, SimTK_FLEN_(id))
void	slassq_ (SimTK_FDIM_(n), float *x, SimTK_FINC_(x), float *scale, float *sumsq)
void	slasv2_ (float *f, float *g, float *h__, float *ssmin, float *ssmax, float *snr, float *csr, float *snl, float *csl)
void	slaswp_ (SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), int *k1, int *k2, int *ipiv, SimTK_FINC_(x))
void	slasy2_ (int *ltranl, int *ltranr, int *isgn, int *n1, int *n2, float *tl, int *ldtl, float *tr, int *ldtr, float *b, SimTK_FDIM_(ldb), float *scale, float *x, int *ldx, float *xnorm, SimTK_INFO_)
void	slasyf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *nb, int *kb, float *a, SimTK_FDIM_(lda), int *ipiv, float *w, int *ldw, int *info, SimTK_FLEN_(uplo))
void	slatbs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), char *normin, SimTK_FDIM_(n), int *kd, float *ab, SimTK_FDIM_(ldab), float *x, float *scale, float *cnorm, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	slatdf_ (int *ijob, SimTK_FDIM_(n), float *z__, SimTK_FDIM_(ldz), float *rhs, float *rdsum, float *rdscal, int *ipiv, int *jpiv)
void	slatps_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), char *normin, SimTK_FDIM_(n), float *ap, float *x, float *scale, float *cnorm, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	slatrd_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *nb, float *a, SimTK_FDIM_(lda), float *e, float *tau, float *w, int *ldw, SimTK_FLEN_(uplo))
void	slatrs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), char *normin, SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *x, float *scale, float *cnorm, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	slatrz_ (SimTK_FDIM_(m), SimTK_FDIM_(n), int *l, float *a, SimTK_FDIM_(lda), float *tau, float *work)
void	slatzm_ (SimTK_FOPT_(side), SimTK_FDIM_(m), SimTK_FDIM_(n), float *v, SimTK_FINC_(v), float *tau, float *c1, float *c2, SimTK_FDIM_(ldc), float *work, SimTK_FLEN_(side))
void	slauu2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo))
void	slauum_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo))
void	sopgtr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *ap, float *tau, float *q, SimTK_FDIM_(ldq), float *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	sopmtr_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), float *ap, float *tau, float *c__, SimTK_FDIM_(ldc), float *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(uplo), SimTK_FLEN_(trans))
void	sorg2l_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_INFO_)
void	sorg2r_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_INFO_)
void	sorgbr_ (SimTK_FOPT_(vect), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_FDIM_(lwork), int *info, SimTK_FLEN_(vect))
void	sorghr_ (SimTK_FDIM_(n), int *ilo, int *ihi, float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	sorgl2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_INFO_)
void	sorglq_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	sorgql_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	sorgqr_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	sorgr2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_INFO_)
void	sorgrq_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	sorgtr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(uplo))
void	sorm2l_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), float *a, SimTK_FDIM_(lda), float *tau, float *c__, SimTK_FDIM_(ldc), float *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	sorm2r_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), float *a, SimTK_FDIM_(lda), float *tau, float *c__, SimTK_FDIM_(ldc), float *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	sormbr_ (SimTK_FOPT_(vect), SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), float *a, SimTK_FDIM_(lda), float *tau, float *c__, SimTK_FDIM_(ldc), float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(vect), SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	sormhr_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), int *ilo, int *ihi, float *a, SimTK_FDIM_(lda), float *tau, float *c__, SimTK_FDIM_(ldc), float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	sorml2_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), float *a, SimTK_FDIM_(lda), float *tau, float *c__, SimTK_FDIM_(ldc), float *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	sormlq_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), float *a, SimTK_FDIM_(lda), float *tau, float *c__, SimTK_FDIM_(ldc), float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	sormql_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), float *a, SimTK_FDIM_(lda), float *tau, float *c__, SimTK_FDIM_(ldc), float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	sormqr_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), float *a, SimTK_FDIM_(lda), float *tau, float *c__, SimTK_FDIM_(ldc), float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	sormr2_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), float *a, SimTK_FDIM_(lda), float *tau, float *c__, SimTK_FDIM_(ldc), float *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	sormr3_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), int *l, float *a, SimTK_FDIM_(lda), float *tau, float *c__, SimTK_FDIM_(ldc), float *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	sormrq_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), float *a, SimTK_FDIM_(lda), float *tau, float *c__, SimTK_FDIM_(ldc), float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	sormrz_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), int *l, float *a, SimTK_FDIM_(lda), float *tau, float *c__, SimTK_FDIM_(ldc), float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	sormtr_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *tau, float *c__, SimTK_FDIM_(ldc), float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(uplo), SimTK_FLEN_(trans))
void	spbcon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, float *ab, SimTK_FDIM_(ldab), float *anorm, float *rcond, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	spbequ_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, float *ab, SimTK_FDIM_(ldab), float *s, float *scond, float *amax, SimTK_INFO_, SimTK_FLEN_(uplo))
void	spbrfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), float *ab, SimTK_FDIM_(ldab), float *afb, SimTK_FDIM_(ldafb), float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	spbstf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, float *ab, SimTK_FDIM_(ldab), SimTK_INFO_, SimTK_FLEN_(uplo))
void	spbsv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), float *ab, SimTK_FDIM_(ldab), float *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	spbsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), float *ab, SimTK_FDIM_(ldab), float *afb, SimTK_FDIM_(ldafb), char *equed, float *s, float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	spbtf2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, float *ab, SimTK_FDIM_(ldab), SimTK_INFO_)
void	spbtrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, float *ab, SimTK_FDIM_(ldab), SimTK_INFO_, SimTK_FLEN_(uplo))
void	spbtrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), float *ab, SimTK_FDIM_(ldab), float *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	spocon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *anorm, float *rcond, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	spoequ_ (SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *s, float *scond, float *amax, SimTK_INFO_)
void	sporfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *a, SimTK_FDIM_(lda), float *af, int *ldaf, float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	sposv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	sposvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *a, SimTK_FDIM_(lda), float *af, int *ldaf, char *equed, float *s, float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	spotf2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo))
void	spotrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo))
void	spotri_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo))
void	spotrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	sppcon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *ap, float *anorm, float *rcond, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	sppequ_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *ap, float *s, float *scond, float *amax, SimTK_INFO_, SimTK_FLEN_(uplo))
void	spprfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *ap, float *afp, float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	sppsv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *ap, float *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	sppsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *ap, float *afp, char *equed, float *s, float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	spptrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *ap, SimTK_INFO_, SimTK_FLEN_(uplo))
void	spptri_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *ap, SimTK_INFO_, SimTK_FLEN_(uplo))
void	spptrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *ap, float *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	sptcon_ (SimTK_FDIM_(n), float *d__, float *e, float *anorm, float *rcond, float *work, SimTK_INFO_)
void	spteqr_ (SimTK_FOPT_(compz), SimTK_FDIM_(n), float *d__, float *e, float *z__, SimTK_FDIM_(ldz), float *work, SimTK_INFO_, SimTK_FLEN_(compz))
void	sptrfs_ (SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *d__, float *e, float *df, float *ef, float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *ferr, float *berr, float *work, SimTK_INFO_)
void	sptsv_ (SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *d__, float *e, float *b, SimTK_FDIM_(ldb), SimTK_INFO_)
void	sptsvx_ (SimTK_FOPT_(fact), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *d__, float *e, float *df, float *ef, float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, SimTK_INFO_, SimTK_FLEN_(fact))
void	spttrf_ (SimTK_FDIM_(n), float *d__, float *e, SimTK_INFO_)
void	spttrs_ (SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *d__, float *e, float *b, SimTK_FDIM_(ldb), SimTK_INFO_)
void	sptts2_ (SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *d__, float *e, float *b, SimTK_FDIM_(ldb))
void	srscl_ (SimTK_FDIM_(n), float *sa, float *sx, SimTK_FINC_(x))
void	ssbev_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, float *ab, SimTK_FDIM_(ldab), float *w, float *z__, SimTK_FDIM_(ldz), float *work, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	ssbevd_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, float *ab, SimTK_FDIM_(ldab), float *w, float *z__, SimTK_FDIM_(ldz), float *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	ssbevx_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, float *ab, SimTK_FDIM_(ldab), float *q, SimTK_FDIM_(ldq), float *vl, float *vu, int *il, int *iu, float *abstol, SimTK_FDIM_(m), float *w, float *z__, SimTK_FDIM_(ldz), float *work, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	ssbgst_ (SimTK_FOPT_(vect), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *ka, int *kb, float *ab, SimTK_FDIM_(ldab), float *bb, int *ldbb, float *x, int *ldx, float *work, SimTK_INFO_, SimTK_FLEN_(vect), SimTK_FLEN_(uplo))
void	ssbgv_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *ka, int *kb, float *ab, SimTK_FDIM_(ldab), float *bb, int *ldbb, float *w, float *z__, SimTK_FDIM_(ldz), float *work, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	ssbgvd_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *ka, int *kb, float *ab, SimTK_FDIM_(ldab), float *bb, int *ldbb, float *w, float *z__, SimTK_FDIM_(ldz), float *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	ssbgvx_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *ka, int *kb, float *ab, SimTK_FDIM_(ldab), float *bb, int *ldbb, float *q, SimTK_FDIM_(ldq), float *vl, float *vu, int *il, int *iu, float *abstol, SimTK_FDIM_(m), float *w, float *z__, SimTK_FDIM_(ldz), float *work, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	ssbtrd_ (SimTK_FOPT_(vect), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, float *ab, SimTK_FDIM_(ldab), float *d__, float *e, float *q, SimTK_FDIM_(ldq), float *work, SimTK_INFO_, SimTK_FLEN_(vect), SimTK_FLEN_(uplo))
void	sspcon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *ap, int *ipiv, float *anorm, float *rcond, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	sspev_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *ap, float *w, float *z__, SimTK_FDIM_(ldz), float *work, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	sspevd_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *ap, float *w, float *z__, SimTK_FDIM_(ldz), float *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	sspevx_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *ap, float *vl, float *vu, int *il, int *iu, float *abstol, SimTK_FDIM_(m), float *w, float *z__, SimTK_FDIM_(ldz), float *work, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	sspgst_ (int *itype, SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *ap, float *bp, SimTK_INFO_, SimTK_FLEN_(uplo))
void	sspgv_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *ap, float *bp, float *w, float *z__, SimTK_FDIM_(ldz), float *work, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	sspgvd_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *ap, float *bp, float *w, float *z__, SimTK_FDIM_(ldz), float *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	sspgvx_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *ap, float *bp, float *vl, float *vu, int *il, int *iu, float *abstol, SimTK_FDIM_(m), float *w, float *z__, SimTK_FDIM_(ldz), float *work, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	ssprfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *ap, float *afp, int *ipiv, float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	sspsv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *ap, int *ipiv, float *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	sspsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *ap, float *afp, int *ipiv, float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo))
void	ssptrd_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *ap, float *d__, float *e, float *tau, SimTK_INFO_, SimTK_FLEN_(uplo))
void	ssptrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *ap, int *ipiv, SimTK_INFO_, SimTK_FLEN_(uplo))
void	ssptri_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *ap, int *ipiv, float *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	ssptrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *ap, int *ipiv, float *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	sstebz_ (SimTK_FOPT_(range), char *order, SimTK_FDIM_(n), float *vl, float *vu, int *il, int *iu, float *abstol, float *d__, float *e, SimTK_FDIM_(m), int *nsplit, float *w, int *iblock, int *isplit, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(range), SimTK_FLEN_(order))
void	sstedc_ (SimTK_FOPT_(compz), SimTK_FDIM_(n), float *d__, float *e, float *z__, SimTK_FDIM_(ldz), float *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(compz))
void	sstegr_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FDIM_(n), float *d__, float *e, float *vl, float *vu, int *il, int *iu, float *abstol, SimTK_FDIM_(m), float *w, float *z__, SimTK_FDIM_(ldz), int *isuppz, float *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range))
void	sstein_ (SimTK_FDIM_(n), float *d__, float *e, SimTK_FDIM_(m), float *w, int *iblock, int *isplit, float *z__, SimTK_FDIM_(ldz), float *work, int *iwork, int *ifail, SimTK_INFO_)
void	ssteqr_ (SimTK_FOPT_(compz), SimTK_FDIM_(n), float *d__, float *e, float *z__, SimTK_FDIM_(ldz), float *work, SimTK_INFO_, SimTK_FLEN_(compz))
void	ssterf_ (SimTK_FDIM_(n), float *d__, float *e, SimTK_INFO_)
void	sstev_ (SimTK_FOPT_(jobz), SimTK_FDIM_(n), float *d__, float *e, float *z__, SimTK_FDIM_(ldz), float *work, SimTK_INFO_, SimTK_FLEN_(jobz))
void	sstevd_ (SimTK_FOPT_(jobz), SimTK_FDIM_(n), float *d__, float *e, float *z__, SimTK_FDIM_(ldz), float *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz))
void	sstevr_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FDIM_(n), float *d__, float *e, float *vl, float *vu, int *il, int *iu, float *abstol, SimTK_FDIM_(m), float *w, float *z__, SimTK_FDIM_(ldz), int *isuppz, float *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range))
void	sstevx_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FDIM_(n), float *d__, float *e, float *vl, float *vu, int *il, int *iu, float *abstol, SimTK_FDIM_(m), float *w, float *z__, SimTK_FDIM_(ldz), float *work, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range))
void	ssycon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), int *ipiv, float *anorm, float *rcond, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	ssyev_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *w, float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	ssyevd_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *w, float *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	ssyevr_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *vl, float *vu, int *il, int *iu, float *abstol, SimTK_FDIM_(m), float *w, float *z__, SimTK_FDIM_(ldz), int *isuppz, float *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	ssyevx_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *vl, float *vu, int *il, int *iu, float *abstol, SimTK_FDIM_(m), float *w, float *z__, SimTK_FDIM_(ldz), float *work, SimTK_FDIM_(lwork), int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	ssygs2_ (int *itype, SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	ssygst_ (int *itype, SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	ssygv_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *w, float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	ssygvd_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *w, float *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	ssygvx_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *vl, float *vu, int *il, int *iu, float *abstol, SimTK_FDIM_(m), float *w, float *z__, SimTK_FDIM_(ldz), float *work, SimTK_FDIM_(lwork), int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	ssyrfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *a, SimTK_FDIM_(lda), float *af, int *ldaf, int *ipiv, float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	ssysv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *a, SimTK_FDIM_(lda), int *ipiv, float *b, SimTK_FDIM_(ldb), float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(uplo))
void	ssysvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *a, SimTK_FDIM_(lda), float *af, int *ldaf, int *ipiv, float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *rcond, float *ferr, float *berr, float *work, SimTK_FDIM_(lwork), int *iwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo))
void	ssytd2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *d__, float *e, float *tau, SimTK_INFO_, SimTK_FLEN_(uplo))
void	ssytf2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), int *ipiv, SimTK_INFO_, SimTK_FLEN_(uplo))
void	ssytrd_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *d__, float *e, float *tau, float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(uplo))
void	ssytrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), int *ipiv, float *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(uplo))
void	ssytri_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), int *ipiv, float *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	ssytrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *a, SimTK_FDIM_(lda), int *ipiv, float *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	stbcon_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), int *kd, float *ab, SimTK_FDIM_(ldab), float *rcond, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	stbrfs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), float *ab, SimTK_FDIM_(ldab), float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	stbtrs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), float *ab, SimTK_FDIM_(ldab), float *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	stgevc_ (SimTK_FOPT_(side), SimTK_FOPT_(howmny), int *select, SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *vl, SimTK_FDIM_(ldvl), float *vr, SimTK_FDIM_(ldvr), int *mm, SimTK_FDIM_(m), float *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(howmny))
void	stgex2_ (int *wantq, int *wantz, SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *q, SimTK_FDIM_(ldq), float *z__, SimTK_FDIM_(ldz), int *j1, int *n1, int *n2, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	stgexc_ (int *wantq, int *wantz, SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *q, SimTK_FDIM_(ldq), float *z__, SimTK_FDIM_(ldz), int *ifst, int *ilst, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	stgsen_ (int *ijob, int *wantq, int *wantz, int *select, SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *alphar, float *alphai, const SimTK_FSCL_(float, beta), float *q, SimTK_FDIM_(ldq), float *z__, SimTK_FDIM_(ldz), SimTK_FDIM_(m), float *pl, float *pr, float *dif, float *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_)
void	stgsja_ (SimTK_FOPT_(jobu), SimTK_FOPT_(jobv), SimTK_FOPT_(jobq), SimTK_FDIM_(m), int *p, SimTK_FDIM_(n), SimTK_FDIM_(k), int *l, float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *tola, float *tolb, const SimTK_FSCL_(float, alpha), float *beta, float *u, SimTK_FDIM_(ldu), float *v, SimTK_FDIM_(ldv), float *q, SimTK_FDIM_(ldq), float *work, int *ncycle, SimTK_INFO_, SimTK_FLEN_(jobu), SimTK_FLEN_(jobv), SimTK_FLEN_(jobq))
void	stgsna_ (SimTK_FOPT_(job), SimTK_FOPT_(howmny), int *select, SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *vl, SimTK_FDIM_(ldvl), float *vr, SimTK_FDIM_(ldvr), float *s, float *dif, int *mm, SimTK_FDIM_(m), float *work, SimTK_FDIM_(lwork), int *iwork, SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(howmny))
void	stgsy2_ (SimTK_FOPT_(trans), int *ijob, SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *c__, int *ldc, float *d__, int *ldd, float *e, int *lde, float *f, int *ldf, float *scale, float *rdsum, float *rdscal, int *iwork, int *pq, SimTK_INFO_, SimTK_FLEN_(trans))
void	stgsyl_ (SimTK_FOPT_(trans), int *ijob, SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *c__, int *ldc, float *d__, int *ldd, float *e, int *lde, float *f, int *ldf, float *scale, float *dif, float *work, SimTK_FDIM_(lwork), int *iwork, SimTK_INFO_, SimTK_FLEN_(trans))
void	stpcon_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), float *ap, float *rcond, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	stprfs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *ap, float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	stptri_ (SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), float *ap, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	stptrs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *ap, float *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	strcon_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *rcond, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	strevc_ (SimTK_FOPT_(side), SimTK_FOPT_(howmny), int *select, SimTK_FDIM_(n), float *t, SimTK_FDIM_(ldt), float *vl, SimTK_FDIM_(ldvl), float *vr, SimTK_FDIM_(ldvr), int *mm, SimTK_FDIM_(m), float *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(howmny))
void	strexc_ (SimTK_FOPT_(compq), SimTK_FDIM_(n), float *t, SimTK_FDIM_(ldt), float *q, SimTK_FDIM_(ldq), int *ifst, int *ilst, float *work, SimTK_INFO_, SimTK_FLEN_(compq))
void	strrfs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *x, int *ldx, float *ferr, float *berr, float *work, int *iwork, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	strsen_ (SimTK_FOPT_(job), SimTK_FOPT_(compq), int *select, SimTK_FDIM_(n), float *t, SimTK_FDIM_(ldt), float *q, SimTK_FDIM_(ldq), float *wr, float *wi, SimTK_FDIM_(m), float *s, float *sep, float *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(compq))
void	strsna_ (SimTK_FOPT_(job), SimTK_FOPT_(howmny), int *select, SimTK_FDIM_(n), float *t, SimTK_FDIM_(ldt), float *vl, SimTK_FDIM_(ldvl), float *vr, SimTK_FDIM_(ldvr), float *s, float *sep, int *mm, SimTK_FDIM_(m), float *work, int *ldwork, int *iwork, SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(howmny))
void	strsyl_ (SimTK_FOPT_(trana), SimTK_FOPT_(tranb), int *isgn, SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), float *c__, SimTK_FDIM_(ldc), float *scale, SimTK_INFO_, SimTK_FLEN_(trana), SimTK_FLEN_(tranb))
void	strti2_ (SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	strtri_ (SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	strtrs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), float *a, SimTK_FDIM_(lda), float *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	stzrqf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *tau, SimTK_INFO_)
void	stzrzf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), float *a, SimTK_FDIM_(lda), float *tau, float *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	xerbla_ (const char *srname, SimTK_INFO_, SimTK_FLEN_(srname))
void	zbdsqr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *ncvt, int *nru, int *ncc, double *d__, double *e, SimTK_Z_ *vt, SimTK_FDIM_(ldvt), SimTK_Z_ *u, SimTK_FDIM_(ldu), SimTK_Z_ *c__, SimTK_FDIM_(ldc), double *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zdrscl_ (SimTK_FDIM_(n), double *sa, SimTK_Z_ *sx, SimTK_FINC_(x))
void	zgbbrd_ (SimTK_FOPT_(vect), SimTK_FDIM_(m), SimTK_FDIM_(n), int *ncc, SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_Z_ *ab, SimTK_FDIM_(ldab), double *d__, double *e, SimTK_Z_ *q, SimTK_FDIM_(ldq), SimTK_Z_ *pt, int *ldpt, SimTK_Z_ *c__, SimTK_FDIM_(ldc), SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(vect))
void	zgbcon_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_Z_ *ab, SimTK_FDIM_(ldab), int *ipiv, double *anorm, double *rcond, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(norm))
void	zgbequ_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_Z_ *ab, SimTK_FDIM_(ldab), double *r__, double *c__, double *rowcnd, double *colcnd, double *amax, SimTK_INFO_)
void	zgbrfs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_FDIM_(nrhs), SimTK_Z_ *ab, SimTK_FDIM_(ldab), SimTK_Z_ *afb, SimTK_FDIM_(ldafb), int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(trans))
void	zgbsv_ (SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_FDIM_(nrhs), SimTK_Z_ *ab, SimTK_FDIM_(ldab), int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_)
void	zgbsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_FDIM_(nrhs), SimTK_Z_ *ab, SimTK_FDIM_(ldab), SimTK_Z_ *afb, SimTK_FDIM_(ldafb), int *ipiv, char *equed, double *r__, double *c__, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *rcond, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(trans), SimTK_FLEN_(equed))
void	zgbtf2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_Z_ *ab, SimTK_FDIM_(ldab), int *ipiv, SimTK_INFO_)
void	zgbtrf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_Z_ *ab, SimTK_FDIM_(ldab), int *ipiv, SimTK_INFO_)
void	zgbtrs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_FDIM_(nrhs), SimTK_Z_ *ab, SimTK_FDIM_(ldab), int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(trans))
void	zgebak_ (SimTK_FOPT_(job), SimTK_FOPT_(side), SimTK_FDIM_(n), int *ilo, int *ihi, double *scale, SimTK_FDIM_(m), SimTK_Z_ *v, SimTK_FDIM_(ldv), SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(side))
void	zgebal_ (SimTK_FOPT_(job), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), int *ilo, int *ihi, double *scale, SimTK_INFO_, SimTK_FLEN_(job))
void	zgebd2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), double *d__, double *e, SimTK_Z_ *tauq, SimTK_Z_ *taup, SimTK_Z_ *work, SimTK_INFO_)
void	zgebrd_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), double *d__, double *e, SimTK_Z_ *tauq, SimTK_Z_ *taup, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	zgecon_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), double *anorm, double *rcond, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(norm))
void	zgeequ_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), double *r__, double *c__, double *rowcnd, double *colcnd, double *amax, SimTK_INFO_)
void	zgees_ (SimTK_FOPT_(jobvs), SimTK_FOPT_(sort), SimTK_SELECT_Z select, SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), int *sdim, SimTK_Z_ *w, SimTK_Z_ *vs, SimTK_FDIM_(ldvs), SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, int *bwork, SimTK_INFO_, SimTK_FLEN_(jobvs), SimTK_FLEN_(sort))
void	zgeesx_ (SimTK_FOPT_(jobvs), SimTK_FOPT_(sort), SimTK_SELECT_Z select, char *sense, SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), int *sdim, SimTK_Z_ *w, SimTK_Z_ *vs, SimTK_FDIM_(ldvs), double *rconde, double *rcondv, SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, int *bwork, SimTK_INFO_, SimTK_FLEN_(jobvs), SimTK_FLEN_(sort), SimTK_FLEN_(sense))
void	zgeev_ (SimTK_FOPT_(jobvl), SimTK_FOPT_(jobvr), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *w, SimTK_Z_ *vl, SimTK_FDIM_(ldvl), SimTK_Z_ *vr, SimTK_FDIM_(ldvr), SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, SimTK_INFO_, SimTK_FLEN_(jobvl), SimTK_FLEN_(jobvr))
void	zgeevx_ (SimTK_FOPT_(balanc), SimTK_FOPT_(jobvl), SimTK_FOPT_(jobvr), char *sense, SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *w, SimTK_Z_ *vl, SimTK_FDIM_(ldvl), SimTK_Z_ *vr, SimTK_FDIM_(ldvr), int *ilo, int *ihi, double *scale, double *abnrm, double *rconde, double *rcondv, SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, SimTK_INFO_, SimTK_FLEN_(balanc), SimTK_FLEN_(jobvl), SimTK_FLEN_(jobvr), SimTK_FLEN_(sense))
void	zgegs_ (SimTK_FOPT_(jobvsl), SimTK_FOPT_(jobvsr), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_FSCL_(SimTK_Z_, beta), SimTK_Z_ *vsl, int *ldvsl, SimTK_Z_ *vsr, int *ldvsr, SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, SimTK_INFO_, SimTK_FLEN_(jobvl), SimTK_FLEN_(jobvr))
void	zgegv_ (SimTK_FOPT_(jobvl), SimTK_FOPT_(jobvr), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_FSCL_(SimTK_Z_, beta), SimTK_Z_ *vl, SimTK_FDIM_(ldvl), SimTK_Z_ *vr, SimTK_FDIM_(ldvr), SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, SimTK_INFO_, SimTK_FLEN_(jobvl), SimTK_FLEN_(jobvr))
void	zgehd2_ (SimTK_FDIM_(n), int *ilo, int *ihi, SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_INFO_)
void	zgehrd_ (SimTK_FDIM_(n), int *ilo, int *ihi, SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	zgelq2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_INFO_)
void	zgelqf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	zgels_ (SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(trans))
void	zgelsx_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), int *jpvt, double *rcond, int *rank, SimTK_Z_ *work, double *rwork, SimTK_INFO_)
void	zgelsy_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), int *jpvt, double *rcond, int *rank, SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, SimTK_INFO_)
void	zgeql2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_INFO_)
void	zgeqlf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	zgeqp3_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), int *jpvt, SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, SimTK_INFO_)
void	zgeqpf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), int *jpvt, SimTK_Z_ *tau, SimTK_Z_ *work, double *rwork, SimTK_INFO_)
void	zgeqr2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_INFO_)
void	zgeqrf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	zgerfs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *af, int *ldaf, int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(trans))
void	zgerq2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_INFO_)
void	zgerqf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	zgesc2_ (SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *rhs, int *ipiv, int *jpiv, double *scale)
void	zgesv_ (SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_)
void	zgesvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *af, int *ldaf, int *ipiv, char *equed, double *r__, double *c__, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *rcond, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(trans), SimTK_FLEN_(equed))
void	zgetc2_ (SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), int *ipiv, int *jpiv, SimTK_INFO_)
void	zgetf2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_INFO_)
void	zgetrf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_INFO_)
void	zgetri_ (SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	zgetrs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(trans))
void	zggbak_ (SimTK_FOPT_(job), SimTK_FOPT_(side), SimTK_FDIM_(n), int *ilo, int *ihi, double *lscale, double *rscale, SimTK_FDIM_(m), SimTK_Z_ *v, SimTK_FDIM_(ldv), SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(side))
void	zggbal_ (SimTK_FOPT_(job), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), int *ilo, int *ihi, double *lscale, double *rscale, double *work, SimTK_INFO_, SimTK_FLEN_(job))
void	zgges_ (SimTK_FOPT_(jobvsl), SimTK_FOPT_(jobvsr), SimTK_FOPT_(sort), SimTK_SELECT_2Z delctg, SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), int *sdim, const SimTK_FSCL_(SimTK_Z_, alpha), SimTK_Z_ *beta, SimTK_Z_ *vsl, int *ldvsl, SimTK_Z_ *vsr, int *ldvsr, SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, int *bwork, SimTK_INFO_, SimTK_FLEN_(jobvsl), SimTK_FLEN_(jobvsr), SimTK_FLEN_(sort))
void	zggesx_ (SimTK_FOPT_(jobvsl), SimTK_FOPT_(jobvsr), SimTK_FOPT_(sort), SimTK_SELECT_2Z delctg, char *sense, SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), int *sdim, const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_FSCL_(SimTK_Z_, beta), SimTK_Z_ *vsl, int *ldvsl, SimTK_Z_ *vsr, int *ldvsr, double *rconde, double *rcondv, SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, int *iwork, int *liwork, int *bwork, SimTK_INFO_, SimTK_FLEN_(jobvsl), SimTK_FLEN_(jobvsr), SimTK_FLEN_(sort), SimTK_FLEN_(sense))
void	zggev_ (SimTK_FOPT_(jobvl), SimTK_FOPT_(jobvr), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_FSCL_(SimTK_Z_, beta), SimTK_Z_ *vl, SimTK_FDIM_(ldvl), SimTK_Z_ *vr, SimTK_FDIM_(ldvr), SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, SimTK_INFO_, SimTK_FLEN_(jobvl), SimTK_FLEN_(jobvr))
void	zggevx_ (SimTK_FOPT_(balanc), SimTK_FOPT_(jobvl), SimTK_FOPT_(jobvr), char *sense, SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_FSCL_(SimTK_Z_, beta), SimTK_Z_ *vl, SimTK_FDIM_(ldvl), SimTK_Z_ *vr, SimTK_FDIM_(ldvr), int *ilo, int *ihi, double *lscale, double *rscale, double *abnrm, double *bbnrm, double *rconde, double *rcondv, SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, int *iwork, int *bwork, SimTK_INFO_, SimTK_FLEN_(blanc), SimTK_FLEN_(jobvl), SimTK_FLEN_(jobvr), SimTK_FLEN_(sense))
void	zggglm_ (SimTK_FDIM_(n), SimTK_FDIM_(m), int *p, SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *d__, SimTK_Z_ *x, SimTK_Z_ *y, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	zgghrd_ (SimTK_FOPT_(compq), SimTK_FOPT_(compz), SimTK_FDIM_(n), int *ilo, int *ihi, SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *q, SimTK_FDIM_(ldq), SimTK_Z_ *z__, SimTK_FDIM_(ldz), SimTK_INFO_, SimTK_FLEN_(compq), SimTK_FLEN_(compz))
void	zgglse_ (SimTK_FDIM_(m), SimTK_FDIM_(n), int *p, SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *c__, SimTK_Z_ *d__, SimTK_Z_ *x, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	zggqrf_ (SimTK_FDIM_(n), SimTK_FDIM_(m), int *p, SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *taua, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *taub, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	zggrqf_ (SimTK_FDIM_(m), int *p, SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *taua, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *taub, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	zggsvd_ (SimTK_FOPT_(jobu), SimTK_FOPT_(jobv), SimTK_FOPT_(jobq), SimTK_FDIM_(m), SimTK_FDIM_(n), int *p, SimTK_FDIM_(k), int *l, SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), const SimTK_FSCL_(double, alpha), const SimTK_FSCL_(double, beta), SimTK_Z_ *u, SimTK_FDIM_(ldu), SimTK_Z_ *v, SimTK_FDIM_(ldv), SimTK_Z_ *q, SimTK_FDIM_(ldq), SimTK_Z_ *work, double *rwork, int *iwork, SimTK_INFO_, SimTK_FLEN_(jobu), SimTK_FLEN_(jobv), SimTK_FLEN_(jobq))
void	zggsvp_ (SimTK_FOPT_(jobu), SimTK_FOPT_(jobv), SimTK_FOPT_(jobq), SimTK_FDIM_(m), int *p, SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), double *tola, double *tolb, SimTK_FDIM_(k), int *l, SimTK_Z_ *u, SimTK_FDIM_(ldu), SimTK_Z_ *v, SimTK_FDIM_(ldv), SimTK_Z_ *q, SimTK_FDIM_(ldq), int *iwork, double *rwork, SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_INFO_, SimTK_FLEN_(jobu), SimTK_FLEN_(jobv), SimTK_FLEN_(jobq))
void	zgtcon_ (SimTK_FOPT_(norm), SimTK_FDIM_(n), SimTK_Z_ *dl, SimTK_Z_ *d__, SimTK_Z_ *du, SimTK_Z_ *du2, int *ipiv, double *anorm, double *rcond, SimTK_Z_ *work, SimTK_INFO_, SimTK_FLEN_(norm))
void	zgtrfs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *dl, SimTK_Z_ *d__, SimTK_Z_ *du, SimTK_Z_ *dlf, SimTK_Z_ *df, SimTK_Z_ *duf, SimTK_Z_ *du2, int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(trans))
void	zgtsv_ (SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *dl, SimTK_Z_ *d__, SimTK_Z_ *du, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_)
void	zgtsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *dl, SimTK_Z_ *d__, SimTK_Z_ *du, SimTK_Z_ *dlf, SimTK_Z_ *df, SimTK_Z_ *duf, SimTK_Z_ *du2, int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *rcond, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(trans))
void	zgttrf_ (SimTK_FDIM_(n), SimTK_Z_ *dl, SimTK_Z_ *d__, SimTK_Z_ *du, SimTK_Z_ *du2, int *ipiv, SimTK_INFO_)
void	zgttrs_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *dl, SimTK_Z_ *d__, SimTK_Z_ *du, SimTK_Z_ *du2, int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(trans))
void	zgtts2_ (int *itrans, SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *dl, SimTK_Z_ *d__, SimTK_Z_ *du, SimTK_Z_ *du2, int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb))
void	zhbev_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_Z_ *ab, SimTK_FDIM_(ldab), double *w, SimTK_Z_ *z__, SimTK_FDIM_(ldz), SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	zhbevd_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_Z_ *ab, SimTK_FDIM_(ldab), double *w, SimTK_Z_ *z__, SimTK_FDIM_(ldz), SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, int *lrwork, int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	zhbevx_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_Z_ *ab, SimTK_FDIM_(ldab), SimTK_Z_ *q, SimTK_FDIM_(ldq), double *vl, double *vu, int *il, int *iu, double *abstol, SimTK_FDIM_(m), double *w, SimTK_Z_ *z__, SimTK_FDIM_(ldz), SimTK_Z_ *work, double *rwork, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	zhbgst_ (SimTK_FOPT_(vect), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *ka, int *kb, SimTK_Z_ *ab, SimTK_FDIM_(ldab), SimTK_Z_ *bb, int *ldbb, SimTK_Z_ *x, int *ldx, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(vect), SimTK_FLEN_(uplo))
void	zhbgv_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *ka, int *kb, SimTK_Z_ *ab, SimTK_FDIM_(ldab), SimTK_Z_ *bb, int *ldbb, double *w, SimTK_Z_ *z__, SimTK_FDIM_(ldz), SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	zhbgvx_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *ka, int *kb, SimTK_Z_ *ab, SimTK_FDIM_(ldab), SimTK_Z_ *bb, int *ldbb, SimTK_Z_ *q, SimTK_FDIM_(ldq), double *vl, double *vu, int *il, int *iu, double *abstol, SimTK_FDIM_(m), double *w, SimTK_Z_ *z__, SimTK_FDIM_(ldz), SimTK_Z_ *work, double *rwork, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	zhbtrd_ (SimTK_FOPT_(vect), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_Z_ *ab, SimTK_FDIM_(ldab), double *d__, double *e, SimTK_Z_ *q, SimTK_FDIM_(ldq), SimTK_Z_ *work, SimTK_INFO_, SimTK_FLEN_(vect), SimTK_FLEN_(uplo))
void	zhecon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), int *ipiv, double *anorm, double *rcond, SimTK_Z_ *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zheev_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), double *w, SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	zheevd_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), double *w, SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, int *lrwork, int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	zheevr_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), double *vl, double *vu, int *il, int *iu, double *abstol, SimTK_FDIM_(m), double *w, SimTK_Z_ *z__, SimTK_FDIM_(ldz), int *isuppz, SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, int *lrwork, int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	zheevx_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), double *vl, double *vu, int *il, int *iu, double *abstol, SimTK_FDIM_(m), double *w, SimTK_Z_ *z__, SimTK_FDIM_(ldz), SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	zhegs2_ (int *itype, SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zhegst_ (int *itype, SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zhegv_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), double *w, SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	zhegvd_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), double *w, SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, int *lrwork, int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	zhegvx_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), double *vl, double *vu, int *il, int *iu, double *abstol, SimTK_FDIM_(m), double *w, SimTK_Z_ *z__, SimTK_FDIM_(ldz), SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	zherfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *af, int *ldaf, int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zhesv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zhesvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *af, int *ldaf, int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *rcond, double *ferr, double *berr, SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo))
void	zhetf2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zhetrd_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), double *d__, double *e, SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zhetrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zhetri_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_Z_ *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zhetrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zhgeqz_ (SimTK_FOPT_(job), SimTK_FOPT_(compq), SimTK_FOPT_(compz), SimTK_FDIM_(n), int *ilo, int *ihi, SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), const SimTK_FSCL_(SimTK_Z_, alpha), SimTK_Z_ *beta, SimTK_Z_ *q, SimTK_FDIM_(ldq), SimTK_Z_ *z__, SimTK_FDIM_(ldz), SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(compq), SimTK_FLEN_(compz))
void	zhpcon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, int *ipiv, double *anorm, double *rcond, SimTK_Z_ *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zhpev_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, double *w, SimTK_Z_ *z__, SimTK_FDIM_(ldz), SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	zhpevd_ (SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, double *w, SimTK_Z_ *z__, SimTK_FDIM_(ldz), SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, int *lrwork, int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	zhpevx_ (SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, double *vl, double *vu, int *il, int *iu, double *abstol, SimTK_FDIM_(m), double *w, SimTK_Z_ *z__, SimTK_FDIM_(ldz), SimTK_Z_ *work, double *rwork, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	zhpgst_ (int *itype, SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, SimTK_Z_ *bp, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zhpgv_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, SimTK_Z_ *bp, double *w, SimTK_Z_ *z__, SimTK_FDIM_(ldz), SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	zhpgvd_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, SimTK_Z_ *bp, double *w, SimTK_Z_ *z__, SimTK_FDIM_(ldz), SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, int *lrwork, int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(uplo))
void	zhpgvx_ (int *itype, SimTK_FOPT_(jobz), SimTK_FOPT_(range), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, SimTK_Z_ *bp, double *vl, double *vu, int *il, int *iu, double *abstol, SimTK_FDIM_(m), double *w, SimTK_Z_ *z__, SimTK_FDIM_(ldz), SimTK_Z_ *work, double *rwork, int *iwork, int *ifail, SimTK_INFO_, SimTK_FLEN_(jobz), SimTK_FLEN_(range), SimTK_FLEN_(uplo))
void	zhprfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *ap, SimTK_Z_ *afp, int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zhpsv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *ap, int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zhpsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *ap, SimTK_Z_ *afp, int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *rcond, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo))
void	zhptrd_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, double *d__, double *e, SimTK_Z_ *tau, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zhptrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, int *ipiv, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zhptri_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, int *ipiv, SimTK_Z_ *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zhptrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *ap, int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zhsein_ (SimTK_FOPT_(side), char *eigsrc, char *initv, int *select, SimTK_FDIM_(n), SimTK_Z_ *h__, int *ldh, SimTK_Z_ *w, SimTK_Z_ *vl, SimTK_FDIM_(ldvl), SimTK_Z_ *vr, SimTK_FDIM_(ldvr), int *mm, SimTK_FDIM_(m), SimTK_Z_ *work, double *rwork, int *ifaill, int *ifailr, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(eigsrc), SimTK_FLEN_(initv))
void	zhseqr_ (SimTK_FOPT_(job), SimTK_FOPT_(compz), SimTK_FDIM_(n), int *ilo, int *ihi, SimTK_Z_ *h__, int *ldh, SimTK_Z_ *w, SimTK_Z_ *z__, SimTK_FDIM_(ldz), SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(compz))
void	zlabrd_ (SimTK_FDIM_(m), SimTK_FDIM_(n), int *nb, SimTK_Z_ *a, SimTK_FDIM_(lda), double *d__, double *e, SimTK_Z_ *tauq, SimTK_Z_ *taup, SimTK_Z_ *x, int *ldx, SimTK_Z_ *y, int *ldy)
void	zlacgv_ (SimTK_FDIM_(n), SimTK_Z_ *x, SimTK_FINC_(x))
void	zlacon_ (SimTK_FDIM_(n), SimTK_Z_ *v, SimTK_Z_ *x, double *est, int *kase, int *j, int *jump, int *iter)
void	zlacp2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb))
void	zlacpy_ (SimTK_FOPT_(uplo), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb))
void	zlacrm_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), double *b, SimTK_FDIM_(ldb), SimTK_Z_ *c__, SimTK_FDIM_(ldc), double *rwork, SimTK_FLEN_(uplo))
void	zlacrt_ (SimTK_FDIM_(n), SimTK_Z_ *cx, SimTK_FINC_(x), SimTK_Z_ *cy, SimTK_FINC_(y), SimTK_Z_ *c__, SimTK_Z_ *s)
void	zlaed0_ (int *qsiz, SimTK_FDIM_(n), double *d__, double *e, SimTK_Z_ *q, SimTK_FDIM_(ldq), SimTK_Z_ *qstore, SimTK_FDIM_(ldqs), double *rwork, int *iwork, SimTK_INFO_)
void	zlaed7_ (SimTK_FDIM_(n), int *cutpnt, int *qsiz, int *tlvls, int *curlvl, int *curpbm, double *d__, SimTK_Z_ *q, SimTK_FDIM_(ldq), double *rho, int *indxq, double *qstore, int *qptr, int *prmptr, int *perm, int *givptr, int *givcol, double *givnum, SimTK_Z_ *work, double *rwork, int *iwork, SimTK_INFO_)
void	zlaed8_ (SimTK_FDIM_(k), SimTK_FDIM_(n), int *qsiz, SimTK_Z_ *q, SimTK_FDIM_(ldq), double *d__, double *rho, int *cutpnt, double *z__, double *dlamda, SimTK_Z_ *q2, SimTK_FDIM_(ldq2), double *w, int *indxp, int *indx, int *indxq, int *perm, int *givptr, int *givcol, double *givnum, SimTK_INFO_)
void	zlaein_ (int *rightv, int *noinit, SimTK_FDIM_(n), SimTK_Z_ *h__, int *ldh, SimTK_Z_ *w, SimTK_Z_ *v, SimTK_Z_ *b, SimTK_FDIM_(ldb), double *rwork, double *eps3, double *smlnum, SimTK_INFO_)
void	zlaesy_ (SimTK_Z_ *a, SimTK_Z_ *b, SimTK_Z_ *c__, SimTK_Z_ *rt1, SimTK_Z_ *rt2, SimTK_Z_ *evscal, SimTK_Z_ *cs1, SimTK_Z_ *sn1)
void	zlaev2_ (SimTK_Z_ *a, SimTK_Z_ *b, SimTK_Z_ *c__, double *rt1, double *rt2, double *cs1, SimTK_Z_ *sn1)
void	zlags2_ (int *upper, double *a1, SimTK_Z_ *a2, double *a3, double *b1, SimTK_Z_ *b2, double *b3, double *csu, SimTK_Z_ *snu, double *csv, SimTK_Z_ *snv, double *csq, SimTK_Z_ *snq)
void	zlagtm_ (SimTK_FOPT_(trans), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), const SimTK_FSCL_(double, alpha), SimTK_Z_ *dl, SimTK_Z_ *d__, SimTK_Z_ *du, SimTK_Z_ *x, int *ldx, const SimTK_FSCL_(double, beta), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_FLEN_(trans))
void	zlahef_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *nb, int *kb, SimTK_Z_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_Z_ *w, int *ldw, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zlahqr_ (int *wantt, int *wantz, SimTK_FDIM_(n), int *ilo, int *ihi, SimTK_Z_ *h__, int *ldh, SimTK_Z_ *w, int *iloz, int *ihiz, SimTK_Z_ *z__, SimTK_FDIM_(ldz), SimTK_INFO_)
void	zlahrd_ (SimTK_FDIM_(n), SimTK_FDIM_(k), int *nb, SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *t, SimTK_FDIM_(ldt), SimTK_Z_ *y, int *ldy)
void	zlaic1_ (int *job, int *j, SimTK_Z_ *x, double *sest, SimTK_Z_ *w, SimTK_Z_ *gamma, double *sestpr, SimTK_Z_ *s, SimTK_Z_ *c__)
void	zlals0_ (int *icompq, int *nl, int *nr, int *sqre, SimTK_FDIM_(nrhs), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *bx, int *ldbx, int *perm, int *givptr, int *givcol, int *ldgcol, double *givnum, int *ldgnum, double *poles, double *difl, double *difr, double *z__, SimTK_FDIM_(k), double *c__, double *s, double *rwork, SimTK_INFO_)
void	zlalsa_ (int *icompq, int *smlsiz, SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *bx, int *ldbx, double *u, SimTK_FDIM_(ldu), double *vt, int *k, double *difl, double *difr, double *z__, double *poles, int *givptr, int *givcol, int *ldgcol, int *perm, double *givnum, double *c__, double *s, double *rwork, int *iwork, SimTK_INFO_)
void	zlapll_ (SimTK_FDIM_(n), SimTK_Z_ *x, SimTK_FINC_(x), SimTK_Z_ *y, SimTK_FINC_(y), double *ssmin)
void	zlapmt_ (int *forwrd, SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *x, int *ldx, SimTK_FDIM_(k))
void	zlaqgb_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(kl), SimTK_FDIM_(ku), SimTK_Z_ *ab, SimTK_FDIM_(ldab), double *r__, double *c__, double *rowcnd, double *colcnd, double *amax, char *equed)
void	zlaqge_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), double *r__, double *c__, double *rowcnd, double *colcnd, double *amax, char *equed)
void	zlaqhb_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_Z_ *ab, SimTK_FDIM_(ldab), double *s, double *scond, double *amax, char *equed, SimTK_FLEN_(uplo))
void	zlaqhe_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), double *s, double *scond, double *amax, char *equed, SimTK_FLEN_(uplo))
void	zlaqhp_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, double *s, double *scond, double *amax, char *equed, SimTK_FLEN_(uplo))
void	zlaqp2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), int *offset, SimTK_Z_ *a, SimTK_FDIM_(lda), int *jpvt, SimTK_Z_ *tau, double *vn1, double *vn2, SimTK_Z_ *work)
void	zlaqps_ (SimTK_FDIM_(m), SimTK_FDIM_(n), int *offset, int *nb, int *kb, SimTK_Z_ *a, SimTK_FDIM_(lda), int *jpvt, SimTK_Z_ *tau, double *vn1, double *vn2, SimTK_Z_ *auxv, SimTK_Z_ *f, int *ldf)
void	zlaqsb_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_Z_ *ab, SimTK_FDIM_(ldab), double *s, double *scond, double *amax, char *equed, SimTK_FLEN_(uplo))
void	zlaqsp_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, double *s, double *scond, double *amax, char *equed, SimTK_FLEN_(uplo))
void	zlaqsy_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), double *s, double *scond, double *amax, char *equed, SimTK_FLEN_(uplo))
void	zlar1v_ (SimTK_FDIM_(n), int *b1, int *bn, double *sigma, double *d__, double *l, double *ld, double *lld, double *gersch, SimTK_Z_ *z__, double *ztz, double *mingma, int *r__, int *isuppz, double *work)
void	zlar2v_ (SimTK_FDIM_(n), SimTK_Z_ *x, SimTK_Z_ *y, SimTK_Z_ *z__, SimTK_FINC_(x), double *c__, SimTK_Z_ *s, SimTK_FINC_(c))
void	zlarcm_ (SimTK_FDIM_(m), SimTK_FDIM_(n), double *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *c__, SimTK_FDIM_(ldc), double *rwork)
void	zlarf_ (SimTK_FOPT_(side), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *v, SimTK_FINC_(v), SimTK_Z_ *tau, SimTK_Z_ *c__, int *ldc, SimTK_Z_ *work, SimTK_FLEN_(side))
void	zlarfb_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FOPT_(direct), SimTK_FOPT_(storev), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_Z_ *v, SimTK_FDIM_(ldv), SimTK_Z_ *t, SimTK_FDIM_(ldt), SimTK_Z_ *c__, int *ldc, SimTK_Z_ *work, int *ldwork, SimTK_FLEN_(side), SimTK_FLEN_(trans), SimTK_FLEN_(direct))
void	zlarfg_ (SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_Z_, alpha), SimTK_Z_ *x, SimTK_FINC_(x), SimTK_Z_ *tau)
void	zlarft_ (SimTK_FOPT_(direct), SimTK_FOPT_(storev), SimTK_FDIM_(n), int *k, SimTK_Z_ *v, SimTK_FDIM_(ldv), SimTK_Z_ *tau, SimTK_Z_ *t, SimTK_FDIM_(ldt), SimTK_FLEN_(direct), SimTK_FLEN_(storev))
void	zlarfx_ (SimTK_FOPT_(side), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *v, SimTK_Z_ *tau, SimTK_Z_ *c__, int *ldc, SimTK_Z_ *work, SimTK_FLEN_(side))
void	zlargv_ (SimTK_FDIM_(n), SimTK_Z_ *x, SimTK_FINC_(x), SimTK_Z_ *y, SimTK_FINC_(y), double *c__, SimTK_FINC_(c))
void	zlarnv_ (int *idist, int *iseed, SimTK_FDIM_(n), SimTK_Z_ *x)
void	zlarrv_ (SimTK_FDIM_(n), double *d__, double *l, int *isplit, SimTK_FDIM_(m), double *w, int *iblock, double *gersch, double *tol, SimTK_Z_ *z__, SimTK_FDIM_(ldz), int *isuppz, double *work, int *iwork, SimTK_INFO_)
void	zlartg_ (SimTK_Z_ *f, SimTK_Z_ *g, double *cs, SimTK_Z_ *sn, SimTK_Z_ *r__)
void	zlartv_ (SimTK_FDIM_(n), SimTK_Z_ *x, SimTK_FINC_(x), SimTK_Z_ *y, SimTK_FINC_(y), double *c__, SimTK_Z_ *s, SimTK_FINC_(c))
void	zlarz_ (SimTK_FOPT_(side), SimTK_FDIM_(m), SimTK_FDIM_(n), int *l, SimTK_Z_ *v, SimTK_FINC_(v), SimTK_Z_ *tau, SimTK_Z_ *c__, SimTK_FDIM_(ldc), SimTK_Z_ *work, SimTK_FLEN_(side))
void	zlarzb_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FOPT_(direct), SimTK_FOPT_(storev), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), int *l, SimTK_Z_ *v, SimTK_FDIM_(ldv), SimTK_Z_ *t, SimTK_FDIM_(ldt), SimTK_Z_ *c__, SimTK_FDIM_(ldc), SimTK_Z_ *work, int *ldwork, SimTK_FLEN_(side), SimTK_FLEN_(trans), SimTK_FLEN_(direct))
void	zlarzt_ (SimTK_FOPT_(direct), SimTK_FOPT_(storev), SimTK_FDIM_(n), int *k, SimTK_Z_ *v, SimTK_FDIM_(ldv), SimTK_Z_ *tau, SimTK_Z_ *t, SimTK_FDIM_(ldt), SimTK_FLEN_(direct), SimTK_FLEN_(storev))
void	zlascl_ (char *type__, SimTK_FDIM_(kl), SimTK_FDIM_(ku), double *cfrom, double *cto, SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(type))
void	zlaset_ (SimTK_FOPT_(uplo), SimTK_FDIM_(m), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_Z_, alpha), const SimTK_FSCL_(SimTK_Z_, beta), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_FLEN_(uplo))
void	zlasr_ (SimTK_FOPT_(side), char *pivot, SimTK_FOPT_(direct), SimTK_FDIM_(m), SimTK_FDIM_(n), double *c__, double *s, SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_FLEN_(side), SimTK_FLEN_(pivot), SimTK_FLEN_(direct))
void	zlassq_ (SimTK_FDIM_(n), SimTK_Z_ *x, SimTK_FINC_(x), double *scale, double *sumsq)
void	zlaswp_ (SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), int *k1, int *k2, int *ipiv, SimTK_FINC_(x))
void	zlasyf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *nb, int *kb, SimTK_Z_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_Z_ *w, int *ldw, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zlatbs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), char *normin, SimTK_FDIM_(n), int *kd, SimTK_Z_ *ab, SimTK_FDIM_(ldab), SimTK_Z_ *x, double *scale, double *cnorm, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	zlatdf_ (int *ijob, SimTK_FDIM_(n), SimTK_Z_ *z__, SimTK_FDIM_(ldz), SimTK_Z_ *rhs, double *rdsum, double *rdscal, int *ipiv, int *jpiv)
void	zlatps_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), char *normin, SimTK_FDIM_(n), SimTK_Z_ *ap, SimTK_Z_ *x, double *scale, double *cnorm, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	zlatrd_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *nb, SimTK_Z_ *a, SimTK_FDIM_(lda), double *e, SimTK_Z_ *tau, SimTK_Z_ *w, int *ldw, SimTK_FLEN_(uplo))
void	zlatrs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), char *normin, SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *x, double *scale, double *cnorm, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	zlatrz_ (SimTK_FDIM_(m), SimTK_FDIM_(n), int *l, SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work)
void	zlatzm_ (SimTK_FOPT_(side), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *v, SimTK_FINC_(v), SimTK_Z_ *tau, SimTK_Z_ *c1, SimTK_Z_ *c2, SimTK_FDIM_(ldc), SimTK_Z_ *work, SimTK_FLEN_(side))
void	zlauu2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zlauum_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zpbcon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_Z_ *ab, SimTK_FDIM_(ldab), double *anorm, double *rcond, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zpbequ_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_Z_ *ab, SimTK_FDIM_(ldab), double *s, double *scond, double *amax, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zpbrfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), SimTK_Z_ *ab, SimTK_FDIM_(ldab), SimTK_Z_ *afb, SimTK_FDIM_(ldafb), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zpbstf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_Z_ *ab, SimTK_FDIM_(ldab), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zpbsv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), SimTK_Z_ *ab, SimTK_FDIM_(ldab), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zpbsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), SimTK_Z_ *ab, SimTK_FDIM_(ldab), SimTK_Z_ *afb, SimTK_FDIM_(ldafb), char *equed, double *s, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *rcond, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	zpbtf2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_Z_ *ab, SimTK_FDIM_(ldab), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zpbtrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_Z_ *ab, SimTK_FDIM_(ldab), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zpbtrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), SimTK_Z_ *ab, SimTK_FDIM_(ldab), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zpocon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), double *anorm, double *rcond, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zpoequ_ (SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), double *s, double *scond, double *amax, SimTK_INFO_)
void	zporfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *af, int *ldaf, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zposv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zposvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *af, int *ldaf, char *equed, double *s, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *rcond, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	zpotf2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zpotrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zpotri_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zpotrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zppcon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, double *anorm, double *rcond, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zppequ_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, double *s, double *scond, double *amax, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zpprfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *ap, SimTK_Z_ *afp, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zppsv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *ap, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(fact))
void	zppsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *ap, SimTK_Z_ *afp, char *equed, double *s, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *rcond, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo), SimTK_FLEN_(equed))
void	zpptrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zpptri_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zpptrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *ap, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zptcon_ (SimTK_FDIM_(n), double *d__, SimTK_Z_ *e, double *anorm, double *rcond, double *rwork, SimTK_INFO_)
void	zptrfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *d__, SimTK_Z_ *e, double *df, SimTK_Z_ *ef, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zptsv_ (SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *d__, SimTK_Z_ *e, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_)
void	zptsvx_ (SimTK_FOPT_(fact), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *d__, SimTK_Z_ *e, double *df, SimTK_Z_ *ef, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *rcond, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(fact))
void	zpttrf_ (SimTK_FDIM_(n), double *d__, SimTK_Z_ *e, SimTK_INFO_)
void	zpttrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *d__, SimTK_Z_ *e, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zptts2_ (int *iuplo, SimTK_FDIM_(n), SimTK_FDIM_(nrhs), double *d__, SimTK_Z_ *e, SimTK_Z_ *b, SimTK_FDIM_(ldb))
void	zrot_ (SimTK_FDIM_(n), SimTK_Z_ *cx, SimTK_FINC_(x), SimTK_Z_ *cy, SimTK_FINC_(y), double *c__, SimTK_Z_ *s)
void	zspcon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, int *ipiv, double *anorm, double *rcond, SimTK_Z_ *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zspmv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_Z_, alpha), SimTK_Z_ *ap, SimTK_Z_ *x, SimTK_FINC_(x), SimTK_Z_ *beta, SimTK_Z_ *y, SimTK_FINC_(y), SimTK_FLEN_(uplo))
void	zspr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_Z_, alpha), SimTK_Z_ *x, SimTK_FINC_(x), SimTK_Z_ *ap, SimTK_FLEN_(uplo))
void	zsprfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *ap, SimTK_Z_ *afp, int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zspsv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *ap, int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zspsvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *ap, SimTK_Z_ *afp, int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *rcond, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo))
void	zsptrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, int *ipiv, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zsptri_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, int *ipiv, SimTK_Z_ *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zsptrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *ap, int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zstedc_ (SimTK_FOPT_(compz), SimTK_FDIM_(n), double *d__, double *e, SimTK_Z_ *z__, SimTK_FDIM_(ldz), SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, int *lrwork, int *iwork, int *liwork, SimTK_INFO_, SimTK_FLEN_(compz))
void	zstein_ (SimTK_FDIM_(n), double *d__, double *e, SimTK_FDIM_(m), double *w, int *iblock, int *isplit, SimTK_Z_ *z__, SimTK_FDIM_(ldz), double *work, int *iwork, int *ifail, SimTK_INFO_)
void	zsteqr_ (SimTK_FOPT_(compz), SimTK_FDIM_(n), double *d__, double *e, SimTK_Z_ *z__, SimTK_FDIM_(ldz), double *work, SimTK_INFO_, SimTK_FLEN_(compz))
void	zsycon_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), int *ipiv, double *anorm, double *rcond, SimTK_Z_ *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zsymv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_Z_, alpha), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *x, SimTK_FINC_(x), const SimTK_FSCL_(SimTK_Z_, beta), SimTK_Z_ *y, SimTK_FINC_(y), SimTK_FLEN_(uplo))
void	zsyr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), const SimTK_FSCL_(SimTK_Z_, alpha), SimTK_Z_ *x, SimTK_FINC_(x), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_FLEN_(uplo))
void	zsyrfs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *af, int *ldaf, int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zsysv_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zsysvx_ (SimTK_FOPT_(fact), SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *af, int *ldaf, int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *rcond, double *ferr, double *berr, SimTK_Z_ *work, SimTK_FDIM_(lwork), double *rwork, SimTK_INFO_, SimTK_FLEN_(fact), SimTK_FLEN_(uplo))
void	zsytf2_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zsytrf_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zsytri_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_Z_ *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zsytrs_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), int *ipiv, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo))
void	ztbcon_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), int *kd, SimTK_Z_ *ab, SimTK_FDIM_(ldab), double *rcond, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	ztbrfs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), SimTK_Z_ *ab, SimTK_FDIM_(ldab), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	ztbtrs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), int *kd, SimTK_FDIM_(nrhs), SimTK_Z_ *ab, SimTK_FDIM_(ldab), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	ztgevc_ (SimTK_FOPT_(side), SimTK_FOPT_(howmny), int *select, SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *vl, SimTK_FDIM_(ldvl), SimTK_Z_ *vr, SimTK_FDIM_(ldvr), int *mm, SimTK_FDIM_(m), SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(howmny))
void	ztgex2_ (int *wantq, int *wantz, SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *q, SimTK_FDIM_(ldq), SimTK_Z_ *z__, SimTK_FDIM_(ldz), int *j1, SimTK_INFO_)
void	ztgexc_ (int *wantq, int *wantz, SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *q, SimTK_FDIM_(ldq), SimTK_Z_ *z__, SimTK_FDIM_(ldz), int *ifst, int *ilst, SimTK_INFO_)
void	ztgsen_ (int *ijob, int *wantq, int *wantz, int *select, SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), const SimTK_FSCL_(SimTK_Z_, alpha), SimTK_Z_ *beta, SimTK_Z_ *q, SimTK_FDIM_(ldq), SimTK_Z_ *z__, SimTK_FDIM_(ldz), SimTK_FDIM_(m), double *pl, double *pr, double *dif, SimTK_Z_ *work, SimTK_FDIM_(lwork), int *iwork, int *liwork, SimTK_INFO_)
void	ztgsja_ (SimTK_FOPT_(jobu), SimTK_FOPT_(jobv), SimTK_FOPT_(jobq), SimTK_FDIM_(m), int *p, SimTK_FDIM_(n), SimTK_FDIM_(k), int *l, SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), double *tola, double *tolb, const SimTK_FSCL_(double, alpha), const SimTK_FSCL_(double, beta), SimTK_Z_ *u, SimTK_FDIM_(ldu), SimTK_Z_ *v, SimTK_FDIM_(ldv), SimTK_Z_ *q, SimTK_FDIM_(ldq), SimTK_Z_ *work, int *ncycle, SimTK_INFO_, SimTK_FLEN_(jobu), SimTK_FLEN_(jobv), SimTK_FLEN_(jobq))
void	ztgsna_ (SimTK_FOPT_(job), SimTK_FOPT_(howmny), int *select, SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *vl, SimTK_FDIM_(ldvl), SimTK_Z_ *vr, SimTK_FDIM_(ldvr), double *s, double *dif, int *mm, SimTK_FDIM_(m), SimTK_Z_ *work, SimTK_FDIM_(lwork), int *iwork, SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(howmny))
void	ztgsy2_ (SimTK_FOPT_(trans), int *ijob, SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *c__, SimTK_FDIM_(ldc), SimTK_Z_ *d__, int *ldd, SimTK_Z_ *e, int *lde, SimTK_Z_ *f, int *ldf, double *scale, double *rdsum, double *rdscal, SimTK_INFO_, SimTK_FLEN_(trans))
void	ztgsyl_ (SimTK_FOPT_(trans), int *ijob, SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *c__, SimTK_FDIM_(ldc), SimTK_Z_ *d__, int *ldd, SimTK_Z_ *e, int *lde, SimTK_Z_ *f, int *ldf, double *scale, double *dif, SimTK_Z_ *work, SimTK_FDIM_(lwork), int *iwork, SimTK_INFO_, SimTK_FLEN_(trans))
void	ztpcon_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_Z_ *ap, double *rcond, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	ztprfs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *ap, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	ztptri_ (SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_Z_ *ap, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	ztptrs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *ap, SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	ztrcon_ (SimTK_FOPT_(norm), SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), double *rcond, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(norm), SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	ztrevc_ (SimTK_FOPT_(side), SimTK_FOPT_(howmny), int *select, SimTK_FDIM_(n), SimTK_Z_ *t, SimTK_FDIM_(ldt), SimTK_Z_ *vl, SimTK_FDIM_(ldvl), SimTK_Z_ *vr, SimTK_FDIM_(ldvr), int *mm, SimTK_FDIM_(m), SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(howmny))
void	ztrexc_ (SimTK_FOPT_(compq), SimTK_FDIM_(n), SimTK_Z_ *t, SimTK_FDIM_(ldt), SimTK_Z_ *q, SimTK_FDIM_(ldq), int *ifst, int *ilst, SimTK_INFO_, SimTK_FLEN_(compq))
void	ztrrfs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *x, int *ldx, double *ferr, double *berr, SimTK_Z_ *work, double *rwork, SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	ztrsen_ (SimTK_FOPT_(job), SimTK_FOPT_(compq), int *select, SimTK_FDIM_(n), SimTK_Z_ *t, SimTK_FDIM_(ldt), SimTK_Z_ *q, SimTK_FDIM_(ldq), SimTK_Z_ *w, SimTK_FDIM_(m), double *s, double *sep, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(compq))
void	ztrsna_ (SimTK_FOPT_(job), SimTK_FOPT_(howmny), int *select, SimTK_FDIM_(n), SimTK_Z_ *t, SimTK_FDIM_(ldt), SimTK_Z_ *vl, SimTK_FDIM_(ldvl), SimTK_Z_ *vr, SimTK_FDIM_(ldvr), double *s, double *sep, int *mm, SimTK_FDIM_(m), SimTK_Z_ *work, int *ldwork, double *rwork, SimTK_INFO_, SimTK_FLEN_(job), SimTK_FLEN_(howmny))
void	ztrsyl_ (char *tranA, char *tranB, int *isgn, SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_Z_ *c__, SimTK_FDIM_(ldc), double *scale, SimTK_INFO_, SimTK_FLEN_(transA), SimTK_FLEN_(transB))
void	ztrti2_ (SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	ztrtri_ (SimTK_FOPT_(uplo), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(diag))
void	ztrtrs_ (SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FOPT_(diag), SimTK_FDIM_(n), SimTK_FDIM_(nrhs), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *b, SimTK_FDIM_(ldb), SimTK_INFO_, SimTK_FLEN_(uplo), SimTK_FLEN_(trans), SimTK_FLEN_(diag))
void	ztzrqf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_INFO_)
void	ztzrzf_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	zung2l_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_INFO_)
void	zung2r_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_INFO_)
void	zungbr_ (SimTK_FOPT_(vect), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(vect))
void	zunghr_ (SimTK_FDIM_(n), int *ilo, int *ihi, SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	zungl2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_INFO_)
void	zunglq_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	zungql_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	zungqr_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	zungr2_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_INFO_)
void	zungrq_ (SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_)
void	zungtr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(uplo))
void	zunm2l_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *c__, SimTK_FDIM_(ldc), SimTK_Z_ *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	zunm2r_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *c__, SimTK_FDIM_(ldc), SimTK_Z_ *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	zunmbr_ (SimTK_FOPT_(vect), SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *c__, SimTK_FDIM_(ldc), SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(vect), SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	zunmhr_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), int *ilo, int *ihi, SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *c__, SimTK_FDIM_(ldc), SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	zunml2_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *c__, SimTK_FDIM_(ldc), SimTK_Z_ *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	zunmlq_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *c__, SimTK_FDIM_(ldc), SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	zunmql_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *c__, SimTK_FDIM_(ldc), SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	zunmqr_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *c__, SimTK_FDIM_(ldc), SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	zunmr2_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *c__, SimTK_FDIM_(ldc), SimTK_Z_ *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	zunmr3_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), int *l, SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *c__, SimTK_FDIM_(ldc), SimTK_Z_ *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(trans))
void	zunmrq_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *c__, SimTK_FDIM_(ldc), SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(uplo))
void	zunmrz_ (SimTK_FOPT_(side), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_FDIM_(k), int *l, SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *c__, SimTK_FDIM_(ldc), SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(uplo))
void	zunmtr_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *a, SimTK_FDIM_(lda), SimTK_Z_ *tau, SimTK_Z_ *c__, SimTK_FDIM_(ldc), SimTK_Z_ *work, SimTK_FDIM_(lwork), SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(uplo), SimTK_FLEN_(trans))
void	zupgtr_ (SimTK_FOPT_(uplo), SimTK_FDIM_(n), SimTK_Z_ *ap, SimTK_Z_ *tau, SimTK_Z_ *q, SimTK_FDIM_(ldq), SimTK_Z_ *work, SimTK_INFO_, SimTK_FLEN_(uplo))
void	zupmtr_ (SimTK_FOPT_(side), SimTK_FOPT_(uplo), SimTK_FOPT_(trans), SimTK_FDIM_(m), SimTK_FDIM_(n), SimTK_Z_ *ap, SimTK_Z_ *tau, SimTK_Z_ *c__, SimTK_FDIM_(ldc), SimTK_Z_ *work, SimTK_INFO_, SimTK_FLEN_(side), SimTK_FLEN_(uplo), SimTK_FLEN_(trans))

---

Define Documentation

#define SimTK_C_   SimTK_float_complex

#define SimTK_FDIM_

(

n

)

const int* n

#define SimTK_FINC_

(

x

)

const int* inc##x

#define SimTK_FLEN_

(

c

)

int c##_len

#define SimTK_FOPT_

(

c

)

const char* c

#define SimTK_FSCL_	(	type,
		s		)	type* s

#define SimTK_INFO_   int *info

#define SimTK_Z_   SimTK_double_complex

---

Typedef Documentation

typedef int(* SimTK_SELECT_2C)(const SimTK_FSCL_(SimTK_C_, a), const SimTK_FSCL_(SimTK_C_, b))

typedef int(* SimTK_SELECT_2D)(const SimTK_FSCL_(double, wr), const SimTK_FSCL_(double, wi))

typedef int(* SimTK_SELECT_2S)(const SimTK_FSCL_(float, wr), const SimTK_FSCL_(float, wi))

typedef int(* SimTK_SELECT_2Z)(const SimTK_FSCL_(SimTK_Z_, a), const SimTK_FSCL_(SimTK_Z_, b))

typedef int(* SimTK_SELECT_3D)(const SimTK_FSCL_(double, ar), const SimTK_FSCL_(double, ai), const SimTK_FSCL_(double, b))

typedef int(* SimTK_SELECT_3F)(const SimTK_FSCL_(float, ar), const SimTK_FSCL_(float, ai), const SimTK_FSCL_(float, b))

typedef int(* SimTK_SELECT_C)(const SimTK_FSCL_(SimTK_C_, w))

typedef int(* SimTK_SELECT_Z)(const SimTK_FSCL_(SimTK_Z_, w))

---

Function Documentation

void caxpy_	(	SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		SimTK_C_ *	y,
		SimTK_FINC_(y)
	)

void cbdsqr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	ncvt,
		int *	nru,
		int *	ncc,
		float *	d__,
		float *	e,
		SimTK_C_ *	vt,
		SimTK_FDIM_(ldvt)	,
		SimTK_C_ *	u,
		SimTK_FDIM_(ldu)	,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void ccopy_	(	SimTK_FDIM_(n)	,
		const SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		SimTK_C_ *	y,
		SimTK_FINC_(y)
	)

void cgbbrd_	(	SimTK_FOPT_(vect)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	ncc,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		float *	d__,
		float *	e,
		SimTK_C_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_C_ *	pt,
		int *	ldpt,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(vect)
	)

void cgbcon_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		const SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		int *	ipiv,
		float *	anorm,
		float *	rcond,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)
	)

void cgbequ_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		const SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		float *	r__,
		float *	c__,
		float *	rowcnd,
		float *	colcnd,
		float *	amax,
		SimTK_INFO_
	)

void cgbmv_	(	SimTK_FOPT_(transA)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const SimTK_C_ *	A,
		SimTK_FDIM_(lda)	,
		const SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_SimTK_C_, beta,
		SimTK_C_ *	Y,
		SimTK_FINC_(Y)	,
		SimTK_FLEN_(transA)
	)

void cgbrfs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_FDIM_(nrhs)	,
		const SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		const SimTK_C_ *	afb,
		SimTK_FDIM_(ldafb)	,
		int *	ipiv,
		const SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void cgbsv_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		int *	ipiv,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_
	)

void cgbsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_C_ *	afb,
		SimTK_FDIM_(ldafb)	,
		int *	ipiv,
		char *	equed,
		float *	r__,
		float *	c__,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(equed)
	)

void cgbtf2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		int *	ipiv,
		SimTK_INFO_
	)

void cgbtrf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		int *	ipiv,
		SimTK_INFO_
	)

void cgbtrs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_FDIM_(nrhs)	,
		const SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		int *	ipiv,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void cgebak_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(side)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		float *	scale,
		SimTK_FDIM_(m)	,
		SimTK_C_ *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(side)
	)

void cgebal_	(	SimTK_FOPT_(job)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ilo,
		int *	ihi,
		float *	scale,
		SimTK_INFO_	,
		SimTK_FLEN_(job)
	)

void cgebd2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	d__,
		float *	e,
		SimTK_C_ *	tauq,
		SimTK_C_ *	taup,
		SimTK_C_ *	work,
		SimTK_INFO_
	)

void cgebrd_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	d__,
		float *	e,
		SimTK_C_ *	tauq,
		SimTK_C_ *	taup,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void cgecon_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		const SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	anorm,
		float *	rcond,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)
	)

void cgeequ_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	r__,
		float *	c__,
		float *	rowcnd,
		float *	colcnd,
		float *	amax,
		SimTK_INFO_
	)

void cgees_	(	SimTK_FOPT_(jobvs)	,
		SimTK_FOPT_(sort)	,
		SimTK_SELECT_C	select,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	sdim,
		SimTK_C_ *	w,
		SimTK_C_ *	vs,
		SimTK_FDIM_(ldvs)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		int *	bwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvs)	,
		SimTK_FLEN_(sort)
	)

void cgeesx_	(	SimTK_FOPT_(jobvs)	,
		SimTK_FOPT_(sort)	,
		SimTK_SELECT_C	select,
		char *	sense,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	sdim,
		SimTK_C_ *	w,
		SimTK_C_ *	vs,
		SimTK_FDIM_(ldvs)	,
		float *	rconde,
		float *	rcondv,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		int *	bwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvs)	,
		SimTK_FLEN_(sort)	,
		SimTK_FLEN_(sense)
	)

void cgeev_	(	SimTK_FOPT_(jobvl)	,
		SimTK_FOPT_(jobvr)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	w,
		SimTK_C_ *	vl,
		SimTK_FDIM_(ldvl)	,
		SimTK_C_ *	vr,
		SimTK_FDIM_(ldvr)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvl)	,
		SimTK_FLEN_(jobvr)
	)

void cgeevx_	(	SimTK_FOPT_(balanc)	,
		SimTK_FOPT_(jobvl)	,
		SimTK_FOPT_(jobvr)	,
		char *	sense,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	w,
		SimTK_C_ *	vl,
		SimTK_FDIM_(ldvl)	,
		SimTK_C_ *	vr,
		SimTK_FDIM_(ldvr)	,
		int *	ilo,
		int *	ihi,
		float *	scale,
		float *	abnrm,
		float *	rconde,
		float *	rcondv,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(balanc)	,
		SimTK_FLEN_(jobvl)	,
		SimTK_FLEN_(jobvr)	,
		SimTK_FLEN_(sense)
	)

void cgegs_	(	SimTK_FOPT_(jobvsl)	,
		SimTK_FOPT_(jobvsr)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		SimTK_C_ *	beta,
		SimTK_C_ *	vsl,
		int *	ldvsl,
		SimTK_C_ *	vsr,
		int *	ldvsr,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvsl)	,
		SimTK_FLEN_(jobvsr)
	)

void cgegv_	(	SimTK_FOPT_(jobvl)	,
		SimTK_FOPT_(jobvr)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const	SimTK_FSCL_SimTK_C_, beta,
		SimTK_C_ *	vl,
		SimTK_FDIM_(ldvl)	,
		SimTK_C_ *	vr,
		SimTK_FDIM_(ldvr)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvsl)	,
		SimTK_FLEN_(jobvsr)
	)

void cgehd2_	(	SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_INFO_
	)

void cgehrd_	(	SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void cgelq2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_INFO_
	)

void cgelqf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void cgels_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void cgelsx_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		int *	jpvt,
		float *	rcond,
		int *	rank,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_
	)

void cgelsy_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		int *	jpvt,
		float *	rcond,
		int *	rank,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		SimTK_INFO_
	)

void cgemm_	(	SimTK_FOPT_(transA)	,
		SimTK_FOPT_(transB)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const SimTK_C_ *	A,
		SimTK_FDIM_(lda)	,
		const SimTK_C_ *	B,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_SimTK_C_, beta,
		SimTK_C_ *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(transB)
	)

void cgemv_	(	SimTK_FOPT_(transA)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const SimTK_C_ *	A,
		SimTK_FDIM_(lda)	,
		const SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_SimTK_C_, beta,
		SimTK_C_ *	Y,
		SimTK_FINC_(Y)	,
		SimTK_FLEN_(transA)
	)

void cgeql2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_INFO_
	)

void cgeqlf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void cgeqp3_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	jpvt,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		SimTK_INFO_
	)

void cgeqpf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	jpvt,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_
	)

void cgeqr2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_INFO_
	)

void cgeqrf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void cgerc_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		const SimTK_C_ *	y,
		SimTK_FINC_(y)	,
		SimTK_C_ *	A,
		SimTK_FDIM_(lda)
	)

void cgerfs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		const SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		const SimTK_C_ *	af,
		int *	ldaf,
		int *	ipiv,
		const SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void cgerq2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_INFO_
	)

void cgerqf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void cgeru_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		const SimTK_C_ *	y,
		SimTK_FINC_(y)	,
		SimTK_C_ *	A,
		SimTK_FDIM_(lda)
	)

void cgesc2_	(	SimTK_FDIM_(n)	,
		const SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	rhs,
		int *	ipiv,
		int *	jpiv,
		float *	scale
	)

void cgesv_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_
	)

void cgesvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	af,
		int *	ldaf,
		int *	ipiv,
		char *	equed,
		float *	r__,
		float *	c__,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(equed)
	)

void cgetc2_	(	SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		int *	jpiv,
		SimTK_INFO_
	)

void cgetf2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_INFO_
	)

void cgetrf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_INFO_
	)

void cgetri_	(	SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void cgetrs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void cggbak_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(side)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		float *	lscale,
		float *	rscale,
		SimTK_FDIM_(m)	,
		SimTK_C_ *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(side)
	)

void cggbal_	(	SimTK_FOPT_(job)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		int *	ilo,
		int *	ihi,
		float *	lscale,
		float *	rscale,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(job)
	)

void cgges_	(	SimTK_FOPT_(jobvsl)	,
		SimTK_FOPT_(jobvsr)	,
		SimTK_FOPT_(sort)	,
		SimTK_SELECT_2C	selctg,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		int *	sdim,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const	SimTK_FSCL_SimTK_C_, beta,
		SimTK_C_ *	vsl,
		int *	ldvsl,
		SimTK_C_ *	vsr,
		int *	ldvsr,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		int *	bwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvsl)	,
		SimTK_FLEN_(jobvsr)	,
		SimTK_FLEN_(sort)
	)

void cggesx_	(	SimTK_FOPT_(jobvsl)	,
		SimTK_FOPT_(jobvsr)	,
		SimTK_FOPT_(sort)	,
		SimTK_SELECT_2C	selctg,
		char *	sense,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		int *	sdim,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const	SimTK_FSCL_SimTK_C_, beta,
		SimTK_C_ *	vsl,
		int *	ldvsl,
		SimTK_C_ *	vsr,
		int *	ldvsr,
		float *	rconde,
		float *	rcondv,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		int *	iwork,
		int *	liwork,
		int *	bwork,
		SimTK_INFO_	,
		SimTK_FLEN_(balanc)	,
		SimTK_FLEN_(jobvl)	,
		SimTK_FLEN_(jobvr)	,
		SimTK_FLEN_(sense)
	)

void cggev_	(	SimTK_FOPT_(jobvl)	,
		SimTK_FOPT_(jobvr)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const	SimTK_FSCL_SimTK_C_, beta,
		SimTK_C_ *	vl,
		SimTK_FDIM_(ldvl)	,
		SimTK_C_ *	vr,
		SimTK_FDIM_(ldvr)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvl)	,
		SimTK_FLEN_(jobvr)
	)

void cggevx_	(	SimTK_FOPT_(balanc)	,
		SimTK_FOPT_(jobvl)	,
		SimTK_FOPT_(jobvr)	,
		char *	sense,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const	SimTK_FSCL_SimTK_C_, beta,
		SimTK_C_ *	vl,
		SimTK_FDIM_(ldvl)	,
		SimTK_C_ *	vr,
		SimTK_FDIM_(ldvr)	,
		int *	ilo,
		int *	ihi,
		float *	lscale,
		float *	rscale,
		float *	abnrm,
		float *	bbnrm,
		float *	rconde,
		float *	rcondv,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		int *	iwork,
		int *	bwork,
		SimTK_INFO_	,
		SimTK_FLEN_(balanc)	,
		SimTK_FLEN_(jobvl)	,
		SimTK_FLEN_(jobvr)	,
		SimTK_FLEN_(sense)
	)

void cggglm_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(m)	,
		int *	p,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	d__,
		SimTK_C_ *	x,
		SimTK_C_ *	y,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void cgghrd_	(	SimTK_FOPT_(compq)	,
		SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_INFO_	,
		SimTK_FLEN_(compq)	,
		SimTK_FLEN_(compz)
	)

void cgglse_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	p,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	c__,
		SimTK_C_ *	d__,
		SimTK_C_ *	x,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void cggqrf_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(m)	,
		int *	p,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	taua,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	taub,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void cggrqf_	(	SimTK_FDIM_(m)	,
		int *	p,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	taua,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	taub,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void cggsvd_	(	SimTK_FOPT_(jobu)	,
		SimTK_FOPT_(jobv)	,
		SimTK_FOPT_(jobq)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	p,
		SimTK_FDIM_(k)	,
		int *	l,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_float, alpha,
		const	SimTK_FSCL_float, beta,
		SimTK_C_ *	u,
		SimTK_FDIM_(ldu)	,
		SimTK_C_ *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_C_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_C_ *	work,
		float *	rwork,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobu)	,
		SimTK_FLEN_(jobv)	,
		SimTK_FLEN_(jobq)
	)

void cggsvp_	(	SimTK_FOPT_(jobu)	,
		SimTK_FOPT_(jobv)	,
		SimTK_FOPT_(jobq)	,
		SimTK_FDIM_(m)	,
		int *	p,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		float *	tola,
		float *	tolb,
		SimTK_FDIM_(k)	,
		int *	l,
		SimTK_C_ *	u,
		SimTK_FDIM_(ldu)	,
		SimTK_C_ *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_C_ *	q,
		SimTK_FDIM_(ldq)	,
		int *	iwork,
		float *	rwork,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(jobu)	,
		SimTK_FLEN_(jobv)	,
		SimTK_FLEN_(jobq)
	)

void cgtcon_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	dl,
		const SimTK_C_ *	d__,
		const SimTK_C_ *	du,
		const SimTK_C_ *	du2,
		int *	ipiv,
		float *	anorm,
		float *	rcond,
		SimTK_C_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)
	)

void cgtrfs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		const SimTK_C_ *	dl,
		const SimTK_C_ *	d__,
		const SimTK_C_ *	du,
		const SimTK_C_ *	dlf,
		const SimTK_C_ *	df,
		const SimTK_C_ *	duf,
		const SimTK_C_ *	du2,
		int *	ipiv,
		const SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void cgtsv_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	dl,
		SimTK_C_ *	d__,
		SimTK_C_ *	du,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_
	)

void cgtsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		const SimTK_C_ *	dl,
		const SimTK_C_ *	d__,
		const SimTK_C_ *	du,
		SimTK_C_ *	dlf,
		SimTK_C_ *	df,
		SimTK_C_ *	duf,
		SimTK_C_ *	du2,
		int *	ipiv,
		const SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(trans)
	)

void cgttrf_	(	SimTK_FDIM_(n)	,
		SimTK_C_ *	dl,
		SimTK_C_ *	d__,
		SimTK_C_ *	du,
		SimTK_C_ *	du2,
		int *	ipiv,
		SimTK_INFO_
	)

void cgttrs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		const SimTK_C_ *	dl,
		const SimTK_C_ *	d__,
		const SimTK_C_ *	du,
		const SimTK_C_ *	du2,
		int *	ipiv,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void cgtts2_	(	int *	itrans,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		const SimTK_C_ *	dl,
		const SimTK_C_ *	d__,
		const SimTK_C_ *	du,
		const SimTK_C_ *	du2,
		int *	ipiv,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)
	)

void chbev_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		float *	w,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void chbevd_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		float *	w,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		int *	lrwork,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void chbevx_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_C_ *	q,
		SimTK_FDIM_(ldq)	,
		float *	vl,
		float *	vu,
		int *	il,
		int *	iu,
		float *	abstol,
		SimTK_FDIM_(m)	,
		float *	w,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_C_ *	work,
		float *	rwork,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void chbgst_	(	SimTK_FOPT_(vect)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	ka,
		int *	kb,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		const SimTK_C_ *	bb,
		int *	ldbb,
		SimTK_C_ *	x,
		int *	ldx,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(vect)	,
		SimTK_FLEN_(uplo)
	)

void chbgv_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	ka,
		int *	kb,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_C_ *	bb,
		int *	ldbb,
		float *	w,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void chbgvx_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	ka,
		int *	kb,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_C_ *	bb,
		int *	ldbb,
		SimTK_C_ *	q,
		SimTK_FDIM_(ldq)	,
		float *	vl,
		float *	vu,
		int *	il,
		int *	iu,
		float *	abstol,
		SimTK_FDIM_(m)	,
		float *	w,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_C_ *	work,
		float *	rwork,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void chbmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const SimTK_C_ *	A,
		SimTK_FDIM_(lda)	,
		const SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_SimTK_C_, beta,
		SimTK_C_ *	y,
		SimTK_FINC_(y)	,
		SimTK_FLEN_(uplo)
	)

void chbtrd_	(	SimTK_FOPT_(vect)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		float *	d__,
		float *	e,
		SimTK_C_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_C_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(vect)	,
		SimTK_FLEN_(uplo)
	)

void checon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		float *	anorm,
		float *	rcond,
		SimTK_C_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cheev_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	w,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void cheevd_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	w,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		int *	lrwork,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void cheevr_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	vl,
		float *	vu,
		int *	il,
		int *	iu,
		float *	abstol,
		SimTK_FDIM_(m)	,
		float *	w,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		int *	isuppz,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		int *	lrwork,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void cheevx_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	vl,
		float *	vu,
		int *	il,
		int *	iu,
		float *	abstol,
		SimTK_FDIM_(m)	,
		float *	w,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void chegs2_	(	int *	itype,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		const SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void chegst_	(	int *	itype,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		const SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void chegv_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		float *	w,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void chegvd_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		float *	w,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		int *	lrwork,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void chegvx_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		float *	vl,
		float *	vu,
		int *	il,
		int *	iu,
		float *	abstol,
		SimTK_FDIM_(m)	,
		float *	w,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void chemm_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const SimTK_C_ *	A,
		SimTK_FDIM_(lda)	,
		const SimTK_C_ *	B,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_SimTK_C_, beta,
		SimTK_C_ *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)
	)

void chemv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const SimTK_C_ *	A,
		SimTK_FDIM_(lda)	,
		const SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_SimTK_C_, beta,
		SimTK_C_ *	y,
		SimTK_FINC_(y)	,
		SimTK_FLEN_(uplo)
	)

void cher2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		const SimTK_C_ *	y,
		SimTK_FINC_(y)	,
		SimTK_C_ *	A,
		SimTK_FDIM_(lda)	,
		SimTK_FLEN_(uplo)
	)

void cher2k_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const SimTK_C_ *	A,
		SimTK_FDIM_(lda)	,
		const SimTK_C_ *	B,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_float, beta,
		SimTK_C_ *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)
	)

void cher_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_float, alpha,
		const SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		SimTK_C_ *	A,
		SimTK_FDIM_(lda)	,
		SimTK_FLEN_(uplo)
	)

void cherfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		const SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		const SimTK_C_ *	af,
		int *	ldaf,
		int *	ipiv,
		const SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cherk_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const	SimTK_FSCL_float, alpha,
		const SimTK_C_ *	A,
		SimTK_FDIM_(lda)	,
		const	SimTK_FSCL_float, beta,
		SimTK_C_ *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)
	)

void chesv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void chesvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		const SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	af,
		int *	ldaf,
		int *	ipiv,
		const SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)
	)

void chetd2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	d,
		float *	e,
		SimTK_C_ *	tau,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void chetf2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void chetrd_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	d__,
		float *	e,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void chetrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void chetri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_C_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void chetrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void chgeqz_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(compq)	,
		SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const	SimTK_FSCL_SimTK_C_, beta,
		SimTK_C_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(comq)	,
		SimTK_FLEN_(compz)
	)

void chpcon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		int *	ipiv,
		float *	anorm,
		float *	rcond,
		SimTK_C_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void chpev_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		float *	w,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void chpevd_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		float *	w,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		int *	lrwork,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void chpevx_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		float *	vl,
		float *	vu,
		int *	il,
		int *	iu,
		float *	abstol,
		SimTK_FDIM_(m)	,
		float *	w,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_C_ *	work,
		float *	rwork,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void chpgst_	(	int *	itype,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		SimTK_C_ *	bp,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void chpgv_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		SimTK_C_ *	bp,
		float *	w,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void chpgvd_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		SimTK_C_ *	bp,
		float *	w,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		int *	lrwork,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void chpgvx_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		SimTK_C_ *	bp,
		float *	vl,
		float *	vu,
		int *	il,
		int *	iu,
		float *	abstol,
		SimTK_FDIM_(m)	,
		float *	w,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_C_ *	work,
		float *	rwork,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void chpmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const SimTK_C_ *	Ap,
		const SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_SimTK_C_, beta,
		SimTK_C_ *	y,
		SimTK_FINC_(y)	,
		SimTK_FLEN_(uplo)
	)

void chpr2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		const SimTK_C_ *	y,
		SimTK_FINC_(y)	,
		SimTK_C_ *	Ap,
		SimTK_FLEN_(uplo)
	)

void chpr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_float, alpha,
		const SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		SimTK_C_ *	A,
		SimTK_FLEN_(uplo)
	)

void chprfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ap,
		SimTK_C_ *	afp,
		int *	ipiv,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void chpsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ap,
		int *	ipiv,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void chpsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ap,
		SimTK_C_ *	afp,
		int *	ipiv,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)
	)

void chptrd_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		float *	d__,
		float *	e,
		SimTK_C_ *	tau,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void chptrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		int *	ipiv,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void chptri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		int *	ipiv,
		SimTK_C_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void chptrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ap,
		int *	ipiv,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void chsein_	(	SimTK_FOPT_(side)	,
		char *	eigsrc,
		char *	initv,
		int *	select,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	h__,
		int *	ldh,
		SimTK_C_ *	w,
		SimTK_C_ *	vl,
		SimTK_FDIM_(ldvl)	,
		SimTK_C_ *	vr,
		SimTK_FDIM_(ldvr)	,
		int *	mm,
		SimTK_FDIM_(m)	,
		SimTK_C_ *	work,
		float *	rwork,
		int *	ifaill,
		int *	ifailr,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(eigsrc)	,
		SimTK_FLEN_(initv)
	)

void chseqr_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		SimTK_C_ *	h__,
		int *	ldh,
		SimTK_C_ *	w,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(compz)
	)

void clabrd_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	nb,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	d__,
		float *	e,
		SimTK_C_ *	tauq,
		SimTK_C_ *	taup,
		SimTK_C_ *	x,
		int *	ldx,
		SimTK_C_ *	y,
		int *	ldy
	)

void clacgv_	(	SimTK_FDIM_(n)	,
		SimTK_C_ *	x,
		SimTK_FINC_(x)
	)

void clacon_	(	SimTK_FDIM_(n)	,
		SimTK_C_ *	v,
		SimTK_C_ *	x,
		float *	est,
		int *	kase,
		int *	j,
		int *	jump,
		int *	iter
	)

void clacp2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_FLEN_(uplo)
	)

void clacpy_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_FLEN_(uplo)
	)

void clacrm_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		float *	rwork
	)

void clacrt_	(	SimTK_FDIM_(n)	,
		SimTK_C_ *	cx,
		SimTK_FINC_(x)	,
		SimTK_C_ *	cy,
		SimTK_FINC_(y)	,
		SimTK_C_ *	c__,
		SimTK_C_ *	s
	)

void claed0_	(	int *	qsiz,
		SimTK_FDIM_(n)	,
		float *	d__,
		float *	e,
		SimTK_C_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_C_ *	qstore,
		SimTK_FDIM_(ldqs)	,
		float *	rwork,
		int *	iwork,
		SimTK_INFO_
	)

void claed7_	(	SimTK_FDIM_(n)	,
		int *	cutpnt,
		int *	qsiz,
		int *	tlvls,
		int *	curlvl,
		int *	curpbm,
		float *	d__,
		SimTK_C_ *	q,
		SimTK_FDIM_(ldq)	,
		float *	rho,
		int *	indxq,
		float *	qstore,
		int *	qptr,
		int *	prmptr,
		int *	perm,
		int *	givptr,
		int *	givcol,
		float *	givnum,
		SimTK_C_ *	work,
		float *	rwork,
		int *	iwork,
		SimTK_INFO_
	)

void claed8_	(	SimTK_FDIM_(k)	,
		SimTK_FDIM_(n)	,
		int *	qsiz,
		SimTK_C_ *	q,
		SimTK_FDIM_(ldq)	,
		float *	d__,
		float *	rho,
		int *	cutpnt,
		float *	z__,
		float *	dlamda,
		SimTK_C_ *	q2,
		SimTK_FDIM_(ldq2)	,
		float *	w,
		int *	indxp,
		int *	indx,
		int *	indxq,
		int *	perm,
		int *	givptr,
		int *	givcol,
		float *	givnum,
		SimTK_INFO_
	)

void claein_	(	int *	rightv,
		int *	noinit,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	h__,
		int *	ldh,
		SimTK_C_ *	w,
		SimTK_C_ *	v,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		float *	rwork,
		float *	eps3,
		float *	smlnum,
		SimTK_INFO_
	)

void claesy_	(	SimTK_C_ *	a,
		SimTK_C_ *	b,
		SimTK_C_ *	c__,
		SimTK_C_ *	rt1,
		SimTK_C_ *	rt2,
		SimTK_C_ *	evscal,
		SimTK_C_ *	cs1,
		SimTK_C_ *	sn1
	)

void claev2_	(	SimTK_C_ *	a,
		SimTK_C_ *	b,
		SimTK_C_ *	c__,
		float *	rt1,
		float *	rt2,
		float *	cs1,
		SimTK_C_ *	sn1
	)

void clags2_	(	int *	upper,
		float *	a1,
		SimTK_C_ *	a2,
		float *	a3,
		float *	b1,
		SimTK_C_ *	b2,
		float *	b3,
		float *	csu,
		SimTK_C_ *	snu,
		float *	csv,
		SimTK_C_ *	snv,
		float *	csq,
		SimTK_C_ *	snq
	)

void clagtm_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	alpha,
		SimTK_C_ *	dl,
		SimTK_C_ *	d__,
		SimTK_C_ *	du,
		SimTK_C_ *	x,
		int *	ldx,
		const	SimTK_FSCL_float, beta,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_FLEN_(trans)
	)

void clahef_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	nb,
		int *	kb,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_C_ *	w,
		int *	ldw,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void clahqr_	(	int *	wantt,
		int *	wantz,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		SimTK_C_ *	h__,
		int *	ldh,
		SimTK_C_ *	w,
		int *	iloz,
		int *	ihiz,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_INFO_
	)

void clahrd_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		int *	nb,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_C_ *	y,
		int *	ldy
	)

void claic1_	(	int *	job,
		int *	j,
		SimTK_C_ *	x,
		float *	sest,
		SimTK_C_ *	w,
		SimTK_C_ *	gamma,
		float *	sestpr,
		SimTK_C_ *	s,
		SimTK_C_ *	c__
	)

void clals0_	(	int *	icompq,
		int *	nl,
		int *	nr,
		int *	sqre,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	bx,
		int *	ldbx,
		int *	perm,
		int *	givptr,
		int *	givcol,
		int *	ldgcol,
		float *	givnum,
		int *	ldgnum,
		float *	poles,
		float *	difl,
		float *	difr,
		float *	z__,
		SimTK_FDIM_(k)	,
		float *	c__,
		float *	s,
		float *	rwork,
		SimTK_INFO_
	)

void clalsa_	(	int *	icompq,
		int *	smlsiz,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	bx,
		int *	ldbx,
		float *	u,
		SimTK_FDIM_(ldu)	,
		float *	vt,
		SimTK_FDIM_(k)	,
		float *	difl,
		float *	difr,
		float *	z__,
		float *	poles,
		int *	givptr,
		int *	givcol,
		int *	ldgcol,
		int *	perm,
		float *	givnum,
		float *	c__,
		float *	s,
		float *	rwork,
		int *	iwork,
		SimTK_INFO_
	)

double clangb_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		const SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		float *	work,
		SimTK_FLEN_(norm)
	)

double clange_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	work,
		SimTK_FLEN_(norm)
	)

double clangt_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		const SimTK_C_ *	dl,
		const SimTK_C_ *	d,
		const SimTK_C_ *	du,
		SimTK_FLEN_(norm)
	)

double clanhb_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		float *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)
	)

double clanhe_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)
	)

double clanhp_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const SimTK_C_ *	ap,
		float *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)
	)

double clanhs_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		const SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	work,
		SimTK_FLEN_(norm)
	)

double clanht_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		const float *	d,
		const SimTK_C_ *	e,
		SimTK_FLEN_(norm)
	)

double clansb_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		float *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)
	)

double clansp_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const SimTK_C_ *	ap,
		float *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)
	)

double clansy_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)
	)

double clantb_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		float *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

double clantp_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		const SimTK_C_ *	ap,
		float *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

double clantr_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void clapll_	(	SimTK_FDIM_(n)	,
		SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		SimTK_C_ *	y,
		SimTK_FINC_(y)	,
		float *	ssmin
	)

void clapmt_	(	int *	forwrd,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	x,
		int *	ldx,
		SimTK_FDIM_(k)
	)

void claqgb_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		float *	r__,
		float *	c__,
		float *	rowcnd,
		float *	colcnd,
		float *	amax,
		char *	equed,
		SimTK_FLEN_(equed)
	)

void claqge_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	r__,
		float *	c__,
		float *	rowcnd,
		float *	colcnd,
		float *	amax,
		char *	equed,
		SimTK_FLEN_(equed)
	)

void claqhb_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		float *	s,
		float *	scond,
		float *	amax,
		char *	equed,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void claqhe_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	s,
		float *	scond,
		float *	amax,
		char *	equed,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void claqhp_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		float *	s,
		float *	scond,
		float *	amax,
		char *	equed,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void claqp2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	offset,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	jpvt,
		SimTK_C_ *	tau,
		float *	vn1,
		float *	vn2,
		SimTK_C_ *	work
	)

void claqps_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	offset,
		int *	nb,
		int *	kb,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	jpvt,
		SimTK_C_ *	tau,
		float *	vn1,
		float *	vn2,
		SimTK_C_ *	auxv,
		SimTK_C_ *	f,
		int *	ldf
	)

void claqsb_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		float *	s,
		float *	scond,
		float *	amax,
		char *	equed,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void claqsp_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		float *	s,
		float *	scond,
		float *	amax,
		char *	equed,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void claqsy_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	s,
		float *	scond,
		float *	amax,
		char *	equed,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void clar1v_	(	SimTK_FDIM_(n)	,
		int *	b1,
		int *	bn,
		float *	sigma,
		float *	d__,
		float *	l,
		float *	ld,
		float *	lld,
		float *	gersch,
		SimTK_C_ *	z__,
		float *	ztz,
		float *	mingma,
		int *	r__,
		int *	isuppz,
		float *	work
	)

void clar2v_	(	SimTK_FDIM_(n)	,
		SimTK_C_ *	x,
		SimTK_C_ *	y,
		SimTK_C_ *	z__,
		SimTK_FINC_(x)	,
		float *	c__,
		SimTK_C_ *	s,
		SimTK_FINC_(c)
	)

void clarcm_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		float *	rwork
	)

void clarf_	(	SimTK_FOPT_(side)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	v,
		SimTK_FINC_(v)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		SimTK_FLEN_(side)
	)

void clarfb_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(direct)	,
		SimTK_FOPT_(storev)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_C_ *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_C_ *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		int *	ldwork,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(direct)	,
		SimTK_FLEN_(storev)
	)

void clarfg_	(	SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		SimTK_C_ *	x,
		int *	incx,
		SimTK_C_ *	tau
	)

void clarft_	(	SimTK_FOPT_(direct)	,
		SimTK_FOPT_(storev)	,
		SimTK_FDIM_(n)	,
		int *	k,
		SimTK_C_ *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_FLEN_(direct)	,
		SimTK_FLEN_(storev)
	)

void clarfx_	(	SimTK_FOPT_(side)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	v,
		SimTK_C_ *	tau,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		SimTK_FLEN_(side)
	)

void clargv_	(	SimTK_FDIM_(n)	,
		SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		SimTK_C_ *	y,
		SimTK_FINC_(y)	,
		float *	c__,
		SimTK_FINC_(c)
	)

void clarnv_	(	int *	idist,
		int *	iseed,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	x
	)

void clarrv_	(	SimTK_FDIM_(n)	,
		float *	d__,
		float *	l,
		int *	isplit,
		SimTK_FDIM_(m)	,
		float *	w,
		int *	iblock,
		float *	gersch,
		float *	tol,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		int *	isuppz,
		float *	work,
		int *	iwork,
		SimTK_INFO_
	)

void clartg_	(	SimTK_C_ *	f,
		SimTK_C_ *	g,
		float *	cs,
		SimTK_C_ *	sn,
		SimTK_C_ *	r__
	)

void clartv_	(	SimTK_FDIM_(n)	,
		SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		SimTK_C_ *	y,
		SimTK_FINC_(y)	,
		float *	c__,
		SimTK_C_ *	s,
		SimTK_FINC_(c)
	)

void clarz_	(	SimTK_FOPT_(side)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	l,
		SimTK_C_ *	v,
		SimTK_FINC_(v)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		SimTK_FLEN_(side)
	)

void clarzb_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(direct)	,
		SimTK_FOPT_(storev)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		int *	l,
		SimTK_C_ *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_C_ *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		int *	ldwork,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(direct)	,
		SimTK_FLEN_(storev)
	)

void clarzt_	(	SimTK_FOPT_(direct)	,
		SimTK_FOPT_(storev)	,
		SimTK_FDIM_(n)	,
		int *	k,
		SimTK_C_ *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_FLEN_(direct)	,
		SimTK_FLEN_(storev)
	)

void clascl_	(	char *	type__,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		float *	cfrom,
		float *	cto,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(type)
	)

void claset_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	alpha,
		const	SimTK_FSCL_SimTK_C_, beta,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_FLEN_(uplo)
	)

void clasr_	(	SimTK_FOPT_(side)	,
		char *	pivot,
		SimTK_FOPT_(direct)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	c__,
		float *	s,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(pivot)	,
		SimTK_FLEN_(direct)
	)

void classq_	(	SimTK_FDIM_(n)	,
		SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		float *	scale,
		float *	sumsq
	)

void claswp_	(	SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	k1,
		int *	k2,
		int *	ipiv,
		SimTK_FINC_(x)
	)

void clasyf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	nb,
		int *	kb,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_C_ *	w,
		int *	ldw,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void clatbs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		char *	normin,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_C_ *	x,
		float *	scale,
		float *	cnorm,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)	,
		SimTK_FLEN_(normin)
	)

void clatdf_	(	int *	ijob,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_C_ *	rhs,
		float *	rdsum,
		float *	rdscal,
		int *	ipiv,
		int *	jpiv
	)

void clatps_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		char *	normin,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		SimTK_C_ *	x,
		float *	scale,
		float *	cnorm,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)	,
		SimTK_FLEN_(normin)
	)

void clatrd_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	nb,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	e,
		SimTK_C_ *	tau,
		SimTK_C_ *	w,
		int *	ldw,
		SimTK_FLEN_(uplo)
	)

void clatrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		char *	normin,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	x,
		float *	scale,
		float *	cnorm,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)	,
		SimTK_FLEN_(normin)
	)

void clatrz_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	l,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work
	)

void clatzm_	(	SimTK_FOPT_(side)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	v,
		SimTK_FINC_(v)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	c1,
		SimTK_C_ *	c2,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		SimTK_FLEN_(side)
	)

void clauu2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void clauum_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cpbcon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		float *	anorm,
		float *	rcond,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cpbequ_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		float *	s,
		float *	scond,
		float *	amax,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cpbrfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_C_ *	afb,
		SimTK_FDIM_(ldafb)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cpbstf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cpbsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cpbsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_C_ *	afb,
		SimTK_FDIM_(ldafb)	,
		char *	equed,
		float *	s,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void cpbtf2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cpbtrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cpbtrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cpocon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	anorm,
		float *	rcond,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cpoequ_	(	SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	s,
		float *	scond,
		float *	amax,
		SimTK_INFO_
	)

void cporfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	af,
		int *	ldaf,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cposv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cposvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	af,
		int *	ldaf,
		char *	equed,
		float *	s,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void cpotf2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cpotrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cpotri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cpotrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cppcon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		float *	anorm,
		float *	rcond,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cppequ_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		float *	s,
		float *	scond,
		float *	amax,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cpprfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ap,
		SimTK_C_ *	afp,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cppsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ap,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cppsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ap,
		SimTK_C_ *	afp,
		char *	equed,
		float *	s,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void cpptrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cpptri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cpptrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ap,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cptcon_	(	SimTK_FDIM_(n)	,
		float *	d__,
		SimTK_C_ *	e,
		float *	anorm,
		float *	rcond,
		float *	rwork,
		SimTK_INFO_
	)

void cptrfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	d__,
		SimTK_C_ *	e,
		float *	df,
		SimTK_C_ *	ef,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cptsv_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	d__,
		SimTK_C_ *	e,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_
	)

void cptsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	d__,
		SimTK_C_ *	e,
		float *	df,
		SimTK_C_ *	ef,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)
	)

void cpttrf_	(	SimTK_FDIM_(n)	,
		float *	d__,
		SimTK_C_ *	e,
		SimTK_INFO_
	)

void cpttrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	d__,
		SimTK_C_ *	e,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cptts2_	(	int *	iuplo,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	d__,
		SimTK_C_ *	e,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)
	)

void crot_	(	SimTK_FDIM_(n)	,
		SimTK_C_ *	cx,
		SimTK_FINC_(x)	,
		SimTK_C_ *	cy,
		SimTK_FINC_(y)	,
		float *	c__,
		SimTK_C_ *	s
	)

void crotg_	(	SimTK_C_ *	a,
		SimTK_C_ *	b,
		float *	c,
		SimTK_C_ *	s
	)

void cscal_	(	SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		SimTK_C_ *	x,
		SimTK_FINC_(x)
	)

void cspcon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		int *	ipiv,
		float *	anorm,
		float *	rcond,
		SimTK_C_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cspmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		SimTK_C_ *	ap,
		SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_SimTK_C_, beta,
		SimTK_C_ *	y,
		int *	incy,
		SimTK_FLEN_(uplo)
	)

void cspr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		SimTK_C_ *	ap,
		SimTK_FLEN_(uplo)
	)

void csprfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ap,
		SimTK_C_ *	afp,
		int *	ipiv,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cspsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ap,
		int *	ipiv,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cspsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ap,
		SimTK_C_ *	afp,
		int *	ipiv,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)
	)

void csptrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		int *	ipiv,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void csptri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		int *	ipiv,
		SimTK_C_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void csptrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ap,
		int *	ipiv,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void csrot_	(	SimTK_FDIM_(n)	,
		SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		SimTK_C_ *	y,
		SimTK_FINC_(y)	,
		const	SimTK_FSCL_float, c,
		const	SimTK_FSCL_float, s
	)

void csrscl_	(	SimTK_FDIM_(n)	,
		float *	sa,
		SimTK_C_ *	sx,
		SimTK_FINC_(x)
	)

void csscal_	(	SimTK_FDIM_(n)	,
		const	SimTK_FSCL_float, alpha,
		SimTK_C_ *	x,
		SimTK_FINC_(x)
	)

void cstedc_	(	SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		float *	d__,
		float *	e,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		int *	lrwork,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(compz)
	)

void cstein_	(	SimTK_FDIM_(n)	,
		float *	d__,
		float *	e,
		SimTK_FDIM_(m)	,
		float *	w,
		int *	iblock,
		int *	isplit,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_
	)

void csteqr_	(	SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		float *	d__,
		float *	e,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(compz)
	)

void cswap_	(	SimTK_FDIM_(n)	,
		SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		SimTK_C_ *	y,
		SimTK_FINC_(y)
	)

void csycon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		float *	anorm,
		float *	rcond,
		SimTK_C_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void csymm_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const SimTK_C_ *	A,
		SimTK_FDIM_(lda)	,
		const SimTK_C_ *	B,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_SimTK_C_, beta,
		SimTK_C_ *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)
	)

void csymv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_SimTK_C_, beta,
		SimTK_C_ *	y,
		SimTK_FINC_(y)	,
		SimTK_FLEN_(uplo)
	)

void csyr2k_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const SimTK_C_ *	A,
		SimTK_FDIM_(lda)	,
		const SimTK_C_ *	B,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_SimTK_C_, beta,
		SimTK_C_ *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)
	)

void csyr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_FLEN_(uplo)
	)

void csyrfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	af,
		int *	ldaf,
		int *	ipiv,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void csyrk_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const SimTK_C_ *	A,
		SimTK_FDIM_(lda)	,
		const	SimTK_FSCL_SimTK_C_, beta,
		SimTK_C_ *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)
	)

void csysv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void csysvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	af,
		int *	ldaf,
		int *	ipiv,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)
	)

void csytf2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void csytrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void csytri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_C_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void csytrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void ctbcon_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		float *	rcond,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void ctbmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const SimTK_C_ *	A,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void ctbrfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void ctbsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const SimTK_C_ *	A,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void ctbtrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void ctgevc_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(howmny)	,
		int *	select,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	vl,
		SimTK_FDIM_(ldvl)	,
		SimTK_C_ *	vr,
		SimTK_FDIM_(ldvr)	,
		int *	mm,
		SimTK_FDIM_(m)	,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(howmny)
	)

void ctgex2_	(	int *	wantq,
		int *	wantz,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		int *	j1,
		SimTK_INFO_
	)

void ctgexc_	(	int *	wantq,
		int *	wantz,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		int *	ifst,
		int *	ilst,
		SimTK_INFO_
	)

void ctgsen_	(	int *	ijob,
		int *	wantq,
		int *	wantz,
		int *	select,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const	SimTK_FSCL_SimTK_C_, beta,
		SimTK_C_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_C_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_FDIM_(m)	,
		float *	pl,
		float *	pr,
		float *	dif,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_
	)

void ctgsja_	(	SimTK_FOPT_(jobu)	,
		SimTK_FOPT_(jobv)	,
		SimTK_FOPT_(jobq)	,
		SimTK_FDIM_(m)	,
		int *	p,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		int *	l,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		float *	tola,
		float *	tolb,
		const	SimTK_FSCL_float, alpha,
		const	SimTK_FSCL_float, beta,
		SimTK_C_ *	u,
		SimTK_FDIM_(ldu)	,
		SimTK_C_ *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_C_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_C_ *	work,
		int *	ncycle,
		SimTK_INFO_	,
		SimTK_FLEN_(jobu)	,
		SimTK_FLEN_(jobv)	,
		SimTK_FLEN_(jobq)
	)

void ctgsna_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(howmny)	,
		int *	select,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	vl,
		SimTK_FDIM_(ldvl)	,
		SimTK_C_ *	vr,
		SimTK_FDIM_(ldvr)	,
		float *	s,
		float *	dif,
		int *	mm,
		SimTK_FDIM_(m)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(howmny)
	)

void ctgsy2_	(	SimTK_FOPT_(trans)	,
		int *	ijob,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	d__,
		int *	ldd,
		SimTK_C_ *	e,
		int *	lde,
		SimTK_C_ *	f,
		int *	ldf,
		float *	scale,
		float *	rdsum,
		float *	rdscal,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void ctgsyl_	(	SimTK_FOPT_(trans)	,
		int *	ijob,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	d__,
		int *	ldd,
		SimTK_C_ *	e,
		int *	lde,
		SimTK_C_ *	f,
		int *	ldf,
		float *	scale,
		float *	dif,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void ctpcon_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		float *	rcond,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void ctpmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		const SimTK_C_ *	Ap,
		SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void ctprfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ap,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void ctpsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		const SimTK_C_ *	Ap,
		SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void ctptri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void ctptrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	ap,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void ctrcon_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		float *	rcond,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void ctrevc_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(howmny)	,
		int *	select,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_C_ *	vl,
		SimTK_FDIM_(ldvl)	,
		SimTK_C_ *	vr,
		SimTK_FDIM_(ldvr)	,
		int *	mm,
		SimTK_FDIM_(m)	,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(howmny)
	)

void ctrexc_	(	SimTK_FOPT_(compq)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_C_ *	q,
		SimTK_FDIM_(ldq)	,
		int *	ifst,
		int *	ilst,
		SimTK_INFO_	,
		SimTK_FLEN_(compq)
	)

void ctrmm_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const SimTK_C_ *	A,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	B,
		SimTK_FDIM_(ldb)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void ctrmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		const SimTK_C_ *	A,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void ctrrfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		SimTK_C_ *	work,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void ctrsen_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(compq)	,
		int *	select,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_C_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_C_ *	w,
		SimTK_FDIM_(m)	,
		float *	s,
		float *	sep,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(compq)
	)

void ctrsm_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_C_, alpha,
		const SimTK_C_ *	A,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	B,
		SimTK_FDIM_(ldb)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void ctrsna_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(howmny)	,
		int *	select,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_C_ *	vl,
		SimTK_FDIM_(ldvl)	,
		SimTK_C_ *	vr,
		SimTK_FDIM_(ldvr)	,
		float *	s,
		float *	sep,
		int *	mm,
		SimTK_FDIM_(m)	,
		SimTK_C_ *	work,
		int *	ldwork,
		float *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(howmny)
	)

void ctrsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		const SimTK_C_ *	A,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void ctrsyl_	(	SimTK_FOPT_(trana)	,
		SimTK_FOPT_(tranb)	,
		int *	isgn,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		float *	scale,
		SimTK_INFO_	,
		SimTK_FLEN_(trana)	,
		SimTK_FLEN_(tranb)
	)

void ctrti2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void ctrtri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void ctrtrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void ctzrqf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_INFO_
	)

void ctzrzf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void cung2l_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_INFO_
	)

void cung2r_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_INFO_
	)

void cungbr_	(	SimTK_FOPT_(vect)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(vect)
	)

void cunghr_	(	SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		int *	info
	)

void cungl2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_INFO_
	)

void cunglq_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void cungql_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void cungqr_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void cungr2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_INFO_
	)

void cungrq_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void cungtr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cunm2l_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void cunm2r_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void cunmbr_	(	SimTK_FOPT_(vect)	,
		SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(vect)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void cunmhr_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void cunml2_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void cunmlq_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void cunmql_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void cunmqr_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void cunmr2_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void cunmr3_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		int *	l,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void cunmrq_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void cunmrz_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		int *	l,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void cunmtr_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_C_ *	tau,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)
	)

void cupgtr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		SimTK_C_ *	tau,
		SimTK_C_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_C_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void cupmtr_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_C_ *	ap,
		SimTK_C_ *	tau,
		SimTK_C_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_C_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)
	)

double dasum_	(	SimTK_FDIM_(n)	,
		const double *	x,
		SimTK_FINC_(x)
	)

void daxpy_	(	SimTK_FDIM_(n)	,
		const	SimTK_FSCL_double, alpha,
		const double *	x,
		SimTK_FINC_(x)	,
		double *	y,
		SimTK_FINC_(y)
	)

void dbdsdc_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(compq)	,
		SimTK_FDIM_(n)	,
		double *	d__,
		double *	e,
		double *	u,
		SimTK_FDIM_(ldu)	,
		double *	vt,
		SimTK_FDIM_(ldvt)	,
		double *	q,
		int *	iq,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(compq)
	)

void dbdsqr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	ncvt,
		int *	nru,
		int *	ncc,
		double *	d__,
		double *	e,
		double *	vt,
		SimTK_FDIM_(ldvt)	,
		double *	u,
		SimTK_FDIM_(ldu)	,
		double *	c__,
		int *	ldc,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dcopy_	(	SimTK_FDIM_(n)	,
		const double *	x,
		SimTK_FINC_(x)	,
		double *	y,
		SimTK_FINC_(y)
	)

void ddisna_	(	SimTK_FOPT_(job)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	d__,
		double *	sep,
		SimTK_INFO_	,
		SimTK_FLEN_(job)
	)

double ddot_	(	SimTK_FDIM_(n)	,
		const double *	x,
		SimTK_FINC_(x)	,
		const double *	y,
		SimTK_FINC_(y)
	)

void dgbbrd_	(	SimTK_FOPT_(vect)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	ncc,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	d__,
		double *	e,
		double *	q,
		SimTK_FDIM_(ldq)	,
		double *	pt,
		int *	ldpt,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(vect)
	)

void dgbcon_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		int *	ipiv,
		double *	anorm,
		double *	rcond,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)
	)

void dgbequ_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	r__,
		double *	c__,
		double *	rowcnd,
		double *	colcnd,
		double *	amax,
		SimTK_INFO_
	)

void dgbmv_	(	SimTK_FOPT_(transA)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		const	SimTK_FSCL_double, alpha,
		const double *	A,
		SimTK_FDIM_(lda)	,
		const double *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_double, beta,
		double *	Y,
		SimTK_FINC_(Y)	,
		SimTK_FLEN_(transA)
	)

void dgbrfs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_FDIM_(nrhs)	,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	afb,
		SimTK_FDIM_(ldafb)	,
		int *	ipiv,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void dgbsv_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_FDIM_(nrhs)	,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		int *	ipiv,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_
	)

void dgbsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_FDIM_(nrhs)	,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	afb,
		SimTK_FDIM_(ldafb)	,
		int *	ipiv,
		char *	equed,
		double *	r__,
		double *	c__,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(equed)
	)

void dgbtf2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		int *	ipiv,
		SimTK_INFO_
	)

void dgbtrf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		int *	ipiv,
		SimTK_INFO_
	)

void dgbtrs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_FDIM_(nrhs)	,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		int *	ipiv,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void dgebak_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(side)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		double *	scale,
		SimTK_FDIM_(m)	,
		double *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(side)
	)

void dgebal_	(	SimTK_FOPT_(job)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		int *	ilo,
		int *	ihi,
		double *	scale,
		SimTK_INFO_	,
		SimTK_FLEN_(job)
	)

void dgebd2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	d__,
		double *	e,
		double *	tauq,
		double *	taup,
		double *	work,
		SimTK_INFO_
	)

void dgebrd_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	d__,
		double *	e,
		double *	tauq,
		double *	taup,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dgecon_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	anorm,
		double *	rcond,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)
	)

void dgeequ_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	r__,
		double *	c__,
		double *	rowcnd,
		double *	colcnd,
		double *	amax,
		SimTK_INFO_
	)

void dgees_	(	SimTK_FOPT_(jobvs)	,
		SimTK_FOPT_(sort)	,
		SimTK_SELECT_2D	select,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		int *	sdim,
		double *	wr,
		double *	wi,
		double *	vs,
		SimTK_FDIM_(ldvs)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	bwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvs)	,
		SimTK_FLEN_(sort)
	)

void dgeesx_	(	SimTK_FOPT_(jobvs)	,
		SimTK_FOPT_(sort)	,
		SimTK_SELECT_2D	select,
		char *	sense,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		int *	sdim,
		double *	wr,
		double *	wi,
		double *	vs,
		SimTK_FDIM_(ldvs)	,
		double *	rconde,
		double *	rcondv,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		int *	bwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvs)	,
		SimTK_FLEN_(sort)	,
		SimTK_FLEN_(sense)
	)

void dgeev_	(	SimTK_FOPT_(jobvl)	,
		SimTK_FOPT_(jobvr)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	wr,
		double *	wi,
		double *	vl,
		SimTK_FDIM_(ldvl)	,
		double *	vr,
		SimTK_FDIM_(ldvr)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvl)	,
		SimTK_FLEN_(jobvr)
	)

void dgeevx_	(	SimTK_FOPT_(balanc)	,
		SimTK_FOPT_(jobvl)	,
		SimTK_FOPT_(jobvr)	,
		char *	sense,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	wr,
		double *	wi,
		double *	vl,
		SimTK_FDIM_(ldvl)	,
		double *	vr,
		SimTK_FDIM_(ldvr)	,
		int *	ilo,
		int *	ihi,
		double *	scale,
		double *	abnrm,
		double *	rconde,
		double *	rcondv,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(balanc)	,
		SimTK_FLEN_(jobvl)	,
		SimTK_FLEN_(jobvr)	,
		SimTK_FLEN_(sense)
	)

void dgegs_	(	SimTK_FOPT_(jobvsl)	,
		SimTK_FOPT_(jobvsr)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	alphar,
		double *	alphai,
		const	SimTK_FSCL_double, beta,
		double *	vsl,
		int *	ldvsl,
		double *	vsr,
		int *	ldvsr,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvsl)	,
		SimTK_FLEN_(jobvsr)
	)

void dgegv_	(	SimTK_FOPT_(jobvl)	,
		SimTK_FOPT_(jobvr)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	alphar,
		double *	alphai,
		const	SimTK_FSCL_double, beta,
		double *	vl,
		SimTK_FDIM_(ldvl)	,
		double *	vr,
		SimTK_FDIM_(ldvr)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvsl)	,
		SimTK_FLEN_(jobvsr)
	)

void dgehd2_	(	SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_INFO_
	)

void dgehrd_	(	SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dgelq2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_INFO_
	)

void dgelqf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dgels_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void dgelsd_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	s,
		double *	rcond,
		int *	rank,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		SimTK_INFO_
	)

void dgelss_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	s,
		double *	rcond,
		int *	rank,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dgelsx_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		int *	jpvt,
		double *	rcond,
		int *	rank,
		double *	work,
		SimTK_INFO_
	)

void dgelsy_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		int *	jpvt,
		double *	rcond,
		int *	rank,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dgemm_	(	SimTK_FOPT_(transA)	,
		SimTK_FOPT_(transB)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const	SimTK_FSCL_double, alpha,
		const double *	A,
		SimTK_FDIM_(lda)	,
		const double *	B,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_double, beta,
		double *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(transB)
	)

void dgemv_	(	SimTK_FOPT_(transA)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_double, alpha,
		const double *	A,
		SimTK_FDIM_(lda)	,
		const double *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_double, beta,
		double *	Y,
		SimTK_FINC_(Y)	,
		SimTK_FLEN_(transA)
	)

void dgeql2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_INFO_
	)

void dgeqlf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dgeqp3_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		int *	jpvt,
		double *	tau,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dgeqpf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		int *	jpvt,
		double *	tau,
		double *	work,
		SimTK_INFO_
	)

void dgeqr2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_INFO_
	)

void dgeqrf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dger_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_double, alpha,
		const double *	x,
		SimTK_FINC_(x)	,
		const double *	y,
		SimTK_FINC_(y)	,
		double *	A,
		SimTK_FDIM_(lda)
	)

void dgerfs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	af,
		int *	ldaf,
		int *	ipiv,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void dgerq2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_INFO_
	)

void dgerqf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dgesc2_	(	SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	rhs,
		int *	ipiv,
		int *	jpiv,
		double *	scale
	)

void dgesdd_	(	SimTK_FOPT_(jobz)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	s,
		double *	u,
		SimTK_FDIM_(ldu)	,
		double *	vt,
		SimTK_FDIM_(ldvt)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)
	)

void dgesv_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_
	)

void dgesvd_	(	SimTK_FOPT_(jobu)	,
		char *	jobvt,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	s,
		double *	u,
		SimTK_FDIM_(ldu)	,
		double *	vt,
		SimTK_FDIM_(ldvt)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(jobu)	,
		SimTK_FLEN_(jobvt)
	)

void dgesvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	af,
		int *	ldaf,
		int *	ipiv,
		char *	equed,
		double *	r__,
		double *	c__,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(equed)
	)

void dgetc2_	(	SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		int *	jpiv,
		SimTK_INFO_
	)

void dgetf2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_INFO_
	)

void dgetrf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_INFO_
	)

void dgetri_	(	SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		const int *	ipiv,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dgetrs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void dggbak_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(side)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		double *	lscale,
		double *	rscale,
		SimTK_FDIM_(m)	,
		double *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(side)
	)

void dggbal_	(	SimTK_FOPT_(job)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		int *	ilo,
		int *	ihi,
		double *	lscale,
		double *	rscale,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(job)
	)

void dgges_	(	SimTK_FOPT_(jobvsl)	,
		SimTK_FOPT_(jobvsr)	,
		SimTK_FOPT_(sort)	,
		SimTK_SELECT_3D	delctg,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		int *	sdim,
		double *	alphar,
		double *	alphai,
		const	SimTK_FSCL_double, beta,
		double *	vsl,
		int *	ldvsl,
		double *	vsr,
		int *	ldvsr,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	bwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvsl)	,
		SimTK_FLEN_(jobvsr)	,
		SimTK_FLEN_(sort)
	)

void dggesx_	(	SimTK_FOPT_(jobvsl)	,
		SimTK_FOPT_(jobvsr)	,
		SimTK_FOPT_(sort)	,
		SimTK_SELECT_3D	delctg,
		char *	sense,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		int *	sdim,
		double *	alphar,
		double *	alphai,
		const	SimTK_FSCL_double, beta,
		double *	vsl,
		int *	ldvsl,
		double *	vsr,
		int *	ldvsr,
		double *	rconde,
		double *	rcondv,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		int *	bwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvsl)	,
		SimTK_FLEN_(jobvsr)	,
		SimTK_FLEN_(sort)	,
		SimTK_FLEN_(sense)
	)

void dggev_	(	SimTK_FOPT_(jobvl)	,
		SimTK_FOPT_(jobvr)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	alphar,
		double *	alphai,
		const	SimTK_FSCL_double, beta,
		double *	vl,
		SimTK_FDIM_(ldvl)	,
		double *	vr,
		SimTK_FDIM_(ldvr)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvl)	,
		SimTK_FLEN_(jobvr)
	)

void dggevx_	(	SimTK_FOPT_(balanc)	,
		SimTK_FOPT_(jobvl)	,
		SimTK_FOPT_(jobvr)	,
		char *	sense,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	alphar,
		double *	alphai,
		double *	beta,
		double *	vl,
		SimTK_FDIM_(ldvl)	,
		double *	vr,
		SimTK_FDIM_(ldvr)	,
		int *	ilo,
		int *	ihi,
		double *	lscale,
		double *	rscale,
		double *	abnrm,
		double *	bbnrm,
		double *	rconde,
		double *	rcondv,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	bwork,
		SimTK_INFO_	,
		SimTK_FLEN_(balanc)	,
		SimTK_FLEN_(jobvl)	,
		SimTK_FLEN_(jobvr)	,
		SimTK_FLEN_(sense)
	)

void dggglm_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(m)	,
		int *	p,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	d__,
		double *	x,
		double *	y,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dgghrd_	(	SimTK_FOPT_(compq)	,
		SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	q,
		SimTK_FDIM_(ldq)	,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_INFO_	,
		SimTK_FLEN_(compq)	,
		SimTK_FLEN_(compz)
	)

void dgglse_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	p,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	c__,
		double *	d__,
		double *	x,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dggqrf_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(m)	,
		int *	p,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	taua,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	taub,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dggrqf_	(	SimTK_FDIM_(m)	,
		int *	p,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	taua,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	taub,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dggsvd_	(	SimTK_FOPT_(jobu)	,
		SimTK_FOPT_(jobv)	,
		SimTK_FOPT_(jobq)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	p,
		SimTK_FDIM_(k)	,
		int *	l,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_double, alpha,
		const	SimTK_FSCL_double, beta,
		double *	u,
		SimTK_FDIM_(ldu)	,
		double *	v,
		SimTK_FDIM_(ldv)	,
		double *	q,
		SimTK_FDIM_(ldq)	,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobu)	,
		SimTK_FLEN_(jobv)	,
		SimTK_FLEN_(jobq)
	)

void dggsvp_	(	SimTK_FOPT_(jobu)	,
		SimTK_FOPT_(jobv)	,
		SimTK_FOPT_(jobq)	,
		SimTK_FDIM_(m)	,
		int *	p,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	tola,
		double *	tolb,
		SimTK_FDIM_(k)	,
		int *	l,
		double *	u,
		SimTK_FDIM_(ldu)	,
		double *	v,
		SimTK_FDIM_(ldv)	,
		double *	q,
		SimTK_FDIM_(ldq)	,
		int *	iwork,
		double *	tau,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(jobu)	,
		SimTK_FLEN_(jobv)	,
		SimTK_FLEN_(jobq)
	)

void dgtcon_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		double *	dl,
		double *	d__,
		double *	du,
		double *	du2,
		int *	ipiv,
		double *	anorm,
		double *	rcond,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)
	)

void dgtrfs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	dl,
		double *	d__,
		double *	du,
		double *	dlf,
		double *	df,
		double *	duf,
		double *	du2,
		int *	ipiv,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void dgtsv_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	dl,
		double *	d__,
		double *	du,
		double *	b,
		SimTK_FDIM_(ldb)	,
		int *	info
	)

void dgtsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	dl,
		double *	d__,
		double *	du,
		double *	dlf,
		double *	df,
		double *	duf,
		double *	du2,
		int *	ipiv,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(trans)
	)

void dgttrf_	(	SimTK_FDIM_(n)	,
		double *	dl,
		double *	d__,
		double *	du,
		double *	du2,
		int *	ipiv,
		SimTK_INFO_
	)

void dgttrs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	dl,
		double *	d__,
		double *	du,
		double *	du2,
		int *	ipiv,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void dgtts2_	(	int *	itrans,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	dl,
		double *	d__,
		double *	du,
		double *	du2,
		int *	ipiv,
		double *	b,
		SimTK_FDIM_(ldb)
	)

void dhgeqz_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(compq)	,
		SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	alphar,
		double *	alphai,
		double *	beta,
		double *	q,
		SimTK_FDIM_(ldq)	,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(compq)	,
		SimTK_FLEN_(compz)
	)

void dhsein_	(	SimTK_FOPT_(side)	,
		char *	eigsrc,
		char *	initv,
		int *	select,
		SimTK_FDIM_(n)	,
		double *	h__,
		int *	ldh,
		double *	wr,
		double *	wi,
		double *	vl,
		SimTK_FDIM_(ldvl)	,
		double *	vr,
		SimTK_FDIM_(ldvr)	,
		int *	mm,
		SimTK_FDIM_(m)	,
		double *	work,
		int *	ifaill,
		int *	ifailr,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(eigsrc)	,
		SimTK_FLEN_(initv)
	)

void dhseqr_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		double *	h__,
		int *	ldh,
		double *	wr,
		double *	wi,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(comqz)
	)

void dlabad_	(	double *	small,
		double *	large
	)

void dlabrd_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	nb,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	d__,
		double *	e,
		double *	tauq,
		double *	taup,
		double *	x,
		int *	ldx,
		double *	y,
		int *	ldy
	)

void dlacon_	(	SimTK_FDIM_(n)	,
		double *	v,
		double *	x,
		int *	isgn,
		double *	est,
		int *	kase,
		int *	j,
		int *	jump,
		int *	iter
	)

void dlacpy_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_FLEN_(uplo)
	)

void dladiv_	(	double *	a,
		double *	b,
		double *	c__,
		double *	d__,
		double *	p,
		double *	q
	)

void dlae2_	(	double *	a,
		double *	b,
		double *	c__,
		double *	rt1,
		double *	rt2
	)

void dlaebz_	(	int *	ijob,
		int *	nitmax,
		SimTK_FDIM_(n)	,
		int *	mmax,
		int *	minp,
		int *	nbmin,
		double *	abstol,
		double *	reltol,
		double *	pivmin,
		double *	d__,
		double *	e,
		double *	e2,
		int *	nval,
		double *	ab,
		double *	c__,
		int *	mout,
		int *	nab,
		double *	work,
		int *	iwork,
		SimTK_INFO_
	)

void dlaed0_	(	int *	icompq,
		int *	qsiz,
		SimTK_FDIM_(n)	,
		double *	d__,
		double *	e,
		double *	q,
		SimTK_FDIM_(ldq)	,
		double *	qstore,
		SimTK_FDIM_(ldqs)	,
		double *	work,
		int *	iwork,
		SimTK_INFO_
	)

void dlaed1_	(	SimTK_FDIM_(n)	,
		double *	d__,
		double *	q,
		SimTK_FDIM_(ldq)	,
		int *	indxq,
		double *	rho,
		int *	cutpnt,
		double *	work,
		int *	iwork,
		SimTK_INFO_
	)

void dlaed2_	(	SimTK_FDIM_(k)	,
		SimTK_FDIM_(n)	,
		int *	n1,
		double *	d__,
		double *	q,
		SimTK_FDIM_(ldq)	,
		int *	indxq,
		double *	rho,
		double *	z__,
		double *	dlamda,
		double *	w,
		double *	q2,
		int *	indx,
		int *	indxc,
		int *	indxp,
		int *	coltyp,
		SimTK_INFO_
	)

void dlaed3_	(	SimTK_FDIM_(k)	,
		SimTK_FDIM_(n)	,
		int *	n1,
		double *	d__,
		double *	q,
		SimTK_FDIM_(ldq)	,
		double *	rho,
		double *	dlamda,
		double *	q2,
		int *	indx,
		int *	ctot,
		double *	w,
		double *	s,
		SimTK_INFO_
	)

void dlaed4_	(	SimTK_FDIM_(n)	,
		int *	i__,
		double *	d__,
		double *	z__,
		double *	delta,
		double *	rho,
		double *	dlam,
		SimTK_INFO_
	)

void dlaed5_	(	int *	i__,
		double *	d__,
		double *	z__,
		double *	delta,
		double *	rho,
		double *	dlam
	)

void dlaed6_	(	int *	kniter,
		int *	orgati,
		double *	rho,
		double *	d__,
		double *	z__,
		double *	finit,
		double *	tau,
		SimTK_INFO_
	)

void dlaed7_	(	int *	icompq,
		SimTK_FDIM_(n)	,
		int *	qsiz,
		int *	tlvls,
		int *	curlvl,
		int *	curpbm,
		double *	d__,
		double *	q,
		SimTK_FDIM_(ldq)	,
		int *	indxq,
		double *	rho,
		int *	cutpnt,
		double *	qstore,
		int *	qptr,
		int *	prmptr,
		int *	perm,
		int *	givptr,
		int *	givcol,
		double *	givnum,
		double *	work,
		int *	iwork,
		SimTK_INFO_
	)

void dlaed8_	(	int *	icompq,
		SimTK_FDIM_(k)	,
		SimTK_FDIM_(n)	,
		int *	qsiz,
		double *	d__,
		double *	q,
		SimTK_FDIM_(ldq)	,
		int *	indxq,
		double *	rho,
		int *	cutpnt,
		double *	z__,
		double *	dlamda,
		double *	q2,
		SimTK_FDIM_(ldq2)	,
		double *	w,
		int *	perm,
		int *	givptr,
		int *	givcol,
		double *	givnum,
		int *	indxp,
		int *	indx,
		SimTK_INFO_
	)

void dlaed9_	(	SimTK_FDIM_(k)	,
		int *	kstart,
		int *	kstop,
		SimTK_FDIM_(n)	,
		double *	d__,
		double *	q,
		SimTK_FDIM_(ldq)	,
		double *	rho,
		double *	dlamda,
		double *	w,
		double *	s,
		int *	lds,
		SimTK_INFO_
	)

void dlaeda_	(	SimTK_FDIM_(n)	,
		int *	tlvls,
		int *	curlvl,
		int *	curpbm,
		int *	prmptr,
		int *	perm,
		int *	givptr,
		int *	givcol,
		double *	givnum,
		double *	q,
		int *	qptr,
		double *	z__,
		double *	ztemp,
		SimTK_INFO_
	)

void dlaein_	(	int *	rightv,
		int *	noinit,
		SimTK_FDIM_(n)	,
		double *	h__,
		int *	ldh,
		double *	wr,
		double *	wi,
		double *	vr,
		double *	vi,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	work,
		double *	eps3,
		double *	smlnum,
		double *	bignum,
		SimTK_INFO_
	)

void dlaev2_	(	double *	a,
		double *	b,
		double *	c__,
		double *	rt1,
		double *	rt2,
		double *	cs1,
		double *	sn1
	)

void dlaexc_	(	int *	wantq,
		SimTK_FDIM_(n)	,
		double *	t,
		SimTK_FDIM_(ldt)	,
		double *	q,
		SimTK_FDIM_(ldq)	,
		int *	j1,
		int *	n1,
		int *	n2,
		double *	work,
		SimTK_INFO_
	)

void dlag2_	(	double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	safmin,
		double *	scale1,
		double *	scale2,
		double *	wr1,
		double *	wr2,
		double *	wi
	)

void dlags2_	(	int *	upper,
		double *	a1,
		double *	a2,
		double *	a3,
		double *	b1,
		double *	b2,
		double *	b3,
		double *	csu,
		double *	snu,
		double *	csv,
		double *	snv,
		double *	csq,
		double *	snq
	)

void dlagtf_	(	SimTK_FDIM_(n)	,
		double *	a,
		double *	lambda,
		double *	b,
		double *	c__,
		double *	tol,
		double *	d__,
		int *	in,
		SimTK_INFO_
	)

void dlagtm_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		const	SimTK_FSCL_double, alpha,
		double *	dl,
		double *	d__,
		double *	du,
		double *	x,
		int *	ldx,
		const	SimTK_FSCL_double, beta,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_FLEN_(trans)
	)

void dlagts_	(	int *	job,
		SimTK_FDIM_(n)	,
		double *	a,
		double *	b,
		double *	c__,
		double *	d__,
		int *	in,
		double *	y,
		double *	tol,
		SimTK_INFO_
	)

void dlagv2_	(	double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	alphar,
		double *	alphai,
		double *	beta,
		double *	csl,
		double *	snl,
		double *	csr,
		double *	snr
	)

void dlahqr_	(	int *	wantt,
		int *	wantz,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		double *	h__,
		int *	ldh,
		double *	wr,
		double *	wi,
		int *	iloz,
		int *	ihiz,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_INFO_
	)

void dlahrd_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		int *	nb,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	t,
		SimTK_FDIM_(ldt)	,
		double *	y,
		int *	ldy
	)

void dlaic1_	(	int *	job,
		int *	j,
		double *	x,
		double *	sest,
		double *	w,
		double *	gamma,
		double *	sestpr,
		double *	s,
		double *	c__
	)

void dlaln2_	(	int *	ltrans,
		int *	na,
		int *	nw,
		double *	smin,
		double *	ca,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	d1,
		double *	d2,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	wr,
		double *	wi,
		double *	x,
		int *	ldx,
		double *	scale,
		double *	xnorm,
		SimTK_INFO_
	)

void dlals0_	(	int *	icompq,
		int *	nl,
		int *	nr,
		int *	sqre,
		SimTK_FDIM_(nrhs)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	bx,
		int *	ldbx,
		int *	perm,
		int *	givptr,
		int *	givcol,
		int *	ldgcol,
		double *	givnum,
		int *	ldgnum,
		double *	poles,
		double *	difl,
		double *	difr,
		double *	z__,
		int *	k,
		double *	c__,
		double *	s,
		double *	work,
		SimTK_INFO_
	)

void dlalsa_	(	int *	icompq,
		int *	smlsiz,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	bx,
		int *	ldbx,
		double *	u,
		SimTK_FDIM_(ldu)	,
		double *	vt,
		SimTK_FDIM_(k)	,
		double *	difl,
		double *	difr,
		double *	z__,
		double *	poles,
		int *	givptr,
		int *	givcol,
		int *	ldgcol,
		int *	perm,
		double *	givnum,
		double *	c__,
		double *	s,
		double *	work,
		int *	iwork,
		SimTK_INFO_
	)

void dlalsd_	(	SimTK_FOPT_(uplo)	,
		int *	smlsiz,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	d__,
		double *	e,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	rcond,
		int *	rank,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dlamc1_	(	int *	beta,
		int *	t,
		int *	rnd,
		int *	ieee1
	)

void dlamc2_	(	int *	beta,
		int *	t,
		int *	rnd,
		double *	eps,
		int *	emin,
		double *	rmin,
		int *	emax,
		double *	rmax
	)

void dlamc4_	(	int *	emin,
		double *	start,
		int *	base
	)

void dlamc5_	(	int *	beta,
		int *	p,
		int *	emin,
		int *	ieee,
		int *	emax,
		double *	rmax
	)

double dlamch_	(	SimTK_FOPT_(cmach)	,
		SimTK_FLEN_(cmach)
	)

void dlamrg_	(	int *	n1,
		int *	n2,
		double *	a,
		int *	dtrd1,
		int *	dtrd2,
		int *	index
	)

double dlangb_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		const float *	ab,
		SimTK_FDIM_(ldab)	,
		double *	work,
		SimTK_FLEN_(norm)
	)

double dlange_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const double *	a,
		SimTK_FDIM_(lda)	,
		double *	work,
		SimTK_FLEN_(norm)
	)

double dlangt_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		const double *	dl,
		const double *	d,
		const double *	du,
		SimTK_FLEN_(norm)
	)

double dlanhs_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		const double *	a,
		SimTK_FDIM_(lda)	,
		double *	work,
		SimTK_FLEN_(norm)
	)

double dlansb_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)
	)

double dlansp_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const double *	ap,
		double *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)
	)

double dlansy_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const double *	a,
		SimTK_FDIM_(lda)	,
		double *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)
	)

double dlantb_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

double dlantp_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		const double *	ap,
		double *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

double dlantr_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const double *	a,
		SimTK_FDIM_(lda)	,
		double *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void dlanv2_	(	double *	a,
		double *	b,
		double *	c__,
		double *	d__,
		double *	rt1r,
		double *	rt1i,
		double *	rt2r,
		double *	rt2i,
		double *	cs,
		double *	sn
	)

void dlapll_	(	SimTK_FDIM_(n)	,
		double *	x,
		SimTK_FINC_(x)	,
		double *	y,
		SimTK_FINC_(y)	,
		double *	ssmin
	)

void dlapmt_	(	int *	forwrd,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	x,
		int *	ldx,
		SimTK_FDIM_(k)
	)

double dlapy2_	(	const double *	x,
		const double *	y
	)

double dlapy3_	(	const double *	x,
		const double *	y,
		const double *	z
	)

void dlaqgb_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	r__,
		double *	c__,
		double *	rowcnd,
		double *	colcnd,
		double *	amax,
		char *	equed,
		SimTK_FLEN_(equed)
	)

void dlaqge_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	r__,
		double *	c__,
		double *	rowcnd,
		double *	colcnd,
		double *	amax,
		char *	equed,
		SimTK_FLEN_(equed)
	)

void dlaqp2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	offset,
		double *	a,
		SimTK_FDIM_(lda)	,
		int *	jpvt,
		double *	tau,
		double *	vn1,
		double *	vn2,
		double *	work
	)

void dlaqps_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	offset,
		int *	nb,
		int *	kb,
		double *	a,
		SimTK_FDIM_(lda)	,
		int *	jpvt,
		double *	tau,
		double *	vn1,
		double *	vn2,
		double *	auxv,
		double *	f,
		int *	ldf
	)

void dlaqsb_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	s,
		double *	scond,
		double *	amax,
		char *	equed,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equedk)
	)

void dlaqsp_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	ap,
		double *	s,
		double *	scond,
		double *	amax,
		char *	equed,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equedk)
	)

void dlaqsy_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	s,
		double *	scond,
		double *	amax,
		char *	equedk,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equedk)
	)

void dlaqtr_	(	int *	ltran,
		int *	lfloat,
		SimTK_FDIM_(n)	,
		double *	t,
		SimTK_FDIM_(ldt)	,
		double *	b,
		double *	w,
		double *	scale,
		double *	x,
		double *	work,
		SimTK_INFO_
	)

void dlar1v_	(	SimTK_FDIM_(n)	,
		int *	b1,
		int *	bn,
		double *	sigma,
		double *	d__,
		double *	l,
		double *	ld,
		double *	lld,
		double *	gersch,
		double *	z__,
		double *	ztz,
		double *	mingma,
		int *	r__,
		int *	isuppz,
		double *	work
	)

void dlar2v_	(	SimTK_FDIM_(n)	,
		double *	x,
		double *	y,
		double *	z__,
		SimTK_FINC_(x)	,
		double *	c__,
		double *	s,
		SimTK_FINC_(c)
	)

void dlarf_	(	SimTK_FOPT_(side)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	v,
		SimTK_FINC_(v)	,
		double *	tau,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	work,
		SimTK_FLEN_(side)
	)

void dlarfb_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(direct)	,
		SimTK_FOPT_(storev)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		double *	v,
		SimTK_FDIM_(ldv)	,
		double *	t,
		SimTK_FDIM_(ldt)	,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	work,
		int *	ldwork,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(direct)	,
		SimTK_FLEN_(storev)
	)

void dlarfg_	(	SimTK_FDIM_(n)	,
		const	SimTK_FSCL_double, alpha,
		double *	x,
		SimTK_FINC_(x)	,
		double *	tau
	)

void dlarft_	(	SimTK_FOPT_(direct)	,
		SimTK_FOPT_(storev)	,
		SimTK_FDIM_(n)	,
		int *	k,
		double *	v,
		SimTK_FDIM_(ldv)	,
		double *	tau,
		double *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_FLEN_(direct)	,
		SimTK_FLEN_(storev)
	)

void dlarfx_	(	SimTK_FOPT_(side)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	v,
		double *	tau,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	work,
		SimTK_FLEN_(side)
	)

void dlargv_	(	SimTK_FDIM_(n)	,
		double *	x,
		SimTK_FINC_(x)	,
		double *	y,
		SimTK_FINC_(y)	,
		double *	c__,
		SimTK_FINC_(c)
	)

void dlarnv_	(	int *	idist,
		int *	iseed,
		SimTK_FDIM_(n)	,
		double *	x
	)

void dlarrb_	(	SimTK_FDIM_(n)	,
		double *	d__,
		double *	l,
		double *	ld,
		double *	lld,
		int *	ifirst,
		int *	ilast,
		double *	sigma,
		double *	reltol,
		double *	w,
		double *	wgap,
		double *	werr,
		double *	work,
		int *	iwork,
		SimTK_INFO_
	)

void dlarre_	(	SimTK_FDIM_(n)	,
		double *	d__,
		double *	e,
		double *	tol,
		int *	nsplit,
		int *	isplit,
		SimTK_FDIM_(m)	,
		double *	w,
		double *	woff,
		double *	gersch,
		double *	work,
		SimTK_INFO_
	)

void dlarrf_	(	SimTK_FDIM_(n)	,
		double *	d__,
		double *	l,
		double *	ld,
		double *	lld,
		int *	ifirst,
		int *	ilast,
		double *	w,
		double *	dplus,
		double *	lplus,
		double *	work,
		int *	iwork,
		SimTK_INFO_
	)

void dlarrv_	(	SimTK_FDIM_(n)	,
		double *	d__,
		double *	l,
		int *	isplit,
		SimTK_FDIM_(m)	,
		double *	w,
		int *	iblock,
		double *	gersch,
		double *	tol,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		int *	isuppz,
		double *	work,
		int *	iwork,
		SimTK_INFO_
	)

void dlartg_	(	double *	f,
		double *	g,
		double *	cs,
		double *	sn,
		double *	r__
	)

void dlartv_	(	SimTK_FDIM_(n)	,
		double *	x,
		SimTK_FINC_(x)	,
		double *	y,
		SimTK_FINC_(y)	,
		double *	c__,
		double *	s,
		int *	incc
	)

void dlaruv_	(	int *	iseed,
		SimTK_FDIM_(n)	,
		double *	x
	)

void dlarz_	(	SimTK_FOPT_(side)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	l,
		double *	v,
		SimTK_FINC_(v)	,
		double *	tau,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	work,
		SimTK_FLEN_(side)
	)

void dlarzb_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(direct)	,
		SimTK_FOPT_(storev)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		int *	l,
		double *	v,
		SimTK_FDIM_(ldv)	,
		double *	t,
		SimTK_FDIM_(ldt)	,
		double *	c__,
		int *	ldc,
		double *	work,
		int *	ldwork,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(direct)	,
		SimTK_FLEN_(storev)
	)

void dlarzt_	(	SimTK_FOPT_(direct)	,
		SimTK_FOPT_(storev)	,
		SimTK_FDIM_(n)	,
		int *	k,
		double *	v,
		SimTK_FDIM_(ldv)	,
		double *	tau,
		double *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_FLEN_(direct)	,
		SimTK_FLEN_(storev)
	)

void dlas2_	(	double *	f,
		double *	g,
		double *	h__,
		double *	ssmin,
		double *	ssmax
	)

void dlascl_	(	char *	type__,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		double *	cfrom,
		double *	cto,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(type)
	)

void dlasd0_	(	SimTK_FDIM_(n)	,
		int *	sqre,
		double *	d__,
		double *	e,
		double *	u,
		SimTK_FDIM_(ldu)	,
		double *	vt,
		SimTK_FDIM_(ldvt)	,
		int *	smlsiz,
		int *	iwork,
		double *	work,
		SimTK_INFO_
	)

void dlasd1_	(	int *	nl,
		int *	nr,
		int *	sqre,
		double *	d__,
		const	SimTK_FSCL_double, alpha,
		const	SimTK_FSCL_double, beta,
		double *	u,
		SimTK_FDIM_(ldu)	,
		double *	vt,
		SimTK_FDIM_(ldvt)	,
		int *	idxq,
		int *	iwork,
		double *	work,
		SimTK_INFO_
	)

void dlasd2_	(	int *	nl,
		int *	nr,
		int *	sqre,
		int *	k,
		double *	d__,
		double *	z__,
		const	SimTK_FSCL_double, alpha,
		double *	beta,
		double *	u,
		SimTK_FDIM_(ldu)	,
		double *	vt,
		SimTK_FDIM_(ldvt)	,
		double *	dsigma,
		double *	u2,
		int *	ldu2,
		double *	vt2,
		int *	ldvt2,
		int *	idxp,
		int *	idx,
		int *	idxc,
		int *	idxq,
		int *	coltyp,
		SimTK_INFO_
	)

void dlasd3_	(	int *	nl,
		int *	nr,
		int *	sqre,
		int *	k,
		double *	d__,
		double *	q,
		SimTK_FDIM_(ldq)	,
		double *	dsigma,
		double *	u,
		SimTK_FDIM_(ldu)	,
		double *	u2,
		int *	ldu2,
		double *	vt,
		SimTK_FDIM_(ldvt)	,
		double *	vt2,
		int *	ldvt2,
		int *	idxc,
		int *	ctot,
		double *	z__,
		SimTK_INFO_
	)

void dlasd4_	(	SimTK_FDIM_(n)	,
		int *	i__,
		double *	d__,
		double *	z__,
		double *	delta,
		double *	rho,
		double *	sigma,
		double *	work,
		SimTK_INFO_
	)

void dlasd5_	(	int *	i__,
		double *	d__,
		double *	z__,
		double *	delta,
		double *	rho,
		double *	dsigma,
		double *	work
	)

void dlasd6_	(	int *	icompq,
		int *	nl,
		int *	nr,
		int *	sqre,
		double *	d__,
		double *	vf,
		double *	vl,
		const	SimTK_FSCL_double, alpha,
		const	SimTK_FSCL_double, beta,
		int *	idxq,
		int *	perm,
		int *	givptr,
		int *	givcol,
		int *	ldgcol,
		double *	givnum,
		int *	ldgnum,
		double *	poles,
		double *	difl,
		double *	difr,
		double *	z__,
		SimTK_FDIM_(k)	,
		double *	c__,
		double *	s,
		double *	work,
		int *	iwork,
		SimTK_INFO_
	)

void dlasd7_	(	int *	icompq,
		int *	nl,
		int *	nr,
		int *	sqre,
		SimTK_FDIM_(k)	,
		double *	d__,
		double *	z__,
		double *	zw,
		double *	vf,
		double *	vfw,
		double *	vl,
		double *	vlw,
		const	SimTK_FSCL_double, alpha,
		const	SimTK_FSCL_double, beta,
		double *	dsigma,
		int *	idx,
		int *	idxp,
		int *	idxq,
		int *	perm,
		int *	givptr,
		int *	givcol,
		int *	ldgcol,
		double *	givnum,
		int *	ldgnum,
		double *	c__,
		double *	s,
		SimTK_INFO_
	)

void dlasd8_	(	int *	icompq,
		SimTK_FDIM_(k)	,
		double *	d__,
		double *	z__,
		double *	vf,
		double *	vl,
		double *	difl,
		double *	difr,
		int *	lddifr,
		double *	dsigma,
		double *	work,
		SimTK_INFO_
	)

void dlasd9_	(	int *	icompq,
		SimTK_FDIM_(ldu)	,
		SimTK_FDIM_(k)	,
		double *	d__,
		double *	z__,
		double *	vf,
		double *	vl,
		double *	difl,
		double *	difr,
		double *	dsigma,
		double *	work,
		SimTK_INFO_
	)

void dlasda_	(	int *	icompq,
		int *	smlsiz,
		SimTK_FDIM_(n)	,
		int *	sqre,
		double *	d__,
		double *	e,
		double *	u,
		SimTK_FDIM_(ldu)	,
		double *	vt,
		SimTK_FDIM_(k)	,
		double *	difl,
		double *	difr,
		double *	z__,
		double *	poles,
		int *	givptr,
		int *	givcol,
		int *	ldgcol,
		int *	perm,
		double *	givnum,
		double *	c__,
		double *	s,
		double *	work,
		int *	iwork,
		SimTK_INFO_
	)

void dlasdq_	(	SimTK_FOPT_(uplo)	,
		int *	sqre,
		SimTK_FDIM_(n)	,
		int *	ncvt,
		int *	nru,
		int *	ncc,
		double *	d__,
		double *	e,
		double *	vt,
		SimTK_FDIM_(ldvt)	,
		double *	u,
		SimTK_FDIM_(ldu)	,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dlasdt_	(	SimTK_FDIM_(n)	,
		int *	lvl,
		int *	nd,
		int *	inode,
		int *	ndiml,
		int *	ndimr,
		int *	msub
	)

void dlaset_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	alpha,
		const	SimTK_FSCL_double, beta,
		double *	a,
		SimTK_FDIM_(lda)	,
		SimTK_FLEN_(uplo)
	)

void dlasq1_	(	SimTK_FDIM_(n)	,
		double *	d__,
		double *	e,
		double *	work,
		SimTK_INFO_
	)

void dlasq2_	(	SimTK_FDIM_(n)	,
		double *	z__,
		SimTK_INFO_
	)

void dlasq3_	(	int *	i0,
		int *	n0,
		double *	z__,
		int *	pp,
		double *	dmin__,
		double *	sigma,
		double *	desig,
		double *	qmax,
		int *	nfail,
		int *	iter,
		int *	ndiv,
		int *	ieee,
		int *	ttype,
		double *	dmin1,
		double *	dmin2,
		double *	dn,
		double *	dn1,
		double *	dn2,
		double *	tau
	)

void dlasq4_	(	int *	i0,
		int *	n0,
		double *	z__,
		int *	pp,
		int *	n0in,
		double *	dmin__,
		double *	dmin1,
		double *	dmin2,
		double *	dn,
		double *	dn1,
		double *	dn2,
		double *	tau,
		int *	ttype,
		double *	g
	)

void dlasq5_	(	int *	i0,
		int *	n0,
		double *	z__,
		int *	pp,
		double *	tau,
		double *	dmin__,
		double *	dmin1,
		double *	dmin2,
		double *	dn,
		double *	dnm1,
		double *	dnm2,
		int *	ieee
	)

void dlasq6_	(	int *	i0,
		int *	n0,
		double *	z__,
		int *	pp,
		double *	dmin__,
		double *	dmin1,
		double *	dmin2,
		double *	dn,
		double *	dnm1,
		double *	dnm2
	)

void dlasr_	(	SimTK_FOPT_(side)	,
		char *	pivot,
		SimTK_FOPT_(direct)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	c__,
		double *	s,
		double *	a,
		SimTK_FDIM_(lda)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(pivot)	,
		SimTK_FLEN_(direct)
	)

void dlasrt_	(	char *	id,
		SimTK_FDIM_(n)	,
		double *	d__,
		SimTK_INFO_	,
		SimTK_FLEN_(id)
	)

void dlassq_	(	SimTK_FDIM_(n)	,
		double *	x,
		SimTK_FINC_(x)	,
		double *	scale,
		double *	sumsq
	)

void dlasv2_	(	double *	f,
		double *	g,
		double *	h__,
		double *	ssmin,
		double *	ssmax,
		double *	snr,
		double *	csr,
		double *	snl,
		double *	csl
	)

void dlaswp_	(	SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		int *	k1,
		int *	k2,
		int *	ipiv,
		SimTK_FINC_(x)
	)

void dlasy2_	(	int *	ltranl,
		int *	ltranr,
		int *	isgn,
		int *	n1,
		int *	n2,
		double *	tl,
		int *	ldtl,
		double *	tr,
		int *	ldtr,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	scale,
		double *	x,
		int *	ldx,
		double *	xnorm,
		SimTK_INFO_
	)

void dlasyf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	nb,
		int *	kb,
		double *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		double *	w,
		int *	ldw,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dlatbs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		char *	normin,
		SimTK_FDIM_(n)	,
		int *	kd,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	x,
		double *	scale,
		double *	cnorm,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)	,
		SimTK_FLEN_(normin)
	)

void dlatdf_	(	int *	ijob,
		SimTK_FDIM_(n)	,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	rhs,
		double *	rdsum,
		double *	rdscal,
		int *	ipiv,
		int *	jpiv
	)

void dlatps_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		char *	normin,
		SimTK_FDIM_(n)	,
		double *	ap,
		double *	x,
		double *	scale,
		double *	cnorm,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)	,
		SimTK_FLEN_(normin)
	)

void dlatrd_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	nb,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	e,
		double *	tau,
		double *	w,
		int *	ldw,
		SimTK_FLEN_(uplo)
	)

void dlatrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		char *	normin,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	x,
		double *	scale,
		double *	cnorm,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void dlatrz_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	l,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work
	)

void dlatzm_	(	SimTK_FOPT_(side)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	v,
		SimTK_FINC_(v)	,
		double *	tau,
		double *	c1,
		double *	c2,
		SimTK_FDIM_(ldc)	,
		double *	work,
		SimTK_FLEN_(side)
	)

void dlauu2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dlauum_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

double dnrm2_	(	SimTK_FDIM_(n)	,
		const double *	x,
		SimTK_FINC_(x)
	)

void dopgtr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	ap,
		double *	tau,
		double *	q,
		SimTK_FDIM_(ldq)	,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dopmtr_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	ap,
		double *	tau,
		double *	c__,
		int *	ldc,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)
	)

void dorg2l_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_INFO_
	)

void dorg2r_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_INFO_
	)

void dorgbr_	(	SimTK_FOPT_(vect)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(vect)
	)

void dorghr_	(	SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dorgl2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_INFO_
	)

void dorglq_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dorgql_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dorgqr_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dorgr2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_INFO_
	)

void dorgrq_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dorgtr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dorm2l_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void dorm2r_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void dormbr_	(	SimTK_FOPT_(vect)	,
		SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(vect)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void dormhr_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void dorml2_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void dormlq_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void dormql_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void dormqr_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void dormr2_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void dormr3_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		int *	l,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void dormrq_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void dormrz_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		int *	l,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void dormtr_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)
	)

void dpbcon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	anorm,
		double *	rcond,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dpbequ_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	s,
		double *	scond,
		double *	amax,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dpbrfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	afb,
		SimTK_FDIM_(ldafb)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dpbstf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dpbsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dpbsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	afb,
		SimTK_FDIM_(ldafb)	,
		char *	equed,
		double *	s,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void dpbtf2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_INFO_
	)

void dpbtrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dpbtrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dpocon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	anorm,
		double *	rcond,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dpoequ_	(	SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	s,
		double *	scond,
		double *	amax,
		SimTK_INFO_
	)

void dporfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	af,
		int *	ldaf,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dposv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dposvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	af,
		int *	ldaf,
		char *	equed,
		double *	s,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void dpotf2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dpotrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dpotri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dpotrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dppcon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	ap,
		double *	anorm,
		double *	rcond,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dppequ_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	ap,
		double *	s,
		double *	scond,
		double *	amax,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dpprfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	ap,
		double *	afp,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dppsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	ap,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dppsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	ap,
		double *	afp,
		char *	equed,
		double *	s,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void dpptrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	ap,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dpptri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	ap,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dpptrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	ap,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dptcon_	(	SimTK_FDIM_(n)	,
		double *	d__,
		double *	e,
		double *	anorm,
		double *	rcond,
		double *	work,
		SimTK_INFO_
	)

void dpteqr_	(	SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		double *	d__,
		double *	e,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(compz)
	)

void dptrfs_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	d__,
		double *	e,
		double *	df,
		double *	ef,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		double *	work,
		SimTK_INFO_
	)

void dptsv_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	d__,
		double *	e,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_
	)

void dptsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	d__,
		double *	e,
		double *	df,
		double *	ef,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)
	)

void dpttrf_	(	SimTK_FDIM_(n)	,
		double *	d__,
		double *	e,
		SimTK_INFO_
	)

void dpttrs_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	d__,
		double *	e,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_
	)

void dptts2_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	d__,
		double *	e,
		double *	b,
		SimTK_FDIM_(ldb)
	)

void drot_	(	SimTK_FDIM_(n)	,
		double *	x,
		SimTK_FINC_(x)	,
		double *	y,
		SimTK_FINC_(y)	,
		const	SimTK_FSCL_double, c,
		const	SimTK_FSCL_double, s
	)

void drotg_	(	SimTK_FSCL_(double, a)	,
		SimTK_FSCL_(double, b)	,
		SimTK_FSCL_(double, c)	,
		SimTK_FSCL_(double, s)
	)

void drotm_	(	SimTK_FDIM_(n)	,
		double *	x,
		SimTK_FINC_(x)	,
		double *	y,
		SimTK_FINC_(y)	,
		const double	P[5]
	)

void drotmg_	(	SimTK_FSCL_(double, d1)	,
		SimTK_FSCL_(double, d2)	,
		SimTK_FSCL_(double, b1)	,
		SimTK_FSCL_(double, b2)	,
		double	P[5]
	)

void drscl_	(	SimTK_FDIM_(n)	,
		double *	sa,
		double *	sx,
		SimTK_FINC_(x)
	)

void dsbev_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	w,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void dsbevd_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	w,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void dsbevx_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	q,
		SimTK_FDIM_(ldq)	,
		double *	vl,
		double *	vu,
		int *	il,
		int *	iu,
		double *	abstol,
		SimTK_FDIM_(m)	,
		double *	w,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void dsbgst_	(	SimTK_FOPT_(vect)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	ka,
		int *	kb,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	bb,
		int *	ldbb,
		double *	x,
		int *	ldx,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(vect)	,
		SimTK_FLEN_(uplo)
	)

void dsbgv_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	ka,
		int *	kb,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	bb,
		int *	ldbb,
		double *	w,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void dsbgvd_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	ka,
		int *	kb,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	bb,
		int *	ldbb,
		double *	w,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void dsbgvx_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	ka,
		int *	kb,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	bb,
		int *	ldbb,
		double *	q,
		SimTK_FDIM_(ldq)	,
		double *	vl,
		double *	vu,
		int *	il,
		int *	iu,
		double *	abstol,
		SimTK_FDIM_(m)	,
		double *	w,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void dsbmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const	SimTK_FSCL_double, alpha,
		const double *	A,
		SimTK_FDIM_(lda)	,
		const double *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_double, beta,
		double *	y,
		SimTK_FINC_(y)	,
		SimTK_FLEN_(uplo)
	)

void dsbtrd_	(	SimTK_FOPT_(vect)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	d__,
		double *	e,
		double *	q,
		SimTK_FDIM_(ldq)	,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(vect)	,
		SimTK_FLEN_(uplo)
	)

void dscal_	(	SimTK_FDIM_(n)	,
		const	SimTK_FSCL_double, alpha,
		double *	x,
		SimTK_FINC_(x)
	)

double dsdot_	(	SimTK_FDIM_(n)	,
		const float *	x,
		SimTK_FINC_(x)	,
		const float *	y,
		SimTK_FINC_(y)
	)

void dspcon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	ap,
		int *	ipiv,
		double *	anorm,
		double *	rcond,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dspev_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	ap,
		double *	w,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void dspevd_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	ap,
		double *	w,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void dspevx_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	ap,
		double *	vl,
		double *	vu,
		int *	il,
		int *	iu,
		double *	abstol,
		SimTK_FDIM_(m)	,
		double *	w,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void dspgst_	(	int *	itype,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	ap,
		double *	bp,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dspgv_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	ap,
		double *	bp,
		double *	w,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void dspgvd_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	ap,
		double *	bp,
		double *	w,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void dspgvx_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	ap,
		double *	bp,
		double *	vl,
		double *	vu,
		int *	il,
		int *	iu,
		double *	abstol,
		SimTK_FDIM_(m)	,
		double *	w,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void dspmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_double, alpha,
		const double *	Ap,
		const double *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_double, beta,
		double *	y,
		SimTK_FINC_(y)	,
		SimTK_FLEN_(uplo)
	)

void dspr2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_double, alpha,
		const double *	x,
		SimTK_FINC_(x)	,
		const double *	y,
		SimTK_FINC_(y)	,
		double *	A,
		SimTK_FLEN_(uplo)
	)

void dspr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_double, alpha,
		const double *	x,
		SimTK_FINC_(x)	,
		double *	Ap,
		SimTK_FLEN_(uplo)
	)

void dsprfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	ap,
		double *	afp,
		int *	ipiv,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dspsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	ap,
		int *	ipiv,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dspsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	ap,
		double *	afp,
		int *	ipiv,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(face)	,
		SimTK_FLEN_(uplo)
	)

void dsptrd_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	ap,
		double *	d__,
		double *	e,
		double *	tau,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dsptrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	ap,
		int *	ipiv,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dsptri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	ap,
		int *	ipiv,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dsptrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	ap,
		int *	ipiv,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dstebz_	(	SimTK_FOPT_(range)	,
		char *	order,
		SimTK_FDIM_(n)	,
		double *	vl,
		double *	vu,
		int *	il,
		int *	iu,
		double *	abstol,
		double *	d__,
		double *	e,
		SimTK_FDIM_(m)	,
		int *	nsplit,
		double *	w,
		int *	iblock,
		int *	isplit,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(order)
	)

void dstedc_	(	SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		double *	d__,
		double *	e,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(compz)
	)

void dstegr_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FDIM_(n)	,
		double *	d__,
		double *	e,
		double *	vl,
		double *	vu,
		int *	il,
		int *	iu,
		double *	abstol,
		SimTK_FDIM_(m)	,
		double *	w,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		int *	isuppz,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)
	)

void dstein_	(	SimTK_FDIM_(n)	,
		double *	d__,
		double *	e,
		SimTK_FDIM_(m)	,
		double *	w,
		int *	iblock,
		int *	isplit,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_
	)

void dsteqr_	(	SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		double *	d__,
		double *	e,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(compz)
	)

void dsterf_	(	SimTK_FDIM_(n)	,
		double *	d__,
		double *	e,
		SimTK_INFO_
	)

void dstev_	(	SimTK_FOPT_(jobz)	,
		SimTK_FDIM_(n)	,
		double *	d__,
		double *	e,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)
	)

void dstevd_	(	SimTK_FOPT_(jobz)	,
		SimTK_FDIM_(n)	,
		double *	d__,
		double *	e,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)
	)

void dstevr_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FDIM_(n)	,
		double *	d__,
		double *	e,
		double *	vl,
		double *	vu,
		int *	il,
		int *	iu,
		double *	abstol,
		SimTK_FDIM_(m)	,
		double *	w,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		int *	isuppz,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)
	)

void dstevx_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FDIM_(n)	,
		double *	d__,
		double *	e,
		double *	vl,
		double *	vu,
		int *	il,
		int *	iu,
		double *	abstol,
		SimTK_FDIM_(m)	,
		double *	w,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)
	)

void dswap_	(	SimTK_FDIM_(n)	,
		double *	x,
		SimTK_FINC_(x)	,
		double *	y,
		SimTK_FINC_(y)
	)

void dsycon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		double *	anorm,
		double *	rcond,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dsyev_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	w,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void dsyevd_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	w,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void dsyevr_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	vl,
		double *	vu,
		int *	il,
		int *	iu,
		double *	abstol,
		SimTK_FDIM_(m)	,
		double *	w,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		int *	isuppz,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void dsyevx_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	vl,
		double *	vu,
		int *	il,
		int *	iu,
		double *	abstol,
		SimTK_FDIM_(m)	,
		double *	w,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void dsygs2_	(	int *	itype,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dsygst_	(	int *	itype,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dsygv_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	w,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void dsygvd_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	w,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void dsygvx_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	vl,
		double *	vu,
		int *	il,
		int *	iu,
		double *	abstol,
		SimTK_FDIM_(m)	,
		double *	w,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void dsymm_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_double, alpha,
		const double *	A,
		SimTK_FDIM_(lda)	,
		const double *	B,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_double, beta,
		double *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)
	)

void dsymv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_double, alpha,
		const double *	A,
		SimTK_FDIM_(lda)	,
		const double *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_double, beta,
		double *	y,
		SimTK_FINC_(y)	,
		SimTK_FLEN_(uplo)
	)

void dsyr2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_double, alpha,
		const double *	x,
		SimTK_FINC_(x)	,
		const double *	y,
		SimTK_FINC_(y)	,
		double *	A,
		SimTK_FDIM_(lda)	,
		SimTK_FLEN_(uplo)
	)

void dsyr2k_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const	SimTK_FSCL_double, alpha,
		const double *	A,
		SimTK_FDIM_(lda)	,
		const double *	B,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_double, beta,
		double *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)
	)

void dsyr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_double, alpha,
		const double *	x,
		SimTK_FINC_(x)	,
		double *	A,
		SimTK_FDIM_(lda)	,
		SimTK_FLEN_(uplo)
	)

void dsyrfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	af,
		int *	ldaf,
		int *	ipiv,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dsyrk_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const	SimTK_FSCL_double, alpha,
		const double *	A,
		SimTK_FDIM_(lda)	,
		const	SimTK_FSCL_double, beta,
		double *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)
	)

void dsysv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dsysvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	af,
		int *	ldaf,
		int *	ipiv,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)
	)

void dsytd2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	d__,
		double *	e,
		double *	tau,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dsytf2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dsytrd_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	d__,
		double *	e,
		double *	tau,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dsytrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dsytri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dsytrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void dtbcon_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	rcond,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void dtbmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const double *	A,
		SimTK_FDIM_(lda)	,
		double *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void dtbrfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void dtbsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const double *	A,
		SimTK_FDIM_(lda)	,
		double *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void dtbtrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		double *	ab,
		SimTK_FDIM_(ldab)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void dtgevc_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(howmny)	,
		int *	select,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	vl,
		SimTK_FDIM_(ldvl)	,
		double *	vr,
		SimTK_FDIM_(ldvr)	,
		int *	mm,
		SimTK_FDIM_(m)	,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(howmny)
	)

void dtgex2_	(	int *	wantq,
		int *	wantz,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	q,
		SimTK_FDIM_(ldq)	,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		int *	j1,
		int *	n1,
		int *	n2,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dtgexc_	(	int *	wantq,
		int *	wantz,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	q,
		SimTK_FDIM_(ldq)	,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		int *	ifst,
		int *	ilst,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void dtgsen_	(	int *	ijob,
		int *	wantq,
		int *	wantz,
		int *	select,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	alphar,
		double *	alphai,
		double *	beta,
		double *	q,
		SimTK_FDIM_(ldq)	,
		double *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_FDIM_(m)	,
		double *	pl,
		double *	pr,
		double *	dif,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_
	)

void dtgsja_	(	SimTK_FOPT_(jobu)	,
		SimTK_FOPT_(jobv)	,
		SimTK_FOPT_(jobq)	,
		SimTK_FDIM_(m)	,
		int *	p,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		int *	l,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	tola,
		double *	tolb,
		const	SimTK_FSCL_double, alpha,
		const	SimTK_FSCL_double, beta,
		double *	u,
		SimTK_FDIM_(ldu)	,
		double *	v,
		SimTK_FDIM_(ldv)	,
		double *	q,
		SimTK_FDIM_(ldq)	,
		double *	work,
		int *	ncycle,
		SimTK_INFO_	,
		SimTK_FLEN_(jobu)	,
		SimTK_FLEN_(jobv)	,
		SimTK_FLEN_(jobq)
	)

void dtgsna_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(howmny)	,
		int *	select,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	vl,
		SimTK_FDIM_(ldvl)	,
		double *	vr,
		SimTK_FDIM_(ldvr)	,
		double *	s,
		double *	dif,
		int *	mm,
		SimTK_FDIM_(m)	,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(howmny)
	)

void dtgsy2_	(	SimTK_FOPT_(trans)	,
		int *	ijob,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	d__,
		int *	ldd,
		double *	e,
		int *	lde,
		double *	f,
		int *	ldf,
		double *	scale,
		double *	rdsum,
		double *	rdscal,
		int *	iwork,
		int *	pq,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void dtgsyl_	(	SimTK_FOPT_(trans)	,
		int *	ijob,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	d__,
		int *	ldd,
		double *	e,
		int *	lde,
		double *	f,
		int *	ldf,
		double *	scale,
		double *	dif,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void dtpcon_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		double *	ap,
		double *	rcond,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void dtpmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		const double *	Ap,
		double *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void dtprfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	ap,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void dtpsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		const double *	Ap,
		double *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void dtptri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		double *	ap,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void dtptrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	ap,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void dtrcon_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	rcond,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void dtrevc_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(howmny)	,
		int *	select,
		SimTK_FDIM_(n)	,
		double *	t,
		SimTK_FDIM_(ldt)	,
		double *	vl,
		SimTK_FDIM_(ldvl)	,
		double *	vr,
		SimTK_FDIM_(ldvr)	,
		int *	mm,
		SimTK_FDIM_(m)	,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(howmny)
	)

void dtrexc_	(	SimTK_FOPT_(compq)	,
		SimTK_FDIM_(n)	,
		double *	t,
		SimTK_FDIM_(ldt)	,
		double *	q,
		SimTK_FDIM_(ldq)	,
		int *	ifst,
		int *	ilst,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(compq)
	)

void dtrmm_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_double, alpha,
		const double *	A,
		SimTK_FDIM_(lda)	,
		double *	B,
		SimTK_FDIM_(ldb)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void dtrmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		const double *	A,
		SimTK_FDIM_(lda)	,
		double *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void dtrrfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		double *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void dtrsen_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(compq)	,
		int *	select,
		SimTK_FDIM_(n)	,
		double *	t,
		SimTK_FDIM_(ldt)	,
		double *	q,
		SimTK_FDIM_(ldq)	,
		double *	wr,
		double *	wi,
		SimTK_FDIM_(m)	,
		double *	s,
		double *	sep,
		double *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(compq)
	)

void dtrsm_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_double, alpha,
		const double *	A,
		SimTK_FDIM_(lda)	,
		double *	B,
		SimTK_FDIM_(ldb)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void dtrsna_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(howmny)	,
		int *	select,
		SimTK_FDIM_(n)	,
		double *	t,
		SimTK_FDIM_(ldt)	,
		double *	vl,
		SimTK_FDIM_(ldvl)	,
		double *	vr,
		SimTK_FDIM_(ldvr)	,
		double *	s,
		double *	sep,
		int *	mm,
		SimTK_FDIM_(m)	,
		double *	work,
		int *	ldwork,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(howmny)
	)

void dtrsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		const double *	A,
		SimTK_FDIM_(lda)	,
		double *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void dtrsyl_	(	SimTK_FOPT_(trana)	,
		SimTK_FOPT_(tranb)	,
		int *	isgn,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		double *	c__,
		SimTK_FDIM_(ldc)	,
		double *	scale,
		SimTK_INFO_	,
		SimTK_FLEN_(trana)	,
		SimTK_FLEN_(tranb)
	)

void dtrti2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void dtrtri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)
	)

void dtrtrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void dtzrqf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		SimTK_INFO_
	)

void dtzrzf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		double *	tau,
		double *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

double dzasum_	(	SimTK_FDIM_(n)	,
		const SimTK_Z_ *	x,
		SimTK_FINC_(x)
	)

double dznrm2_	(	SimTK_FDIM_(n)	,
		const SimTK_Z_ *	x,
		SimTK_FINC_(x)
	)

int icamax_	(	SimTK_FDIM_(n)	,
		const SimTK_C_ *	x,
		SimTK_FINC_(x)
	)

int icmax1_	(	SimTK_FDIM_(n)	,
		SimTK_C_ *	cx,
		SimTK_FINC_(x)
	)

int idamax_	(	SimTK_FDIM_(n)	,
		const double *	x,
		SimTK_FINC_(x)
	)

int ieeeck_	(	int *	ispec,
		float *	zero,
		float *	one
	)

int ilaenv_	(	int *	ispec,
		const char *	name__,
		const char *	opts,
		int *	n1,
		int *	n2,
		int *	n3,
		int *	n4,
		SimTK_FLEN_(name)	,
		SimTK_FLEN_(opts)
	)

int isamax_	(	SimTK_FDIM_(n)	,
		const float *	x,
		SimTK_FINC_(x)
	)

int izamax_	(	SimTK_FDIM_(n)	,
		const SimTK_Z_ *	x,
		SimTK_FINC_(x)
	)

int izmax1_	(	SimTK_FDIM_(n)	,
		SimTK_Z_ *	cx,
		SimTK_FINC_(x)
	)

float sasum_	(	SimTK_FDIM_(n)	,
		const float *	x,
		SimTK_FINC_(x)
	)

void saxpy_	(	SimTK_FDIM_(n)	,
		const	SimTK_FSCL_float, alpha,
		const float *	x,
		SimTK_FINC_(x)	,
		float *	y,
		SimTK_FINC_(y)
	)

void sbdsdc_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(compq)	,
		SimTK_FDIM_(n)	,
		float *	d__,
		float *	e,
		float *	u,
		SimTK_FDIM_(ldu)	,
		float *	vt,
		SimTK_FDIM_(ldvt)	,
		float *	q,
		int *	iq,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(compq)
	)

void sbdsqr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	ncvt,
		int *	nru,
		int *	ncc,
		float *	d__,
		float *	e,
		float *	vt,
		SimTK_FDIM_(ldvt)	,
		float *	u,
		SimTK_FDIM_(ldu)	,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

float scasum_	(	SimTK_FDIM_(n)	,
		const SimTK_C_ *	x,
		SimTK_FINC_(x)
	)

float scnrm2_	(	SimTK_FDIM_(n)	,
		const SimTK_C_ *	x,
		SimTK_FINC_(x)
	)

void scopy_	(	SimTK_FDIM_(n)	,
		const float *	x,
		SimTK_FINC_(x)	,
		float *	y,
		SimTK_FINC_(y)
	)

void sdisna_	(	SimTK_FOPT_(job)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	d__,
		float *	sep,
		SimTK_INFO_	,
		SimTK_FLEN_(job)
	)

float sdot_	(	SimTK_FDIM_(n)	,
		const float *	x,
		SimTK_FINC_(x)	,
		const float *	y,
		SimTK_FINC_(y)
	)

float sdsdot_	(	SimTK_FDIM_(n)	,
		const	SimTK_FSCL_float, alpha,
		const float *	x,
		SimTK_FINC_(x)	,
		const float *	y,
		SimTK_FINC_(y)
	)

void sgbbrd_	(	SimTK_FOPT_(vect)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	ncc,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	d__,
		float *	e,
		float *	q,
		SimTK_FDIM_(ldq)	,
		float *	pt,
		int *	ldpt,
		float *	c__,
		int *	ldc,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(vect)
	)

void sgbcon_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		int *	ipiv,
		float *	anorm,
		float *	rcond,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)
	)

void sgbequ_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	r__,
		float *	c__,
		float *	rowcnd,
		float *	colcnd,
		float *	amax,
		SimTK_INFO_
	)

void sgbmv_	(	SimTK_FOPT_(transA)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		const	SimTK_FSCL_float, alpha,
		const float *	A,
		SimTK_FDIM_(lda)	,
		const float *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_float, beta,
		float *	Y,
		SimTK_FINC_(Y)	,
		SimTK_FLEN_(transA)
	)

void sgbrfs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_FDIM_(nrhs)	,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	afb,
		SimTK_FDIM_(ldafb)	,
		int *	ipiv,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void sgbsv_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_FDIM_(nrhs)	,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		int *	ipiv,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_
	)

void sgbsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_FDIM_(nrhs)	,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	afb,
		SimTK_FDIM_(ldafb)	,
		int *	ipiv,
		char *	equed,
		float *	r__,
		float *	c__,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(equed)
	)

void sgbtf2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		int *	ipiv,
		SimTK_INFO_
	)

void sgbtrf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		int *	ipiv,
		SimTK_INFO_
	)

void sgbtrs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_FDIM_(nrhs)	,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		int *	ipiv,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void sgebak_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(side)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		float *	scale,
		SimTK_FDIM_(m)	,
		float *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(side)
	)

void sgebal_	(	SimTK_FOPT_(job)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		int *	ilo,
		int *	ihi,
		float *	scale,
		SimTK_INFO_	,
		SimTK_FLEN_(job)
	)

void sgebd2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	d__,
		float *	e,
		float *	tauq,
		float *	taup,
		float *	work,
		SimTK_INFO_
	)

void sgebrd_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	d__,
		float *	e,
		float *	tauq,
		float *	taup,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void sgecon_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	anorm,
		float *	rcond,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)
	)

void sgeequ_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	r__,
		float *	c__,
		float *	rowcnd,
		float *	colcnd,
		float *	amax,
		int *	info
	)

void sgees_	(	SimTK_FOPT_(jobvs)	,
		SimTK_FOPT_(sort)	,
		SimTK_SELECT_2S	select,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		int *	sdim,
		float *	wr,
		float *	wi,
		float *	vs,
		SimTK_FDIM_(ldvs)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	bwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvs)	,
		SimTK_FLEN_(sort)
	)

void sgeesx_	(	SimTK_FOPT_(jobvs)	,
		SimTK_FOPT_(sort)	,
		SimTK_SELECT_2S	select,
		char *	sense,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		int *	sdim,
		float *	wr,
		float *	wi,
		float *	vs,
		SimTK_FDIM_(ldvs)	,
		float *	rconde,
		float *	rcondv,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		int *	bwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvs)	,
		SimTK_FLEN_(sort)	,
		SimTK_FLEN_(sense)
	)

void sgeev_	(	SimTK_FOPT_(jobvl)	,
		SimTK_FOPT_(jobvr)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	wr,
		float *	wi,
		float *	vl,
		SimTK_FDIM_(ldvl)	,
		float *	vr,
		SimTK_FDIM_(ldvr)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvl)	,
		SimTK_FLEN_(jobvr)
	)

void sgeevx_	(	SimTK_FOPT_(balanc)	,
		SimTK_FOPT_(jobvl)	,
		SimTK_FOPT_(jobvr)	,
		char *	sense,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	wr,
		float *	wi,
		float *	vl,
		SimTK_FDIM_(ldvl)	,
		float *	vr,
		SimTK_FDIM_(ldvr)	,
		int *	ilo,
		int *	ihi,
		float *	scale,
		float *	abnrm,
		float *	rconde,
		float *	rcondv,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(balanc)	,
		SimTK_FLEN_(jobvl)	,
		SimTK_FLEN_(jobvr)	,
		SimTK_FLEN_(alpahr)
	)

void sgegs_	(	SimTK_FOPT_(jobvsl)	,
		SimTK_FOPT_(jobvsr)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	alphar,
		float *	alphai,
		float *	beta,
		float *	vsl,
		int *	ldvsl,
		float *	vsr,
		int *	ldvsr,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvl)	,
		SimTK_FLEN_(jobvsr)
	)

void sgegv_	(	SimTK_FOPT_(jobvl)	,
		SimTK_FOPT_(jobvr)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	alphar,
		float *	alphai,
		float *	beta,
		float *	vl,
		SimTK_FDIM_(ldvl)	,
		float *	vr,
		SimTK_FDIM_(ldvr)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvl)	,
		SimTK_FLEN_(jobvr)
	)

void sgehd2_	(	SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_INFO_
	)

void sgehrd_	(	SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void sgelq2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_INFO_
	)

void sgelqf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void sgels_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void sgelsd_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	s,
		float *	rcond,
		int *	rank,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		SimTK_INFO_
	)

void sgelss_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	s,
		float *	rcond,
		int *	rank,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void sgelsx_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		int *	jpvt,
		float *	rcond,
		int *	rank,
		float *	work,
		SimTK_INFO_
	)

void sgelsy_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		int *	jpvt,
		float *	rcond,
		int *	rank,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void sgemm_	(	SimTK_FOPT_(transA)	,
		SimTK_FOPT_(transB)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const	SimTK_FSCL_float, alpha,
		const float *	A,
		SimTK_FDIM_(lda)	,
		const float *	B,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_float, beta,
		float *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(transB)
	)

void sgemv_	(	SimTK_FOPT_(transA)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_float, alpha,
		const float *	A,
		SimTK_FDIM_(lda)	,
		const float *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_float, beta,
		float *	Y,
		SimTK_FINC_(Y)	,
		SimTK_FLEN_(transA)
	)

void sgeql2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_INFO_
	)

void sgeqlf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void sgeqp3_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		int *	jpvt,
		float *	tau,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void sgeqpf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		int *	jpvt,
		float *	tau,
		float *	work,
		SimTK_INFO_
	)

void sgeqr2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_INFO_
	)

void sgeqrf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void sger_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_float, alpha,
		const float *	x,
		SimTK_FINC_(x)	,
		const float *	y,
		SimTK_FINC_(y)	,
		float *	A,
		SimTK_FDIM_(lda)
	)

void sgerfs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	af,
		int *	ldaf,
		int *	ipiv,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void sgerq2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_INFO_
	)

void sgerqf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void sgesc2_	(	SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	rhs,
		int *	ipiv,
		int *	jpiv,
		float *	scale
	)

void sgesdd_	(	SimTK_FOPT_(jobz)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	s,
		float *	u,
		SimTK_FDIM_(ldu)	,
		float *	vt,
		SimTK_FDIM_(ldvt)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)
	)

void sgesv_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_
	)

void sgesvd_	(	SimTK_FOPT_(jobu)	,
		char *	jobvt,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	s,
		float *	u,
		SimTK_FDIM_(ldu)	,
		float *	vt,
		SimTK_FDIM_(ldvt)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(jobu)	,
		SimTK_FLEN_(jobvt)
	)

void sgesvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	af,
		int *	ldaf,
		int *	ipiv,
		char *	equed,
		float *	r__,
		float *	c__,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(equed)
	)

void sgetc2_	(	SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		int *	jpiv,
		SimTK_INFO_
	)

void sgetf2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_INFO_
	)

void sgetrf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_INFO_
	)

void sgetri_	(	SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		const int *	ipiv,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void sgetrs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void sggbak_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(side)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		float *	lscale,
		float *	rscale,
		SimTK_FDIM_(m)	,
		float *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(side)
	)

void sggbal_	(	SimTK_FOPT_(job)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		int *	ilo,
		int *	ihi,
		float *	lscale,
		float *	rscale,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(job)
	)

void sgges_	(	SimTK_FOPT_(jobvsl)	,
		SimTK_FOPT_(jobvsr)	,
		SimTK_FOPT_(sort)	,
		SimTK_SELECT_3F	selctg,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		int *	sdim,
		float *	alphar,
		float *	alphai,
		const	SimTK_FSCL_float, beta,
		float *	vsl,
		int *	ldvsl,
		float *	vsr,
		int *	ldvsr,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	bwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvsl)	,
		SimTK_FLEN_(jobvsr)	,
		SimTK_FLEN_(sort)
	)

void sggesx_	(	SimTK_FOPT_(jobvsl)	,
		SimTK_FOPT_(jobvsr)	,
		SimTK_FOPT_(sort)	,
		SimTK_SELECT_3F	selctg,
		char *	sense,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		int *	sdim,
		float *	alphar,
		float *	alphai,
		const	SimTK_FSCL_float, beta,
		float *	vsl,
		int *	ldvsl,
		float *	vsr,
		int *	ldvsr,
		float *	rconde,
		float *	rcondv,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		int *	bwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvsl)	,
		SimTK_FLEN_(jobvsr)	,
		SimTK_FLEN_(sort)	,
		SimTK_FLEN_(sense)
	)

void sggev_	(	SimTK_FOPT_(jobvl)	,
		SimTK_FOPT_(jobvr)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	alphar,
		float *	alphai,
		float *	beta,
		float *	vl,
		SimTK_FDIM_(ldvl)	,
		float *	vr,
		SimTK_FDIM_(ldvr)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvsl)	,
		SimTK_FLEN_(jobvsr)
	)

void sggevx_	(	SimTK_FOPT_(balanc)	,
		SimTK_FOPT_(jobvl)	,
		SimTK_FOPT_(jobvr)	,
		char *	sense,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	alphar,
		float *	alphai,
		const	SimTK_FSCL_float, beta,
		float *	vl,
		SimTK_FDIM_(ldvl)	,
		float *	vr,
		SimTK_FDIM_(ldvr)	,
		int *	ilo,
		int *	ihi,
		float *	lscale,
		float *	rscale,
		float *	abnrm,
		float *	bbnrm,
		float *	rconde,
		float *	rcondv,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	bwork,
		SimTK_INFO_	,
		SimTK_FLEN_(balanc)	,
		SimTK_FLEN_(jobvl)	,
		SimTK_FLEN_(jobvr)	,
		SimTK_FLEN_(alpahr)
	)

void sggglm_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(m)	,
		int *	p,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	d__,
		float *	x,
		float *	y,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void sgghrd_	(	SimTK_FOPT_(compq)	,
		SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	q,
		SimTK_FDIM_(ldq)	,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_INFO_	,
		SimTK_FLEN_(compq)	,
		SimTK_FLEN_(compz)
	)

void sgglse_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	p,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	c__,
		float *	d__,
		float *	x,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void sggqrf_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(m)	,
		int *	p,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	taua,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	taub,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void sggrqf_	(	SimTK_FDIM_(m)	,
		int *	p,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	taua,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	taub,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void sggsvd_	(	SimTK_FOPT_(jobu)	,
		SimTK_FOPT_(jobv)	,
		SimTK_FOPT_(jobq)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	p,
		SimTK_FDIM_(k)	,
		int *	l,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_float, alpha,
		const	SimTK_FSCL_float, beta,
		float *	u,
		SimTK_FDIM_(ldu)	,
		float *	v,
		SimTK_FDIM_(ldv)	,
		float *	q,
		SimTK_FDIM_(ldq)	,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobu)	,
		SimTK_FLEN_(jobv)	,
		SimTK_FLEN_(jobq)
	)

void sggsvp_	(	SimTK_FOPT_(jobu)	,
		SimTK_FOPT_(jobv)	,
		SimTK_FOPT_(jobq)	,
		SimTK_FDIM_(m)	,
		int *	p,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	tola,
		float *	tolb,
		SimTK_FDIM_(k)	,
		int *	l,
		float *	u,
		SimTK_FDIM_(ldu)	,
		float *	v,
		SimTK_FDIM_(ldv)	,
		float *	q,
		SimTK_FDIM_(ldq)	,
		int *	iwork,
		float *	tau,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(jobu)	,
		SimTK_FLEN_(jobv)	,
		SimTK_FLEN_(jobq)
	)

void sgtcon_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		float *	dl,
		float *	d__,
		float *	du,
		float *	du2,
		int *	ipiv,
		float *	anorm,
		float *	rcond,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)
	)

void sgtrfs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	dl,
		float *	d__,
		float *	du,
		float *	dlf,
		float *	df,
		float *	duf,
		float *	du2,
		int *	ipiv,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void sgtsv_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	dl,
		float *	d__,
		float *	du,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_
	)

void sgtsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	dl,
		float *	d__,
		float *	du,
		float *	dlf,
		float *	df,
		float *	duf,
		float *	du2,
		int *	ipiv,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(trans)
	)

void sgttrf_	(	SimTK_FDIM_(n)	,
		float *	dl,
		float *	d__,
		float *	du,
		float *	du2,
		int *	ipiv,
		SimTK_INFO_
	)

void sgttrs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	dl,
		float *	d__,
		float *	du,
		float *	du2,
		int *	ipiv,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void sgtts2_	(	int *	itrans,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	dl,
		float *	d__,
		float *	du,
		float *	du2,
		int *	ipiv,
		float *	b,
		SimTK_FDIM_(ldb)
	)

void shgeqz_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(compq)	,
		SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	alphar,
		float *	alphai,
		const	SimTK_FSCL_float, beta,
		float *	q,
		SimTK_FDIM_(ldq)	,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(compq)	,
		SimTK_FLEN_(compz)
	)

void shsein_	(	SimTK_FOPT_(side)	,
		char *	eigsrc,
		char *	initv,
		int *	select,
		SimTK_FDIM_(n)	,
		float *	h__,
		int *	ldh,
		float *	wr,
		float *	wi,
		float *	vl,
		SimTK_FDIM_(ldvl)	,
		float *	vr,
		SimTK_FDIM_(ldvr)	,
		int *	mm,
		SimTK_FDIM_(m)	,
		float *	work,
		int *	ifaill,
		int *	ifailr,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(eigsrc)	,
		SimTK_FLEN_(initv)
	)

void shseqr_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		float *	h__,
		int *	ldh,
		float *	wr,
		float *	wi,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(compz)
	)

void SimTK_about_SimTKlapack	(	const char *	,
		int	,
		char *
	)

void SimTK_version_SimTKlapack	(	int *	,
		int *	,
		int *
	)

void slabad_	(	float *	small,
		float *	large
	)

void slabrd_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	nb,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	d__,
		float *	e,
		float *	tauq,
		float *	taup,
		float *	x,
		int *	ldx,
		float *	y,
		int *	ldy
	)

void slacon_	(	SimTK_FDIM_(n)	,
		float *	v,
		float *	x,
		int *	isgn,
		float *	est,
		int *	kase,
		int *	j,
		int *	jump,
		int *	iter
	)

void slacpy_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_FLEN_(uplo)
	)

void sladiv_	(	float *	a,
		float *	b,
		float *	c__,
		float *	d__,
		float *	p,
		float *	q
	)

void slae2_	(	float *	a,
		float *	b,
		float *	c__,
		float *	rt1,
		float *	rt2
	)

void slaebz_	(	int *	ijob,
		int *	nitmax,
		SimTK_FDIM_(n)	,
		int *	mmax,
		int *	minp,
		int *	nbmin,
		float *	abstol,
		float *	reltol,
		float *	pivmin,
		float *	d__,
		float *	e,
		float *	e2,
		int *	nval,
		float *	ab,
		float *	c__,
		int *	mout,
		int *	nab,
		float *	work,
		int *	iwork,
		SimTK_INFO_
	)

void slaed0_	(	int *	icompq,
		int *	qsiz,
		SimTK_FDIM_(n)	,
		float *	d__,
		float *	e,
		float *	q,
		SimTK_FDIM_(ldq)	,
		float *	qstore,
		SimTK_FDIM_(ldqs)	,
		float *	work,
		int *	iwork,
		SimTK_INFO_
	)

void slaed1_	(	SimTK_FDIM_(n)	,
		float *	d__,
		float *	q,
		SimTK_FDIM_(ldq)	,
		int *	indxq,
		float *	rho,
		int *	cutpnt,
		float *	work,
		int *	iwork,
		SimTK_INFO_
	)

void slaed2_	(	SimTK_FDIM_(k)	,
		SimTK_FDIM_(n)	,
		int *	n1,
		float *	d__,
		float *	q,
		SimTK_FDIM_(ldq)	,
		int *	indxq,
		float *	rho,
		float *	z__,
		float *	dlamda,
		float *	w,
		float *	q2,
		int *	indx,
		int *	indxc,
		int *	indxp,
		int *	coltyp,
		SimTK_INFO_
	)

void slaed3_	(	SimTK_FDIM_(k)	,
		SimTK_FDIM_(n)	,
		int *	n1,
		float *	d__,
		float *	q,
		SimTK_FDIM_(ldq)	,
		float *	rho,
		float *	dlamda,
		float *	q2,
		int *	indx,
		int *	ctot,
		float *	w,
		float *	s,
		SimTK_INFO_
	)

void slaed4_	(	SimTK_FDIM_(n)	,
		int *	i__,
		float *	d__,
		float *	z__,
		float *	delta,
		float *	rho,
		float *	dlam,
		SimTK_INFO_
	)

void slaed5_	(	int *	i__,
		float *	d__,
		float *	z__,
		float *	delta,
		float *	rho,
		float *	dlam
	)

void slaed6_	(	int *	kniter,
		int *	orgati,
		float *	rho,
		float *	d__,
		float *	z__,
		float *	finit,
		float *	tau,
		SimTK_INFO_
	)

void slaed7_	(	int *	icompq,
		SimTK_FDIM_(n)	,
		int *	qsiz,
		int *	tlvls,
		int *	curlvl,
		int *	curpbm,
		float *	d__,
		float *	q,
		SimTK_FDIM_(ldq)	,
		int *	indxq,
		float *	rho,
		int *	cutpnt,
		float *	qstore,
		int *	qptr,
		int *	prmptr,
		int *	perm,
		int *	givptr,
		int *	givcol,
		float *	givnum,
		float *	work,
		int *	iwork,
		SimTK_INFO_
	)

void slaed8_	(	int *	icompq,
		SimTK_FDIM_(k)	,
		SimTK_FDIM_(n)	,
		int *	qsiz,
		float *	d__,
		float *	q,
		SimTK_FDIM_(ldq)	,
		int *	indxq,
		float *	rho,
		int *	cutpnt,
		float *	z__,
		float *	dlamda,
		float *	q2,
		SimTK_FDIM_(ldq2)	,
		float *	w,
		int *	perm,
		int *	givptr,
		int *	givcol,
		float *	givnum,
		int *	indxp,
		int *	indx,
		SimTK_INFO_
	)

void slaed9_	(	SimTK_FDIM_(k)	,
		int *	kstart,
		int *	kstop,
		SimTK_FDIM_(n)	,
		float *	d__,
		float *	q,
		SimTK_FDIM_(ldq)	,
		float *	rho,
		float *	dlamda,
		float *	w,
		float *	s,
		int *	lds,
		SimTK_INFO_
	)

void slaeda_	(	SimTK_FDIM_(n)	,
		int *	tlvls,
		int *	curlvl,
		int *	curpbm,
		int *	prmptr,
		int *	perm,
		int *	givptr,
		int *	givcol,
		float *	givnum,
		float *	q,
		int *	qptr,
		float *	z__,
		float *	ztemp,
		SimTK_INFO_
	)

void slaein_	(	int *	rightv,
		int *	noinit,
		SimTK_FDIM_(n)	,
		float *	h__,
		int *	ldh,
		float *	wr,
		float *	wi,
		float *	vr,
		float *	vi,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	work,
		float *	eps3,
		float *	smlnum,
		float *	bignum,
		SimTK_INFO_
	)

void slaev2_	(	float *	a,
		float *	b,
		float *	c__,
		float *	rt1,
		float *	rt2,
		float *	cs1,
		float *	sn1
	)

void slaexc_	(	int *	wantq,
		SimTK_FDIM_(n)	,
		float *	t,
		SimTK_FDIM_(ldt)	,
		float *	q,
		SimTK_FDIM_(ldq)	,
		int *	j1,
		int *	n1,
		int *	n2,
		float *	work,
		SimTK_INFO_
	)

void slag2_	(	float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	safmin,
		float *	scale1,
		float *	scale2,
		float *	wr1,
		float *	wr2,
		float *	wi
	)

void slags2_	(	int *	upper,
		float *	a1,
		float *	a2,
		float *	a3,
		float *	b1,
		float *	b2,
		float *	b3,
		float *	csu,
		float *	snu,
		float *	csv,
		float *	snv,
		float *	csq,
		float *	snq
	)

void slagtf_	(	SimTK_FDIM_(n)	,
		float *	a,
		float *	lambda,
		float *	b,
		float *	c__,
		float *	tol,
		float *	d__,
		int *	in,
		SimTK_INFO_
	)

void slagtm_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	alpha,
		float *	dl,
		float *	d__,
		float *	du,
		float *	x,
		int *	ldx,
		float *	beta,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_FLEN_(trans)
	)

void slagts_	(	int *	job,
		SimTK_FDIM_(n)	,
		float *	a,
		float *	b,
		float *	c__,
		float *	d__,
		int *	in,
		float *	y,
		float *	tol,
		SimTK_INFO_
	)

void slagv2_	(	float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	alphar,
		float *	alphai,
		const	SimTK_FSCL_float, beta,
		float *	csl,
		float *	snl,
		float *	csr,
		float *	snr
	)

void slahqr_	(	int *	wantt,
		int *	wantz,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		float *	h__,
		int *	ldh,
		float *	wr,
		float *	wi,
		int *	iloz,
		int *	ihiz,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_INFO_
	)

void slahrd_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		int *	nb,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	t,
		SimTK_FDIM_(ldt)	,
		float *	y,
		int *	ldy
	)

void slaic1_	(	int *	job,
		int *	j,
		float *	x,
		float *	sest,
		float *	w,
		float *	gamma,
		float *	sestpr,
		float *	s,
		float *	c__
	)

void slaln2_	(	int *	ltrans,
		int *	na,
		int *	nw,
		float *	smin,
		float *	ca,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	d1,
		float *	d2,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	wr,
		float *	wi,
		float *	x,
		int *	ldx,
		float *	scale,
		float *	xnorm,
		SimTK_INFO_
	)

void slals0_	(	int *	icompq,
		int *	nl,
		int *	nr,
		int *	sqre,
		SimTK_FDIM_(nrhs)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	bx,
		int *	ldbx,
		int *	perm,
		int *	givptr,
		int *	givcol,
		int *	ldgcol,
		float *	givnum,
		int *	ldgnum,
		float *	poles,
		float *	difl,
		float *	difr,
		float *	z__,
		SimTK_FDIM_(k)	,
		float *	c__,
		float *	s,
		float *	work,
		SimTK_INFO_
	)

void slalsa_	(	int *	icompq,
		int *	smlsiz,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	bx,
		int *	ldbx,
		float *	u,
		SimTK_FDIM_(ldu)	,
		float *	vt,
		SimTK_FDIM_(k)	,
		float *	difl,
		float *	difr,
		float *	z__,
		float *	poles,
		int *	givptr,
		int *	givcol,
		int *	ldgcol,
		int *	perm,
		float *	givnum,
		float *	c__,
		float *	s,
		float *	work,
		int *	iwork,
		SimTK_INFO_
	)

void slalsd_	(	SimTK_FOPT_(uplo)	,
		int *	smlsiz,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	d__,
		float *	e,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	rcond,
		int *	rank,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void slamc1_	(	int *	beta,
		int *	t,
		int *	rnd,
		int *	ieee1
	)

void slamc2_	(	int *	beta,
		int *	t,
		int *	rnd,
		float *	eps,
		int *	emin,
		float *	rmin,
		int *	emax,
		float *	rmax
	)

void slamc4_	(	int *	emin,
		float *	start,
		int *	base
	)

void slamc5_	(	int *	beta,
		int *	p,
		int *	emin,
		int *	ieee,
		int *	emax,
		float *	rmax
	)

double slamch_	(	SimTK_FOPT_(cmach)	,
		SimTK_FLEN_(cmach)
	)

void slamrg_	(	int *	n1,
		int *	n2,
		float *	a,
		int *	strd1,
		int *	strd2,
		int *	index
	)

double slangb_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		const float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	work,
		SimTK_FLEN_(norm)
	)

double slange_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const float *	a,
		SimTK_FDIM_(lda)	,
		float *	work,
		SimTK_FLEN_(norm)
	)

double slangt_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		const float *	dl,
		const float *	d,
		const float *	du,
		SimTK_FLEN_(norm)
	)

double slanhs_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		const float *	a,
		SimTK_FDIM_(lda)	,
		float *	work,
		SimTK_FLEN_(norm)
	)

double slansb_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)
	)

double slansp_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const float *	ap,
		float *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)
	)

double slansy_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const float *	a,
		SimTK_FDIM_(lda)	,
		float *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)
	)

double slantb_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

double slantp_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		const float *	ap,
		float *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

double slantr_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const float *	a,
		SimTK_FDIM_(lda)	,
		float *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void slanv2_	(	float *	a,
		float *	b,
		float *	c__,
		float *	d__,
		float *	rt1r,
		float *	rt1i,
		float *	rt2r,
		float *	rt2i,
		float *	cs,
		float *	sn
	)

void slapll_	(	SimTK_FDIM_(n)	,
		float *	x,
		SimTK_FINC_(x)	,
		float *	y,
		SimTK_FINC_(y)	,
		float *	ssmin
	)

void slapmt_	(	int *	forwrd,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	x,
		int *	ldx,
		SimTK_FDIM_(k)
	)

double slapy2_	(	const float *	x,
		const float *	y
	)

double slapy3_	(	const float *	x,
		const float *	y,
		const float *	z
	)

void slaqgb_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	r__,
		float *	c__,
		float *	rowcnd,
		float *	colcnd,
		float *	amax,
		char *	equed,
		SimTK_FLEN_(equed)
	)

void slaqge_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	r__,
		float *	c__,
		float *	rowcnd,
		float *	colcnd,
		float *	amax,
		char *	equed,
		SimTK_FLEN_(equed)
	)

void slaqp2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	offset,
		float *	a,
		SimTK_FDIM_(lda)	,
		int *	jpvt,
		float *	tau,
		float *	vn1,
		float *	vn2,
		float *	work
	)

void slaqps_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	offset,
		int *	nb,
		int *	kb,
		float *	a,
		SimTK_FDIM_(lda)	,
		int *	jpvt,
		float *	tau,
		float *	vn1,
		float *	vn2,
		float *	auxv,
		float *	f,
		int *	ldf
	)

void slaqsb_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	s,
		float *	scond,
		float *	amax,
		char *	equed,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void slaqsp_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	ap,
		float *	s,
		float *	scond,
		float *	amax,
		char *	equed,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void slaqsy_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	s,
		float *	scond,
		float *	amax,
		char *	equed,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void slaqtr_	(	int *	ltran,
		int *	lfloat,
		SimTK_FDIM_(n)	,
		float *	t,
		SimTK_FDIM_(ldt)	,
		float *	b,
		float *	w,
		float *	scale,
		float *	x,
		float *	work,
		SimTK_INFO_
	)

void slar1v_	(	SimTK_FDIM_(n)	,
		int *	b1,
		int *	bn,
		float *	sigma,
		float *	d__,
		float *	l,
		float *	ld,
		float *	lld,
		float *	gersch,
		float *	z__,
		float *	ztz,
		float *	mingma,
		int *	r__,
		int *	isuppz,
		float *	work
	)

void slar2v_	(	SimTK_FDIM_(n)	,
		float *	x,
		float *	y,
		float *	z__,
		int *	incx,
		float *	c__,
		float *	s,
		SimTK_FINC_(c)
	)

void slarf_	(	SimTK_FOPT_(side)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	v,
		SimTK_FINC_(v)	,
		float *	tau,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		SimTK_FLEN_(side)
	)

void slarfb_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(direct)	,
		SimTK_FOPT_(storev)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		float *	v,
		SimTK_FDIM_(ldv)	,
		float *	t,
		SimTK_FDIM_(ldt)	,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		int *	ldwork,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(direct)
	)

void slarfg_	(	SimTK_FDIM_(n)	,
		const	SimTK_FSCL_float, alpha,
		float *	x,
		SimTK_FINC_(x)	,
		float *	tau
	)

void slarft_	(	SimTK_FOPT_(direct)	,
		SimTK_FOPT_(storev)	,
		SimTK_FDIM_(n)	,
		int *	k,
		float *	v,
		SimTK_FDIM_(ldv)	,
		float *	tau,
		float *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_FLEN_(direct)	,
		SimTK_FLEN_(storev)
	)

void slarfx_	(	SimTK_FOPT_(side)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	v,
		float *	tau,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		SimTK_FLEN_(side)
	)

void slargv_	(	SimTK_FDIM_(n)	,
		float *	x,
		SimTK_FINC_(x)	,
		float *	y,
		SimTK_FINC_(y)	,
		float *	c__,
		SimTK_FINC_(c)
	)

void slarnv_	(	int *	idist,
		int *	iseed,
		SimTK_FDIM_(n)	,
		float *	x
	)

void slarrb_	(	SimTK_FDIM_(n)	,
		float *	d__,
		float *	l,
		float *	ld,
		float *	lld,
		int *	ifirst,
		int *	ilast,
		float *	sigma,
		float *	reltol,
		float *	w,
		float *	wgap,
		float *	werr,
		float *	work,
		int *	iwork,
		SimTK_INFO_
	)

void slarre_	(	SimTK_FDIM_(n)	,
		float *	d__,
		float *	e,
		float *	tol,
		int *	nsplit,
		int *	isplit,
		SimTK_FDIM_(m)	,
		float *	w,
		float *	woff,
		float *	gersch,
		float *	work,
		SimTK_INFO_
	)

void slarrf_	(	SimTK_FDIM_(n)	,
		float *	d__,
		float *	l,
		float *	ld,
		float *	lld,
		int *	ifirst,
		int *	ilast,
		float *	w,
		float *	dplus,
		float *	lplus,
		float *	work,
		int *	iwork,
		SimTK_INFO_
	)

void slarrv_	(	SimTK_FDIM_(n)	,
		float *	d__,
		float *	l,
		int *	isplit,
		SimTK_FDIM_(m)	,
		float *	w,
		int *	iblock,
		float *	gersch,
		float *	tol,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		int *	isuppz,
		float *	work,
		int *	iwork,
		SimTK_INFO_
	)

void slartg_	(	float *	f,
		float *	g,
		float *	cs,
		float *	sn,
		float *	r__
	)

void slartv_	(	SimTK_FDIM_(n)	,
		float *	x,
		SimTK_FINC_(x)	,
		float *	y,
		SimTK_FINC_(y)	,
		float *	c__,
		float *	s,
		SimTK_FINC_(c)
	)

void slaruv_	(	int *	iseed,
		SimTK_FDIM_(n)	,
		float *	x
	)

void slarz_	(	SimTK_FOPT_(side)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	l,
		float *	v,
		SimTK_FINC_(v)	,
		float *	tau,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		SimTK_FLEN_(side)
	)

void slarzb_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(direct)	,
		SimTK_FOPT_(storev)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		int *	l,
		float *	v,
		SimTK_FDIM_(ldv)	,
		float *	t,
		SimTK_FDIM_(ldt)	,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		int *	ldwork,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(direct)
	)

void slarzt_	(	SimTK_FOPT_(direct)	,
		SimTK_FOPT_(storev)	,
		SimTK_FDIM_(n)	,
		int *	k,
		float *	v,
		SimTK_FDIM_(ldv)	,
		float *	tau,
		float *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_FLEN_(direct)	,
		SimTK_FLEN_(storev)
	)

void slas2_	(	float *	f,
		float *	g,
		float *	h__,
		float *	ssmin,
		float *	ssmax
	)

void slascl_	(	char *	type__,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		float *	cfrom,
		float *	cto,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(type)
	)

void slasd0_	(	SimTK_FDIM_(n)	,
		int *	sqre,
		float *	d__,
		float *	e,
		float *	u,
		SimTK_FDIM_(ldu)	,
		float *	vt,
		SimTK_FDIM_(ldvt)	,
		int *	smlsiz,
		int *	iwork,
		float *	work,
		SimTK_INFO_
	)

void slasd1_	(	int *	nl,
		int *	nr,
		int *	sqre,
		float *	d__,
		const	SimTK_FSCL_float, alpha,
		const	SimTK_FSCL_float, beta,
		float *	u,
		SimTK_FDIM_(ldu)	,
		float *	vt,
		SimTK_FDIM_(ldvt)	,
		int *	idxq,
		int *	iwork,
		float *	work,
		SimTK_INFO_
	)

void slasd2_	(	int *	nl,
		int *	nr,
		int *	sqre,
		int *	k,
		float *	d__,
		float *	z__,
		const	SimTK_FSCL_float, alpha,
		const	SimTK_FSCL_float, beta,
		float *	u,
		SimTK_FDIM_(ldu)	,
		float *	vt,
		SimTK_FDIM_(ldvt)	,
		float *	dsigma,
		float *	u2,
		int *	ldu2,
		float *	vt2,
		int *	ldvt2,
		int *	idxp,
		int *	idx,
		int *	idxc,
		int *	idxq,
		int *	coltyp,
		SimTK_INFO_
	)

void slasd3_	(	int *	nl,
		int *	nr,
		int *	sqre,
		int *	k,
		float *	d__,
		float *	q,
		SimTK_FDIM_(ldq)	,
		float *	dsigma,
		float *	u,
		SimTK_FDIM_(ldu)	,
		float *	u2,
		int *	ldu2,
		float *	vt,
		SimTK_FDIM_(ldvt)	,
		float *	vt2,
		int *	ldvt2,
		int *	idxc,
		int *	ctot,
		float *	z__,
		SimTK_INFO_
	)

void slasd4_	(	SimTK_FDIM_(n)	,
		int *	i__,
		float *	d__,
		float *	z__,
		float *	delta,
		float *	rho,
		float *	sigma,
		float *	work,
		SimTK_INFO_
	)

void slasd5_	(	int *	i__,
		float *	d__,
		float *	z__,
		float *	delta,
		float *	rho,
		float *	dsigma,
		float *	work
	)

void slasd6_	(	int *	icompq,
		int *	nl,
		int *	nr,
		int *	sqre,
		float *	d__,
		float *	vf,
		float *	vl,
		const	SimTK_FSCL_float, alpha,
		const	SimTK_FSCL_float, beta,
		int *	idxq,
		int *	perm,
		int *	givptr,
		int *	givcol,
		int *	ldgcol,
		float *	givnum,
		int *	ldgnum,
		float *	poles,
		float *	difl,
		float *	difr,
		float *	z__,
		SimTK_FDIM_(k)	,
		float *	c__,
		float *	s,
		float *	work,
		int *	iwork,
		SimTK_INFO_
	)

void slasd7_	(	int *	icompq,
		int *	nl,
		int *	nr,
		int *	sqre,
		SimTK_FDIM_(k)	,
		float *	d__,
		float *	z__,
		float *	zw,
		float *	vf,
		float *	vfw,
		float *	vl,
		float *	vlw,
		const	SimTK_FSCL_float, alpha,
		const	SimTK_FSCL_float, beta,
		float *	dsigma,
		int *	idx,
		int *	idxp,
		int *	idxq,
		int *	perm,
		int *	givptr,
		int *	givcol,
		int *	ldgcol,
		float *	givnum,
		int *	ldgnum,
		float *	c__,
		float *	s,
		SimTK_INFO_
	)

void slasd8_	(	int *	icompq,
		SimTK_FDIM_(k)	,
		float *	d__,
		float *	z__,
		float *	vf,
		float *	vl,
		float *	difl,
		float *	difr,
		int *	lddifr,
		float *	dsigma,
		float *	work,
		SimTK_INFO_
	)

void slasd9_	(	int *	icompq,
		SimTK_FDIM_(ldu)	,
		SimTK_FDIM_(k)	,
		float *	d__,
		float *	z__,
		float *	vf,
		float *	vl,
		float *	difl,
		float *	difr,
		float *	dsigma,
		float *	work,
		SimTK_INFO_
	)

void slasda_	(	int *	icompq,
		int *	smlsiz,
		SimTK_FDIM_(n)	,
		int *	sqre,
		float *	d__,
		float *	e,
		float *	u,
		SimTK_FDIM_(ldu)	,
		float *	vt,
		SimTK_FDIM_(k)	,
		float *	difl,
		float *	difr,
		float *	z__,
		float *	poles,
		int *	givptr,
		int *	givcol,
		int *	ldgcol,
		int *	perm,
		float *	givnum,
		float *	c__,
		float *	s,
		float *	work,
		int *	iwork,
		SimTK_INFO_
	)

void slasdq_	(	SimTK_FOPT_(uplo)	,
		int *	sqre,
		SimTK_FDIM_(n)	,
		int *	ncvt,
		int *	nru,
		int *	ncc,
		float *	d__,
		float *	e,
		float *	vt,
		SimTK_FDIM_(ldvt)	,
		float *	u,
		SimTK_FDIM_(ldu)	,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void slasdt_	(	SimTK_FDIM_(n)	,
		int *	lvl,
		int *	nd,
		int *	inode,
		int *	ndiml,
		int *	ndimr,
		int *	msub
	)

void slaset_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_float, alpha,
		const	SimTK_FSCL_float, beta,
		float *	a,
		SimTK_FDIM_(lda)	,
		SimTK_FLEN_(uplo)
	)

void slasq1_	(	SimTK_FDIM_(n)	,
		float *	d__,
		float *	e,
		float *	work,
		SimTK_INFO_
	)

void slasq2_	(	SimTK_FDIM_(n)	,
		float *	z__,
		SimTK_INFO_
	)

void slasq3_	(	int *	i0,
		int *	n0,
		float *	z__,
		int *	pp,
		float *	dmin__,
		float *	sigma,
		float *	desig,
		float *	qmax,
		int *	nfail,
		int *	iter,
		int *	ndiv,
		int *	ieee,
		int *	ttype,
		float *	dmin1,
		float *	dmin2,
		float *	dn,
		float *	dn1,
		float *	dn2,
		float *	tau
	)

void slasq4_	(	int *	i0,
		int *	n0,
		float *	z__,
		int *	pp,
		int *	n0in,
		float *	dmin__,
		float *	dmin1,
		float *	dmin2,
		float *	dn,
		float *	dn1,
		float *	dn2,
		float *	tau,
		int *	ttype,
		float *	g
	)

void slasq5_	(	int *	i0,
		int *	n0,
		float *	z__,
		int *	pp,
		float *	tau,
		float *	dmin__,
		float *	dmin1,
		float *	dmin2,
		float *	dn,
		float *	dnm1,
		float *	dnm2,
		int *	ieee
	)

void slasq6_	(	int *	i0,
		int *	n0,
		float *	z__,
		int *	pp,
		float *	dmin__,
		float *	dmin1,
		float *	dmin2,
		float *	dn,
		float *	dnm1,
		float *	dnm2
	)

void slasr_	(	SimTK_FOPT_(side)	,
		char *	pivot,
		SimTK_FOPT_(direct)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	c__,
		float *	s,
		float *	a,
		SimTK_FDIM_(lda)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(pivot)	,
		SimTK_FLEN_(direct)
	)

void slasrt_	(	char *	id,
		SimTK_FDIM_(n)	,
		float *	d__,
		SimTK_INFO_	,
		SimTK_FLEN_(id)
	)

void slassq_	(	SimTK_FDIM_(n)	,
		float *	x,
		SimTK_FINC_(x)	,
		float *	scale,
		float *	sumsq
	)

void slasv2_	(	float *	f,
		float *	g,
		float *	h__,
		float *	ssmin,
		float *	ssmax,
		float *	snr,
		float *	csr,
		float *	snl,
		float *	csl
	)

void slaswp_	(	SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		int *	k1,
		int *	k2,
		int *	ipiv,
		SimTK_FINC_(x)
	)

void slasy2_	(	int *	ltranl,
		int *	ltranr,
		int *	isgn,
		int *	n1,
		int *	n2,
		float *	tl,
		int *	ldtl,
		float *	tr,
		int *	ldtr,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	scale,
		float *	x,
		int *	ldx,
		float *	xnorm,
		SimTK_INFO_
	)

void slasyf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	nb,
		int *	kb,
		float *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		float *	w,
		int *	ldw,
		int *	info,
		SimTK_FLEN_(uplo)
	)

void slatbs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		char *	normin,
		SimTK_FDIM_(n)	,
		int *	kd,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	x,
		float *	scale,
		float *	cnorm,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void slatdf_	(	int *	ijob,
		SimTK_FDIM_(n)	,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	rhs,
		float *	rdsum,
		float *	rdscal,
		int *	ipiv,
		int *	jpiv
	)

void slatps_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		char *	normin,
		SimTK_FDIM_(n)	,
		float *	ap,
		float *	x,
		float *	scale,
		float *	cnorm,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void slatrd_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	nb,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	e,
		float *	tau,
		float *	w,
		int *	ldw,
		SimTK_FLEN_(uplo)
	)

void slatrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		char *	normin,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	x,
		float *	scale,
		float *	cnorm,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void slatrz_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	l,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work
	)

void slatzm_	(	SimTK_FOPT_(side)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	v,
		SimTK_FINC_(v)	,
		float *	tau,
		float *	c1,
		float *	c2,
		SimTK_FDIM_(ldc)	,
		float *	work,
		SimTK_FLEN_(side)
	)

void slauu2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void slauum_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

float snrm2_	(	SimTK_FDIM_(n)	,
		const float *	x,
		SimTK_FINC_(x)
	)

void sopgtr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	ap,
		float *	tau,
		float *	q,
		SimTK_FDIM_(ldq)	,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void sopmtr_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	ap,
		float *	tau,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)
	)

void sorg2l_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_INFO_
	)

void sorg2r_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_INFO_
	)

void sorgbr_	(	SimTK_FOPT_(vect)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	info,
		SimTK_FLEN_(vect)
	)

void sorghr_	(	SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void sorgl2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_INFO_
	)

void sorglq_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void sorgql_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void sorgqr_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void sorgr2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_INFO_
	)

void sorgrq_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void sorgtr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void sorm2l_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void sorm2r_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void sormbr_	(	SimTK_FOPT_(vect)	,
		SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(vect)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void sormhr_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void sorml2_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void sormlq_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void sormql_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void sormqr_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void sormr2_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void sormr3_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		int *	l,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void sormrq_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void sormrz_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		int *	l,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void sormtr_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)
	)

void spbcon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	anorm,
		float *	rcond,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void spbequ_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	s,
		float *	scond,
		float *	amax,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void spbrfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	afb,
		SimTK_FDIM_(ldafb)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void spbstf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void spbsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void spbsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	afb,
		SimTK_FDIM_(ldafb)	,
		char *	equed,
		float *	s,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void spbtf2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_INFO_
	)

void spbtrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void spbtrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void spocon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	anorm,
		float *	rcond,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void spoequ_	(	SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	s,
		float *	scond,
		float *	amax,
		SimTK_INFO_
	)

void sporfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	af,
		int *	ldaf,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void sposv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void sposvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	af,
		int *	ldaf,
		char *	equed,
		float *	s,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void spotf2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void spotrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void spotri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void spotrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void sppcon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	ap,
		float *	anorm,
		float *	rcond,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void sppequ_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	ap,
		float *	s,
		float *	scond,
		float *	amax,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void spprfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	ap,
		float *	afp,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void sppsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	ap,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void sppsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	ap,
		float *	afp,
		char *	equed,
		float *	s,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void spptrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	ap,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void spptri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	ap,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void spptrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	ap,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void sptcon_	(	SimTK_FDIM_(n)	,
		float *	d__,
		float *	e,
		float *	anorm,
		float *	rcond,
		float *	work,
		SimTK_INFO_
	)

void spteqr_	(	SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		float *	d__,
		float *	e,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(compz)
	)

void sptrfs_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	d__,
		float *	e,
		float *	df,
		float *	ef,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		float *	work,
		SimTK_INFO_
	)

void sptsv_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	d__,
		float *	e,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_
	)

void sptsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	d__,
		float *	e,
		float *	df,
		float *	ef,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)
	)

void spttrf_	(	SimTK_FDIM_(n)	,
		float *	d__,
		float *	e,
		SimTK_INFO_
	)

void spttrs_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	d__,
		float *	e,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_
	)

void sptts2_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	d__,
		float *	e,
		float *	b,
		SimTK_FDIM_(ldb)
	)

void srot_	(	SimTK_FDIM_(n)	,
		float *	x,
		SimTK_FINC_(x)	,
		float *	y,
		SimTK_FINC_(y)	,
		const	SimTK_FSCL_float, c,
		const	SimTK_FSCL_float, s
	)

void srotg_	(	SimTK_FSCL_(float, a)	,
		SimTK_FSCL_(float, b)	,
		SimTK_FSCL_(float, c)	,
		SimTK_FSCL_(float, s)
	)

void srotm_	(	SimTK_FDIM_(n)	,
		float *	x,
		SimTK_FINC_(x)	,
		float *	y,
		SimTK_FINC_(y)	,
		const float	P[5]
	)

void srotmg_	(	SimTK_FSCL_(float, d1)	,
		SimTK_FSCL_(float, d2)	,
		SimTK_FSCL_(float, b1)	,
		SimTK_FSCL_(float, b2)	,
		float	P[5]
	)

void srscl_	(	SimTK_FDIM_(n)	,
		float *	sa,
		float *	sx,
		SimTK_FINC_(x)
	)

void ssbev_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	w,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void ssbevd_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	w,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void ssbevx_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	q,
		SimTK_FDIM_(ldq)	,
		float *	vl,
		float *	vu,
		int *	il,
		int *	iu,
		float *	abstol,
		SimTK_FDIM_(m)	,
		float *	w,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void ssbgst_	(	SimTK_FOPT_(vect)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	ka,
		int *	kb,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	bb,
		int *	ldbb,
		float *	x,
		int *	ldx,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(vect)	,
		SimTK_FLEN_(uplo)
	)

void ssbgv_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	ka,
		int *	kb,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	bb,
		int *	ldbb,
		float *	w,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void ssbgvd_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	ka,
		int *	kb,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	bb,
		int *	ldbb,
		float *	w,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void ssbgvx_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	ka,
		int *	kb,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	bb,
		int *	ldbb,
		float *	q,
		SimTK_FDIM_(ldq)	,
		float *	vl,
		float *	vu,
		int *	il,
		int *	iu,
		float *	abstol,
		SimTK_FDIM_(m)	,
		float *	w,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void ssbmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const	SimTK_FSCL_float, alpha,
		const float *	A,
		SimTK_FDIM_(lda)	,
		const float *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_float, beta,
		float *	y,
		SimTK_FINC_(y)	,
		SimTK_FLEN_(uplo)
	)

void ssbtrd_	(	SimTK_FOPT_(vect)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	d__,
		float *	e,
		float *	q,
		SimTK_FDIM_(ldq)	,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(vect)	,
		SimTK_FLEN_(uplo)
	)

void sscal_	(	SimTK_FDIM_(n)	,
		const	SimTK_FSCL_float, alpha,
		float *	x,
		SimTK_FINC_(x)
	)

void sspcon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	ap,
		int *	ipiv,
		float *	anorm,
		float *	rcond,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void sspev_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	ap,
		float *	w,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void sspevd_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	ap,
		float *	w,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void sspevx_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	ap,
		float *	vl,
		float *	vu,
		int *	il,
		int *	iu,
		float *	abstol,
		SimTK_FDIM_(m)	,
		float *	w,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void sspgst_	(	int *	itype,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	ap,
		float *	bp,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void sspgv_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	ap,
		float *	bp,
		float *	w,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void sspgvd_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	ap,
		float *	bp,
		float *	w,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void sspgvx_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	ap,
		float *	bp,
		float *	vl,
		float *	vu,
		int *	il,
		int *	iu,
		float *	abstol,
		SimTK_FDIM_(m)	,
		float *	w,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void sspmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_float, alpha,
		const float *	Ap,
		const float *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_float, beta,
		float *	y,
		SimTK_FINC_(y)	,
		SimTK_FLEN_(uplo)
	)

void sspr2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_float, alpha,
		const float *	x,
		SimTK_FINC_(x)	,
		const float *	y,
		SimTK_FINC_(y)	,
		float *	A,
		SimTK_FLEN_(uplo)
	)

void sspr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_float, alpha,
		const float *	x,
		SimTK_FINC_(x)	,
		float *	Ap,
		SimTK_FLEN_(uplo)
	)

void ssprfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	ap,
		float *	afp,
		int *	ipiv,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void sspsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	ap,
		int *	ipiv,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void sspsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	ap,
		float *	afp,
		int *	ipiv,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)
	)

void ssptrd_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	ap,
		float *	d__,
		float *	e,
		float *	tau,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void ssptrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	ap,
		int *	ipiv,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void ssptri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	ap,
		int *	ipiv,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void ssptrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	ap,
		int *	ipiv,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void sstebz_	(	SimTK_FOPT_(range)	,
		char *	order,
		SimTK_FDIM_(n)	,
		float *	vl,
		float *	vu,
		int *	il,
		int *	iu,
		float *	abstol,
		float *	d__,
		float *	e,
		SimTK_FDIM_(m)	,
		int *	nsplit,
		float *	w,
		int *	iblock,
		int *	isplit,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(order)
	)

void sstedc_	(	SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		float *	d__,
		float *	e,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(compz)
	)

void sstegr_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FDIM_(n)	,
		float *	d__,
		float *	e,
		float *	vl,
		float *	vu,
		int *	il,
		int *	iu,
		float *	abstol,
		SimTK_FDIM_(m)	,
		float *	w,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		int *	isuppz,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)
	)

void sstein_	(	SimTK_FDIM_(n)	,
		float *	d__,
		float *	e,
		SimTK_FDIM_(m)	,
		float *	w,
		int *	iblock,
		int *	isplit,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_
	)

void ssteqr_	(	SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		float *	d__,
		float *	e,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(compz)
	)

void ssterf_	(	SimTK_FDIM_(n)	,
		float *	d__,
		float *	e,
		SimTK_INFO_
	)

void sstev_	(	SimTK_FOPT_(jobz)	,
		SimTK_FDIM_(n)	,
		float *	d__,
		float *	e,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)
	)

void sstevd_	(	SimTK_FOPT_(jobz)	,
		SimTK_FDIM_(n)	,
		float *	d__,
		float *	e,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)
	)

void sstevr_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FDIM_(n)	,
		float *	d__,
		float *	e,
		float *	vl,
		float *	vu,
		int *	il,
		int *	iu,
		float *	abstol,
		SimTK_FDIM_(m)	,
		float *	w,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		int *	isuppz,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)
	)

void sstevx_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FDIM_(n)	,
		float *	d__,
		float *	e,
		float *	vl,
		float *	vu,
		int *	il,
		int *	iu,
		float *	abstol,
		SimTK_FDIM_(m)	,
		float *	w,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)
	)

void sswap_	(	SimTK_FDIM_(n)	,
		float *	x,
		SimTK_FINC_(x)	,
		float *	y,
		SimTK_FINC_(y)
	)

void ssycon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		float *	anorm,
		float *	rcond,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void ssyev_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	w,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void ssyevd_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	w,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void ssyevr_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	vl,
		float *	vu,
		int *	il,
		int *	iu,
		float *	abstol,
		SimTK_FDIM_(m)	,
		float *	w,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		int *	isuppz,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void ssyevx_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	vl,
		float *	vu,
		int *	il,
		int *	iu,
		float *	abstol,
		SimTK_FDIM_(m)	,
		float *	w,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void ssygs2_	(	int *	itype,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void ssygst_	(	int *	itype,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void ssygv_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	w,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void ssygvd_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	w,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void ssygvx_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	vl,
		float *	vu,
		int *	il,
		int *	iu,
		float *	abstol,
		SimTK_FDIM_(m)	,
		float *	w,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void ssymm_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_float, alpha,
		const float *	A,
		SimTK_FDIM_(lda)	,
		const float *	B,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_float, beta,
		float *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)
	)

void ssymv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_float, alpha,
		const float *	A,
		SimTK_FDIM_(lda)	,
		const float *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_float, beta,
		float *	y,
		SimTK_FINC_(y)	,
		SimTK_FLEN_(uplo)
	)

void ssyr2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_float, alpha,
		const float *	x,
		SimTK_FINC_(x)	,
		const float *	y,
		SimTK_FINC_(y)	,
		float *	A,
		SimTK_FDIM_(lda)	,
		SimTK_FLEN_(uplo)
	)

void ssyr2k_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const	SimTK_FSCL_float, alpha,
		const float *	A,
		SimTK_FDIM_(lda)	,
		const float *	B,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_float, beta,
		float *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)
	)

void ssyr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_float, alpha,
		const float *	x,
		SimTK_FINC_(x)	,
		float *	A,
		SimTK_FDIM_(lda)	,
		SimTK_FLEN_(uplo)
	)

void ssyrfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	af,
		int *	ldaf,
		int *	ipiv,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void ssyrk_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const	SimTK_FSCL_float, alpha,
		const float *	A,
		SimTK_FDIM_(lda)	,
		const	SimTK_FSCL_float, beta,
		float *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)
	)

void ssysv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void ssysvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	af,
		int *	ldaf,
		int *	ipiv,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	rcond,
		float *	ferr,
		float *	berr,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)
	)

void ssytd2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	d__,
		float *	e,
		float *	tau,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void ssytf2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void ssytrd_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	d__,
		float *	e,
		float *	tau,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void ssytrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void ssytri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void ssytrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void stbcon_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	rcond,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void stbmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const float *	A,
		SimTK_FDIM_(lda)	,
		float *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void stbrfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void stbsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const float *	A,
		SimTK_FDIM_(lda)	,
		float *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void stbtrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		float *	ab,
		SimTK_FDIM_(ldab)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void stgevc_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(howmny)	,
		int *	select,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	vl,
		SimTK_FDIM_(ldvl)	,
		float *	vr,
		SimTK_FDIM_(ldvr)	,
		int *	mm,
		SimTK_FDIM_(m)	,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(howmny)
	)

void stgex2_	(	int *	wantq,
		int *	wantz,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	q,
		SimTK_FDIM_(ldq)	,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		int *	j1,
		int *	n1,
		int *	n2,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void stgexc_	(	int *	wantq,
		int *	wantz,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	q,
		SimTK_FDIM_(ldq)	,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		int *	ifst,
		int *	ilst,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void stgsen_	(	int *	ijob,
		int *	wantq,
		int *	wantz,
		int *	select,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	alphar,
		float *	alphai,
		const	SimTK_FSCL_float, beta,
		float *	q,
		SimTK_FDIM_(ldq)	,
		float *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_FDIM_(m)	,
		float *	pl,
		float *	pr,
		float *	dif,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_
	)

void stgsja_	(	SimTK_FOPT_(jobu)	,
		SimTK_FOPT_(jobv)	,
		SimTK_FOPT_(jobq)	,
		SimTK_FDIM_(m)	,
		int *	p,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		int *	l,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	tola,
		float *	tolb,
		const	SimTK_FSCL_float, alpha,
		float *	beta,
		float *	u,
		SimTK_FDIM_(ldu)	,
		float *	v,
		SimTK_FDIM_(ldv)	,
		float *	q,
		SimTK_FDIM_(ldq)	,
		float *	work,
		int *	ncycle,
		SimTK_INFO_	,
		SimTK_FLEN_(jobu)	,
		SimTK_FLEN_(jobv)	,
		SimTK_FLEN_(jobq)
	)

void stgsna_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(howmny)	,
		int *	select,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	vl,
		SimTK_FDIM_(ldvl)	,
		float *	vr,
		SimTK_FDIM_(ldvr)	,
		float *	s,
		float *	dif,
		int *	mm,
		SimTK_FDIM_(m)	,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(howmny)
	)

void stgsy2_	(	SimTK_FOPT_(trans)	,
		int *	ijob,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	c__,
		int *	ldc,
		float *	d__,
		int *	ldd,
		float *	e,
		int *	lde,
		float *	f,
		int *	ldf,
		float *	scale,
		float *	rdsum,
		float *	rdscal,
		int *	iwork,
		int *	pq,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void stgsyl_	(	SimTK_FOPT_(trans)	,
		int *	ijob,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	c__,
		int *	ldc,
		float *	d__,
		int *	ldd,
		float *	e,
		int *	lde,
		float *	f,
		int *	ldf,
		float *	scale,
		float *	dif,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void stpcon_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		float *	ap,
		float *	rcond,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void stpmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		const float *	Ap,
		float *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void stprfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	ap,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void stpsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		const float *	Ap,
		float *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void stptri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		float *	ap,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void stptrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	ap,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void strcon_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	rcond,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void strevc_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(howmny)	,
		int *	select,
		SimTK_FDIM_(n)	,
		float *	t,
		SimTK_FDIM_(ldt)	,
		float *	vl,
		SimTK_FDIM_(ldvl)	,
		float *	vr,
		SimTK_FDIM_(ldvr)	,
		int *	mm,
		SimTK_FDIM_(m)	,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(howmny)
	)

void strexc_	(	SimTK_FOPT_(compq)	,
		SimTK_FDIM_(n)	,
		float *	t,
		SimTK_FDIM_(ldt)	,
		float *	q,
		SimTK_FDIM_(ldq)	,
		int *	ifst,
		int *	ilst,
		float *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(compq)
	)

void strmm_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_float, alpha,
		const float *	A,
		SimTK_FDIM_(lda)	,
		float *	B,
		SimTK_FDIM_(ldb)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void strmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		const float *	A,
		SimTK_FDIM_(lda)	,
		float *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void strrfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	x,
		int *	ldx,
		float *	ferr,
		float *	berr,
		float *	work,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void strsen_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(compq)	,
		int *	select,
		SimTK_FDIM_(n)	,
		float *	t,
		SimTK_FDIM_(ldt)	,
		float *	q,
		SimTK_FDIM_(ldq)	,
		float *	wr,
		float *	wi,
		SimTK_FDIM_(m)	,
		float *	s,
		float *	sep,
		float *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(compq)
	)

void strsm_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_float, alpha,
		const float *	A,
		SimTK_FDIM_(lda)	,
		float *	B,
		SimTK_FDIM_(ldb)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void strsna_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(howmny)	,
		int *	select,
		SimTK_FDIM_(n)	,
		float *	t,
		SimTK_FDIM_(ldt)	,
		float *	vl,
		SimTK_FDIM_(ldvl)	,
		float *	vr,
		SimTK_FDIM_(ldvr)	,
		float *	s,
		float *	sep,
		int *	mm,
		SimTK_FDIM_(m)	,
		float *	work,
		int *	ldwork,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(howmny)
	)

void strsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		const float *	A,
		SimTK_FDIM_(lda)	,
		float *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void strsyl_	(	SimTK_FOPT_(trana)	,
		SimTK_FOPT_(tranb)	,
		int *	isgn,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		float *	c__,
		SimTK_FDIM_(ldc)	,
		float *	scale,
		SimTK_INFO_	,
		SimTK_FLEN_(trana)	,
		SimTK_FLEN_(tranb)
	)

void strti2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void strtri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void strtrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void stzrqf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		SimTK_INFO_
	)

void stzrzf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		float *	a,
		SimTK_FDIM_(lda)	,
		float *	tau,
		float *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void xerbla_	(	const char *	srname,
		SimTK_INFO_	,
		SimTK_FLEN_(srname)
	)

void zaxpy_	(	SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		SimTK_Z_ *	y,
		SimTK_FINC_(y)
	)

void zbdsqr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	ncvt,
		int *	nru,
		int *	ncc,
		double *	d__,
		double *	e,
		SimTK_Z_ *	vt,
		SimTK_FDIM_(ldvt)	,
		SimTK_Z_ *	u,
		SimTK_FDIM_(ldu)	,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zcopy_	(	SimTK_FDIM_(n)	,
		const SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		SimTK_Z_ *	y,
		SimTK_FINC_(y)
	)

void zdrot_	(	SimTK_FDIM_(n)	,
		SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		SimTK_Z_ *	y,
		SimTK_FINC_(y)	,
		const	SimTK_FSCL_double, c,
		const	SimTK_FSCL_double, s
	)

void zdrscl_	(	SimTK_FDIM_(n)	,
		double *	sa,
		SimTK_Z_ *	sx,
		SimTK_FINC_(x)
	)

void zdscal_	(	SimTK_FDIM_(n)	,
		const	SimTK_FSCL_double, alpha,
		SimTK_Z_ *	x,
		SimTK_FINC_(x)
	)

void zgbbrd_	(	SimTK_FOPT_(vect)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	ncc,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		double *	d__,
		double *	e,
		SimTK_Z_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_Z_ *	pt,
		int *	ldpt,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(vect)
	)

void zgbcon_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		int *	ipiv,
		double *	anorm,
		double *	rcond,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)
	)

void zgbequ_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		double *	r__,
		double *	c__,
		double *	rowcnd,
		double *	colcnd,
		double *	amax,
		SimTK_INFO_
	)

void zgbmv_	(	SimTK_FOPT_(transA)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const SimTK_Z_ *	A,
		SimTK_FDIM_(lda)	,
		const SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_SimTK_Z_, beta,
		SimTK_Z_ *	Y,
		SimTK_FINC_(Y)	,
		SimTK_FLEN_(transA)
	)

void zgbrfs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_Z_ *	afb,
		SimTK_FDIM_(ldafb)	,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void zgbsv_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_
	)

void zgbsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_Z_ *	afb,
		SimTK_FDIM_(ldafb)	,
		int *	ipiv,
		char *	equed,
		double *	r__,
		double *	c__,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(equed)
	)

void zgbtf2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		int *	ipiv,
		SimTK_INFO_
	)

void zgbtrf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		int *	ipiv,
		SimTK_INFO_
	)

void zgbtrs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void zgebak_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(side)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		double *	scale,
		SimTK_FDIM_(m)	,
		SimTK_Z_ *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(side)
	)

void zgebal_	(	SimTK_FOPT_(job)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ilo,
		int *	ihi,
		double *	scale,
		SimTK_INFO_	,
		SimTK_FLEN_(job)
	)

void zgebd2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	d__,
		double *	e,
		SimTK_Z_ *	tauq,
		SimTK_Z_ *	taup,
		SimTK_Z_ *	work,
		SimTK_INFO_
	)

void zgebrd_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	d__,
		double *	e,
		SimTK_Z_ *	tauq,
		SimTK_Z_ *	taup,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void zgecon_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	anorm,
		double *	rcond,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)
	)

void zgeequ_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	r__,
		double *	c__,
		double *	rowcnd,
		double *	colcnd,
		double *	amax,
		SimTK_INFO_
	)

void zgees_	(	SimTK_FOPT_(jobvs)	,
		SimTK_FOPT_(sort)	,
		SimTK_SELECT_Z	select,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	sdim,
		SimTK_Z_ *	w,
		SimTK_Z_ *	vs,
		SimTK_FDIM_(ldvs)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		int *	bwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvs)	,
		SimTK_FLEN_(sort)
	)

void zgeesx_	(	SimTK_FOPT_(jobvs)	,
		SimTK_FOPT_(sort)	,
		SimTK_SELECT_Z	select,
		char *	sense,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	sdim,
		SimTK_Z_ *	w,
		SimTK_Z_ *	vs,
		SimTK_FDIM_(ldvs)	,
		double *	rconde,
		double *	rcondv,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		int *	bwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvs)	,
		SimTK_FLEN_(sort)	,
		SimTK_FLEN_(sense)
	)

void zgeev_	(	SimTK_FOPT_(jobvl)	,
		SimTK_FOPT_(jobvr)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	w,
		SimTK_Z_ *	vl,
		SimTK_FDIM_(ldvl)	,
		SimTK_Z_ *	vr,
		SimTK_FDIM_(ldvr)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvl)	,
		SimTK_FLEN_(jobvr)
	)

void zgeevx_	(	SimTK_FOPT_(balanc)	,
		SimTK_FOPT_(jobvl)	,
		SimTK_FOPT_(jobvr)	,
		char *	sense,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	w,
		SimTK_Z_ *	vl,
		SimTK_FDIM_(ldvl)	,
		SimTK_Z_ *	vr,
		SimTK_FDIM_(ldvr)	,
		int *	ilo,
		int *	ihi,
		double *	scale,
		double *	abnrm,
		double *	rconde,
		double *	rcondv,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(balanc)	,
		SimTK_FLEN_(jobvl)	,
		SimTK_FLEN_(jobvr)	,
		SimTK_FLEN_(sense)
	)

void zgegs_	(	SimTK_FOPT_(jobvsl)	,
		SimTK_FOPT_(jobvsr)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const	SimTK_FSCL_SimTK_Z_, beta,
		SimTK_Z_ *	vsl,
		int *	ldvsl,
		SimTK_Z_ *	vsr,
		int *	ldvsr,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvl)	,
		SimTK_FLEN_(jobvr)
	)

void zgegv_	(	SimTK_FOPT_(jobvl)	,
		SimTK_FOPT_(jobvr)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const	SimTK_FSCL_SimTK_Z_, beta,
		SimTK_Z_ *	vl,
		SimTK_FDIM_(ldvl)	,
		SimTK_Z_ *	vr,
		SimTK_FDIM_(ldvr)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvl)	,
		SimTK_FLEN_(jobvr)
	)

void zgehd2_	(	SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_INFO_
	)

void zgehrd_	(	SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void zgelq2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_INFO_
	)

void zgelqf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void zgels_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void zgelsx_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		int *	jpvt,
		double *	rcond,
		int *	rank,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_
	)

void zgelsy_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		int *	jpvt,
		double *	rcond,
		int *	rank,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		SimTK_INFO_
	)

void zgemm_	(	SimTK_FOPT_(transA)	,
		SimTK_FOPT_(transB)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const SimTK_Z_ *	A,
		SimTK_FDIM_(lda)	,
		const SimTK_Z_ *	B,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_SimTK_Z_, beta,
		SimTK_Z_ *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(transB)
	)

void zgemv_	(	SimTK_FOPT_(transA)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const SimTK_Z_ *	A,
		SimTK_FDIM_(lda)	,
		const SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_SimTK_Z_, beta,
		SimTK_Z_ *	Y,
		SimTK_FINC_(Y)	,
		SimTK_FLEN_(transA)
	)

void zgeql2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_INFO_
	)

void zgeqlf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void zgeqp3_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	jpvt,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		SimTK_INFO_
	)

void zgeqpf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	jpvt,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_
	)

void zgeqr2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_INFO_
	)

void zgeqrf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void zgerc_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		const SimTK_Z_ *	y,
		SimTK_FINC_(y)	,
		SimTK_Z_ *	A,
		SimTK_FDIM_(lda)
	)

void zgerfs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	af,
		int *	ldaf,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void zgerq2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_INFO_
	)

void zgerqf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void zgeru_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		const SimTK_Z_ *	y,
		SimTK_FINC_(y)	,
		SimTK_Z_ *	A,
		SimTK_FDIM_(lda)
	)

void zgesc2_	(	SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	rhs,
		int *	ipiv,
		int *	jpiv,
		double *	scale
	)

void zgesv_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_
	)

void zgesvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	af,
		int *	ldaf,
		int *	ipiv,
		char *	equed,
		double *	r__,
		double *	c__,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(equed)
	)

void zgetc2_	(	SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		int *	jpiv,
		SimTK_INFO_
	)

void zgetf2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_INFO_
	)

void zgetrf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_INFO_
	)

void zgetri_	(	SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void zgetrs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void zggbak_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(side)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		double *	lscale,
		double *	rscale,
		SimTK_FDIM_(m)	,
		SimTK_Z_ *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(side)
	)

void zggbal_	(	SimTK_FOPT_(job)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		int *	ilo,
		int *	ihi,
		double *	lscale,
		double *	rscale,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(job)
	)

void zgges_	(	SimTK_FOPT_(jobvsl)	,
		SimTK_FOPT_(jobvsr)	,
		SimTK_FOPT_(sort)	,
		SimTK_SELECT_2Z	delctg,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		int *	sdim,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		SimTK_Z_ *	beta,
		SimTK_Z_ *	vsl,
		int *	ldvsl,
		SimTK_Z_ *	vsr,
		int *	ldvsr,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		int *	bwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvsl)	,
		SimTK_FLEN_(jobvsr)	,
		SimTK_FLEN_(sort)
	)

void zggesx_	(	SimTK_FOPT_(jobvsl)	,
		SimTK_FOPT_(jobvsr)	,
		SimTK_FOPT_(sort)	,
		SimTK_SELECT_2Z	delctg,
		char *	sense,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		int *	sdim,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const	SimTK_FSCL_SimTK_Z_, beta,
		SimTK_Z_ *	vsl,
		int *	ldvsl,
		SimTK_Z_ *	vsr,
		int *	ldvsr,
		double *	rconde,
		double *	rcondv,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		int *	iwork,
		int *	liwork,
		int *	bwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvsl)	,
		SimTK_FLEN_(jobvsr)	,
		SimTK_FLEN_(sort)	,
		SimTK_FLEN_(sense)
	)

void zggev_	(	SimTK_FOPT_(jobvl)	,
		SimTK_FOPT_(jobvr)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const	SimTK_FSCL_SimTK_Z_, beta,
		SimTK_Z_ *	vl,
		SimTK_FDIM_(ldvl)	,
		SimTK_Z_ *	vr,
		SimTK_FDIM_(ldvr)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobvl)	,
		SimTK_FLEN_(jobvr)
	)

void zggevx_	(	SimTK_FOPT_(balanc)	,
		SimTK_FOPT_(jobvl)	,
		SimTK_FOPT_(jobvr)	,
		char *	sense,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const	SimTK_FSCL_SimTK_Z_, beta,
		SimTK_Z_ *	vl,
		SimTK_FDIM_(ldvl)	,
		SimTK_Z_ *	vr,
		SimTK_FDIM_(ldvr)	,
		int *	ilo,
		int *	ihi,
		double *	lscale,
		double *	rscale,
		double *	abnrm,
		double *	bbnrm,
		double *	rconde,
		double *	rcondv,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		int *	iwork,
		int *	bwork,
		SimTK_INFO_	,
		SimTK_FLEN_(blanc)	,
		SimTK_FLEN_(jobvl)	,
		SimTK_FLEN_(jobvr)	,
		SimTK_FLEN_(sense)
	)

void zggglm_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(m)	,
		int *	p,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	d__,
		SimTK_Z_ *	x,
		SimTK_Z_ *	y,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void zgghrd_	(	SimTK_FOPT_(compq)	,
		SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_INFO_	,
		SimTK_FLEN_(compq)	,
		SimTK_FLEN_(compz)
	)

void zgglse_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	p,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	c__,
		SimTK_Z_ *	d__,
		SimTK_Z_ *	x,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void zggqrf_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(m)	,
		int *	p,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	taua,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	taub,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void zggrqf_	(	SimTK_FDIM_(m)	,
		int *	p,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	taua,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	taub,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void zggsvd_	(	SimTK_FOPT_(jobu)	,
		SimTK_FOPT_(jobv)	,
		SimTK_FOPT_(jobq)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	p,
		SimTK_FDIM_(k)	,
		int *	l,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_double, alpha,
		const	SimTK_FSCL_double, beta,
		SimTK_Z_ *	u,
		SimTK_FDIM_(ldu)	,
		SimTK_Z_ *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_Z_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_Z_ *	work,
		double *	rwork,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobu)	,
		SimTK_FLEN_(jobv)	,
		SimTK_FLEN_(jobq)
	)

void zggsvp_	(	SimTK_FOPT_(jobu)	,
		SimTK_FOPT_(jobv)	,
		SimTK_FOPT_(jobq)	,
		SimTK_FDIM_(m)	,
		int *	p,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		double *	tola,
		double *	tolb,
		SimTK_FDIM_(k)	,
		int *	l,
		SimTK_Z_ *	u,
		SimTK_FDIM_(ldu)	,
		SimTK_Z_ *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_Z_ *	q,
		SimTK_FDIM_(ldq)	,
		int *	iwork,
		double *	rwork,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(jobu)	,
		SimTK_FLEN_(jobv)	,
		SimTK_FLEN_(jobq)
	)

void zgtcon_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	dl,
		SimTK_Z_ *	d__,
		SimTK_Z_ *	du,
		SimTK_Z_ *	du2,
		int *	ipiv,
		double *	anorm,
		double *	rcond,
		SimTK_Z_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)
	)

void zgtrfs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	dl,
		SimTK_Z_ *	d__,
		SimTK_Z_ *	du,
		SimTK_Z_ *	dlf,
		SimTK_Z_ *	df,
		SimTK_Z_ *	duf,
		SimTK_Z_ *	du2,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void zgtsv_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	dl,
		SimTK_Z_ *	d__,
		SimTK_Z_ *	du,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_
	)

void zgtsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	dl,
		SimTK_Z_ *	d__,
		SimTK_Z_ *	du,
		SimTK_Z_ *	dlf,
		SimTK_Z_ *	df,
		SimTK_Z_ *	duf,
		SimTK_Z_ *	du2,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(trans)
	)

void zgttrf_	(	SimTK_FDIM_(n)	,
		SimTK_Z_ *	dl,
		SimTK_Z_ *	d__,
		SimTK_Z_ *	du,
		SimTK_Z_ *	du2,
		int *	ipiv,
		SimTK_INFO_
	)

void zgttrs_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	dl,
		SimTK_Z_ *	d__,
		SimTK_Z_ *	du,
		SimTK_Z_ *	du2,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void zgtts2_	(	int *	itrans,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	dl,
		SimTK_Z_ *	d__,
		SimTK_Z_ *	du,
		SimTK_Z_ *	du2,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)
	)

void zhbev_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		double *	w,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void zhbevd_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		double *	w,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		int *	lrwork,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void zhbevx_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_Z_ *	q,
		SimTK_FDIM_(ldq)	,
		double *	vl,
		double *	vu,
		int *	il,
		int *	iu,
		double *	abstol,
		SimTK_FDIM_(m)	,
		double *	w,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_Z_ *	work,
		double *	rwork,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void zhbgst_	(	SimTK_FOPT_(vect)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	ka,
		int *	kb,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_Z_ *	bb,
		int *	ldbb,
		SimTK_Z_ *	x,
		int *	ldx,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(vect)	,
		SimTK_FLEN_(uplo)
	)

void zhbgv_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	ka,
		int *	kb,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_Z_ *	bb,
		int *	ldbb,
		double *	w,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void zhbgvx_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	ka,
		int *	kb,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_Z_ *	bb,
		int *	ldbb,
		SimTK_Z_ *	q,
		SimTK_FDIM_(ldq)	,
		double *	vl,
		double *	vu,
		int *	il,
		int *	iu,
		double *	abstol,
		SimTK_FDIM_(m)	,
		double *	w,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_Z_ *	work,
		double *	rwork,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void zhbmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const SimTK_Z_ *	A,
		SimTK_FDIM_(lda)	,
		const SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_SimTK_Z_, beta,
		SimTK_Z_ *	y,
		SimTK_FINC_(y)	,
		SimTK_FLEN_(uplo)
	)

void zhbtrd_	(	SimTK_FOPT_(vect)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		double *	d__,
		double *	e,
		SimTK_Z_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_Z_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(vect)	,
		SimTK_FLEN_(uplo)
	)

void zhecon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		double *	anorm,
		double *	rcond,
		SimTK_Z_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zheev_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	w,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void zheevd_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	w,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		int *	lrwork,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void zheevr_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	vl,
		double *	vu,
		int *	il,
		int *	iu,
		double *	abstol,
		SimTK_FDIM_(m)	,
		double *	w,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		int *	isuppz,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		int *	lrwork,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void zheevx_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	vl,
		double *	vu,
		int *	il,
		int *	iu,
		double *	abstol,
		SimTK_FDIM_(m)	,
		double *	w,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void zhegs2_	(	int *	itype,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zhegst_	(	int *	itype,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zhegv_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		double *	w,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void zhegvd_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		double *	w,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		int *	lrwork,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void zhegvx_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		double *	vl,
		double *	vu,
		int *	il,
		int *	iu,
		double *	abstol,
		SimTK_FDIM_(m)	,
		double *	w,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void zhemm_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const SimTK_Z_ *	A,
		SimTK_FDIM_(lda)	,
		const SimTK_Z_ *	B,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_SimTK_Z_, beta,
		SimTK_Z_ *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)
	)

void zhemv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const SimTK_Z_ *	A,
		SimTK_FDIM_(lda)	,
		const SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_SimTK_Z_, beta,
		SimTK_Z_ *	y,
		SimTK_FINC_(y)	,
		SimTK_FLEN_(uplo)
	)

void zher2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		const SimTK_Z_ *	y,
		SimTK_FINC_(y)	,
		SimTK_Z_ *	A,
		SimTK_FDIM_(lda)	,
		SimTK_FLEN_(uplo)
	)

void zher2k_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const SimTK_Z_ *	A,
		SimTK_FDIM_(lda)	,
		const SimTK_Z_ *	B,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_double, beta,
		SimTK_Z_ *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)
	)

void zher_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_double, alpha,
		const SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		SimTK_Z_ *	A,
		SimTK_FDIM_(lda)	,
		SimTK_FLEN_(uplo)
	)

void zherfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	af,
		int *	ldaf,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zherk_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const	SimTK_FSCL_double, alpha,
		const SimTK_Z_ *	A,
		SimTK_FDIM_(lda)	,
		const	SimTK_FSCL_double, beta,
		SimTK_Z_ *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)
	)

void zhesv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zhesvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	af,
		int *	ldaf,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)
	)

void zhetd2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	d,
		double *	e,
		SimTK_Z_ *	tau,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zhetf2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zhetrd_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	d__,
		double *	e,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zhetrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zhetri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_Z_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zhetrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zhgeqz_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(compq)	,
		SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		SimTK_Z_ *	beta,
		SimTK_Z_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(compq)	,
		SimTK_FLEN_(compz)
	)

void zhpcon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		int *	ipiv,
		double *	anorm,
		double *	rcond,
		SimTK_Z_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zhpev_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		double *	w,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void zhpevd_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		double *	w,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		int *	lrwork,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void zhpevx_	(	SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		double *	vl,
		double *	vu,
		int *	il,
		int *	iu,
		double *	abstol,
		SimTK_FDIM_(m)	,
		double *	w,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_Z_ *	work,
		double *	rwork,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void zhpgst_	(	int *	itype,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		SimTK_Z_ *	bp,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zhpgv_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		SimTK_Z_ *	bp,
		double *	w,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void zhpgvd_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		SimTK_Z_ *	bp,
		double *	w,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		int *	lrwork,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(uplo)
	)

void zhpgvx_	(	int *	itype,
		SimTK_FOPT_(jobz)	,
		SimTK_FOPT_(range)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		SimTK_Z_ *	bp,
		double *	vl,
		double *	vu,
		int *	il,
		int *	iu,
		double *	abstol,
		SimTK_FDIM_(m)	,
		double *	w,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_Z_ *	work,
		double *	rwork,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_	,
		SimTK_FLEN_(jobz)	,
		SimTK_FLEN_(range)	,
		SimTK_FLEN_(uplo)
	)

void zhpmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const SimTK_Z_ *	Ap,
		const SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_SimTK_Z_, beta,
		SimTK_Z_ *	y,
		SimTK_FINC_(y)	,
		SimTK_FLEN_(uplo)
	)

void zhpr2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		const SimTK_Z_ *	y,
		SimTK_FINC_(y)	,
		SimTK_Z_ *	Ap,
		SimTK_FLEN_(uplo)
	)

void zhpr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_double, alpha,
		const SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		SimTK_Z_ *	A,
		SimTK_FLEN_(uplo)
	)

void zhprfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ap,
		SimTK_Z_ *	afp,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zhpsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ap,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zhpsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ap,
		SimTK_Z_ *	afp,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)
	)

void zhptrd_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		double *	d__,
		double *	e,
		SimTK_Z_ *	tau,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zhptrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		int *	ipiv,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zhptri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		int *	ipiv,
		SimTK_Z_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zhptrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ap,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zhsein_	(	SimTK_FOPT_(side)	,
		char *	eigsrc,
		char *	initv,
		int *	select,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	h__,
		int *	ldh,
		SimTK_Z_ *	w,
		SimTK_Z_ *	vl,
		SimTK_FDIM_(ldvl)	,
		SimTK_Z_ *	vr,
		SimTK_FDIM_(ldvr)	,
		int *	mm,
		SimTK_FDIM_(m)	,
		SimTK_Z_ *	work,
		double *	rwork,
		int *	ifaill,
		int *	ifailr,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(eigsrc)	,
		SimTK_FLEN_(initv)
	)

void zhseqr_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		SimTK_Z_ *	h__,
		int *	ldh,
		SimTK_Z_ *	w,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(compz)
	)

void zlabrd_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	nb,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	d__,
		double *	e,
		SimTK_Z_ *	tauq,
		SimTK_Z_ *	taup,
		SimTK_Z_ *	x,
		int *	ldx,
		SimTK_Z_ *	y,
		int *	ldy
	)

void zlacgv_	(	SimTK_FDIM_(n)	,
		SimTK_Z_ *	x,
		SimTK_FINC_(x)
	)

void zlacon_	(	SimTK_FDIM_(n)	,
		SimTK_Z_ *	v,
		SimTK_Z_ *	x,
		double *	est,
		int *	kase,
		int *	j,
		int *	jump,
		int *	iter
	)

void zlacp2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)
	)

void zlacpy_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)
	)

void zlacrm_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		double *	rwork,
		SimTK_FLEN_(uplo)
	)

void zlacrt_	(	SimTK_FDIM_(n)	,
		SimTK_Z_ *	cx,
		SimTK_FINC_(x)	,
		SimTK_Z_ *	cy,
		SimTK_FINC_(y)	,
		SimTK_Z_ *	c__,
		SimTK_Z_ *	s
	)

void zlaed0_	(	int *	qsiz,
		SimTK_FDIM_(n)	,
		double *	d__,
		double *	e,
		SimTK_Z_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_Z_ *	qstore,
		SimTK_FDIM_(ldqs)	,
		double *	rwork,
		int *	iwork,
		SimTK_INFO_
	)

void zlaed7_	(	SimTK_FDIM_(n)	,
		int *	cutpnt,
		int *	qsiz,
		int *	tlvls,
		int *	curlvl,
		int *	curpbm,
		double *	d__,
		SimTK_Z_ *	q,
		SimTK_FDIM_(ldq)	,
		double *	rho,
		int *	indxq,
		double *	qstore,
		int *	qptr,
		int *	prmptr,
		int *	perm,
		int *	givptr,
		int *	givcol,
		double *	givnum,
		SimTK_Z_ *	work,
		double *	rwork,
		int *	iwork,
		SimTK_INFO_
	)

void zlaed8_	(	SimTK_FDIM_(k)	,
		SimTK_FDIM_(n)	,
		int *	qsiz,
		SimTK_Z_ *	q,
		SimTK_FDIM_(ldq)	,
		double *	d__,
		double *	rho,
		int *	cutpnt,
		double *	z__,
		double *	dlamda,
		SimTK_Z_ *	q2,
		SimTK_FDIM_(ldq2)	,
		double *	w,
		int *	indxp,
		int *	indx,
		int *	indxq,
		int *	perm,
		int *	givptr,
		int *	givcol,
		double *	givnum,
		SimTK_INFO_
	)

void zlaein_	(	int *	rightv,
		int *	noinit,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	h__,
		int *	ldh,
		SimTK_Z_ *	w,
		SimTK_Z_ *	v,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		double *	rwork,
		double *	eps3,
		double *	smlnum,
		SimTK_INFO_
	)

void zlaesy_	(	SimTK_Z_ *	a,
		SimTK_Z_ *	b,
		SimTK_Z_ *	c__,
		SimTK_Z_ *	rt1,
		SimTK_Z_ *	rt2,
		SimTK_Z_ *	evscal,
		SimTK_Z_ *	cs1,
		SimTK_Z_ *	sn1
	)

void zlaev2_	(	SimTK_Z_ *	a,
		SimTK_Z_ *	b,
		SimTK_Z_ *	c__,
		double *	rt1,
		double *	rt2,
		double *	cs1,
		SimTK_Z_ *	sn1
	)

void zlags2_	(	int *	upper,
		double *	a1,
		SimTK_Z_ *	a2,
		double *	a3,
		double *	b1,
		SimTK_Z_ *	b2,
		double *	b3,
		double *	csu,
		SimTK_Z_ *	snu,
		double *	csv,
		SimTK_Z_ *	snv,
		double *	csq,
		SimTK_Z_ *	snq
	)

void zlagtm_	(	SimTK_FOPT_(trans)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		const	SimTK_FSCL_double, alpha,
		SimTK_Z_ *	dl,
		SimTK_Z_ *	d__,
		SimTK_Z_ *	du,
		SimTK_Z_ *	x,
		int *	ldx,
		const	SimTK_FSCL_double, beta,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_FLEN_(trans)
	)

void zlahef_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	nb,
		int *	kb,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_Z_ *	w,
		int *	ldw,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zlahqr_	(	int *	wantt,
		int *	wantz,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		SimTK_Z_ *	h__,
		int *	ldh,
		SimTK_Z_ *	w,
		int *	iloz,
		int *	ihiz,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_INFO_
	)

void zlahrd_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		int *	nb,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_Z_ *	y,
		int *	ldy
	)

void zlaic1_	(	int *	job,
		int *	j,
		SimTK_Z_ *	x,
		double *	sest,
		SimTK_Z_ *	w,
		SimTK_Z_ *	gamma,
		double *	sestpr,
		SimTK_Z_ *	s,
		SimTK_Z_ *	c__
	)

void zlals0_	(	int *	icompq,
		int *	nl,
		int *	nr,
		int *	sqre,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	bx,
		int *	ldbx,
		int *	perm,
		int *	givptr,
		int *	givcol,
		int *	ldgcol,
		double *	givnum,
		int *	ldgnum,
		double *	poles,
		double *	difl,
		double *	difr,
		double *	z__,
		SimTK_FDIM_(k)	,
		double *	c__,
		double *	s,
		double *	rwork,
		SimTK_INFO_
	)

void zlalsa_	(	int *	icompq,
		int *	smlsiz,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	bx,
		int *	ldbx,
		double *	u,
		SimTK_FDIM_(ldu)	,
		double *	vt,
		int *	k,
		double *	difl,
		double *	difr,
		double *	z__,
		double *	poles,
		int *	givptr,
		int *	givcol,
		int *	ldgcol,
		int *	perm,
		double *	givnum,
		double *	c__,
		double *	s,
		double *	rwork,
		int *	iwork,
		SimTK_INFO_
	)

double zlangb_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		const SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		double *	work,
		SimTK_FLEN_(norm)
	)

double zlange_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	work,
		SimTK_FLEN_(norm)
	)

double zlangt_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		const SimTK_Z_ *	dl,
		const SimTK_Z_ *	d,
		const SimTK_Z_ *	du,
		SimTK_FLEN_(norm)
	)

double zlanhb_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		double *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)
	)

double zlanhe_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)
	)

double zlanhp_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const SimTK_Z_ *	ap,
		double *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)
	)

double zlanhs_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		const SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	work,
		SimTK_FLEN_(norm)
	)

double zlanht_	(	SimTK_FOPT_(norm)	,
		SimTK_FDIM_(n)	,
		const double *	d,
		const SimTK_Z_ *	e,
		SimTK_FLEN_(norm)
	)

double zlansb_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		double *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)
	)

double zlansp_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const SimTK_Z_ *	ap,
		double *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)
	)

double zlansy_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)
	)

double zlantb_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		double *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

double zlantp_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		const SimTK_Z_ *	ap,
		double *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

double zlantr_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	work,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void zlapll_	(	SimTK_FDIM_(n)	,
		SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		SimTK_Z_ *	y,
		SimTK_FINC_(y)	,
		double *	ssmin
	)

void zlapmt_	(	int *	forwrd,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	x,
		int *	ldx,
		SimTK_FDIM_(k)
	)

void zlaqgb_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		double *	r__,
		double *	c__,
		double *	rowcnd,
		double *	colcnd,
		double *	amax,
		char *	equed
	)

void zlaqge_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	r__,
		double *	c__,
		double *	rowcnd,
		double *	colcnd,
		double *	amax,
		char *	equed
	)

void zlaqhb_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		double *	s,
		double *	scond,
		double *	amax,
		char *	equed,
		SimTK_FLEN_(uplo)
	)

void zlaqhe_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	s,
		double *	scond,
		double *	amax,
		char *	equed,
		SimTK_FLEN_(uplo)
	)

void zlaqhp_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		double *	s,
		double *	scond,
		double *	amax,
		char *	equed,
		SimTK_FLEN_(uplo)
	)

void zlaqp2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	offset,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	jpvt,
		SimTK_Z_ *	tau,
		double *	vn1,
		double *	vn2,
		SimTK_Z_ *	work
	)

void zlaqps_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	offset,
		int *	nb,
		int *	kb,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	jpvt,
		SimTK_Z_ *	tau,
		double *	vn1,
		double *	vn2,
		SimTK_Z_ *	auxv,
		SimTK_Z_ *	f,
		int *	ldf
	)

void zlaqsb_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		double *	s,
		double *	scond,
		double *	amax,
		char *	equed,
		SimTK_FLEN_(uplo)
	)

void zlaqsp_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		double *	s,
		double *	scond,
		double *	amax,
		char *	equed,
		SimTK_FLEN_(uplo)
	)

void zlaqsy_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	s,
		double *	scond,
		double *	amax,
		char *	equed,
		SimTK_FLEN_(uplo)
	)

void zlar1v_	(	SimTK_FDIM_(n)	,
		int *	b1,
		int *	bn,
		double *	sigma,
		double *	d__,
		double *	l,
		double *	ld,
		double *	lld,
		double *	gersch,
		SimTK_Z_ *	z__,
		double *	ztz,
		double *	mingma,
		int *	r__,
		int *	isuppz,
		double *	work
	)

void zlar2v_	(	SimTK_FDIM_(n)	,
		SimTK_Z_ *	x,
		SimTK_Z_ *	y,
		SimTK_Z_ *	z__,
		SimTK_FINC_(x)	,
		double *	c__,
		SimTK_Z_ *	s,
		SimTK_FINC_(c)
	)

void zlarcm_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		double *	rwork
	)

void zlarf_	(	SimTK_FOPT_(side)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	v,
		SimTK_FINC_(v)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	c__,
		int *	ldc,
		SimTK_Z_ *	work,
		SimTK_FLEN_(side)
	)

void zlarfb_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(direct)	,
		SimTK_FOPT_(storev)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_Z_ *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_Z_ *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_Z_ *	c__,
		int *	ldc,
		SimTK_Z_ *	work,
		int *	ldwork,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(direct)
	)

void zlarfg_	(	SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		SimTK_Z_ *	tau
	)

void zlarft_	(	SimTK_FOPT_(direct)	,
		SimTK_FOPT_(storev)	,
		SimTK_FDIM_(n)	,
		int *	k,
		SimTK_Z_ *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_FLEN_(direct)	,
		SimTK_FLEN_(storev)
	)

void zlarfx_	(	SimTK_FOPT_(side)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	v,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	c__,
		int *	ldc,
		SimTK_Z_ *	work,
		SimTK_FLEN_(side)
	)

void zlargv_	(	SimTK_FDIM_(n)	,
		SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		SimTK_Z_ *	y,
		SimTK_FINC_(y)	,
		double *	c__,
		SimTK_FINC_(c)
	)

void zlarnv_	(	int *	idist,
		int *	iseed,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	x
	)

void zlarrv_	(	SimTK_FDIM_(n)	,
		double *	d__,
		double *	l,
		int *	isplit,
		SimTK_FDIM_(m)	,
		double *	w,
		int *	iblock,
		double *	gersch,
		double *	tol,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		int *	isuppz,
		double *	work,
		int *	iwork,
		SimTK_INFO_
	)

void zlartg_	(	SimTK_Z_ *	f,
		SimTK_Z_ *	g,
		double *	cs,
		SimTK_Z_ *	sn,
		SimTK_Z_ *	r__
	)

void zlartv_	(	SimTK_FDIM_(n)	,
		SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		SimTK_Z_ *	y,
		SimTK_FINC_(y)	,
		double *	c__,
		SimTK_Z_ *	s,
		SimTK_FINC_(c)
	)

void zlarz_	(	SimTK_FOPT_(side)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	l,
		SimTK_Z_ *	v,
		SimTK_FINC_(v)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_Z_ *	work,
		SimTK_FLEN_(side)
	)

void zlarzb_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(direct)	,
		SimTK_FOPT_(storev)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		int *	l,
		SimTK_Z_ *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_Z_ *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_Z_ *	work,
		int *	ldwork,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(direct)
	)

void zlarzt_	(	SimTK_FOPT_(direct)	,
		SimTK_FOPT_(storev)	,
		SimTK_FDIM_(n)	,
		int *	k,
		SimTK_Z_ *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_FLEN_(direct)	,
		SimTK_FLEN_(storev)
	)

void zlascl_	(	char *	type__,
		SimTK_FDIM_(kl)	,
		SimTK_FDIM_(ku)	,
		double *	cfrom,
		double *	cto,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(type)
	)

void zlaset_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const	SimTK_FSCL_SimTK_Z_, beta,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_FLEN_(uplo)
	)

void zlasr_	(	SimTK_FOPT_(side)	,
		char *	pivot,
		SimTK_FOPT_(direct)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		double *	c__,
		double *	s,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(pivot)	,
		SimTK_FLEN_(direct)
	)

void zlassq_	(	SimTK_FDIM_(n)	,
		SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		double *	scale,
		double *	sumsq
	)

void zlaswp_	(	SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	k1,
		int *	k2,
		int *	ipiv,
		SimTK_FINC_(x)
	)

void zlasyf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	nb,
		int *	kb,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_Z_ *	w,
		int *	ldw,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zlatbs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		char *	normin,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_Z_ *	x,
		double *	scale,
		double *	cnorm,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void zlatdf_	(	int *	ijob,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_Z_ *	rhs,
		double *	rdsum,
		double *	rdscal,
		int *	ipiv,
		int *	jpiv
	)

void zlatps_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		char *	normin,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		SimTK_Z_ *	x,
		double *	scale,
		double *	cnorm,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void zlatrd_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	nb,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	e,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	w,
		int *	ldw,
		SimTK_FLEN_(uplo)
	)

void zlatrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		char *	normin,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	x,
		double *	scale,
		double *	cnorm,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void zlatrz_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	l,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work
	)

void zlatzm_	(	SimTK_FOPT_(side)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	v,
		SimTK_FINC_(v)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	c1,
		SimTK_Z_ *	c2,
		SimTK_FDIM_(ldc)	,
		SimTK_Z_ *	work,
		SimTK_FLEN_(side)
	)

void zlauu2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zlauum_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zpbcon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		double *	anorm,
		double *	rcond,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zpbequ_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		double *	s,
		double *	scond,
		double *	amax,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zpbrfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_Z_ *	afb,
		SimTK_FDIM_(ldafb)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zpbstf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zpbsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zpbsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_Z_ *	afb,
		SimTK_FDIM_(ldafb)	,
		char *	equed,
		double *	s,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void zpbtf2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zpbtrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zpbtrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zpocon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	anorm,
		double *	rcond,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zpoequ_	(	SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	s,
		double *	scond,
		double *	amax,
		SimTK_INFO_
	)

void zporfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	af,
		int *	ldaf,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zposv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zposvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	af,
		int *	ldaf,
		char *	equed,
		double *	s,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void zpotf2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zpotrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zpotri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zpotrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zppcon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		double *	anorm,
		double *	rcond,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zppequ_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		double *	s,
		double *	scond,
		double *	amax,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zpprfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ap,
		SimTK_Z_ *	afp,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zppsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ap,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)
	)

void zppsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ap,
		SimTK_Z_ *	afp,
		char *	equed,
		double *	s,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(equed)
	)

void zpptrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zpptri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zpptrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ap,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zptcon_	(	SimTK_FDIM_(n)	,
		double *	d__,
		SimTK_Z_ *	e,
		double *	anorm,
		double *	rcond,
		double *	rwork,
		SimTK_INFO_
	)

void zptrfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	d__,
		SimTK_Z_ *	e,
		double *	df,
		SimTK_Z_ *	ef,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zptsv_	(	SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	d__,
		SimTK_Z_ *	e,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_
	)

void zptsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	d__,
		SimTK_Z_ *	e,
		double *	df,
		SimTK_Z_ *	ef,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)
	)

void zpttrf_	(	SimTK_FDIM_(n)	,
		double *	d__,
		SimTK_Z_ *	e,
		SimTK_INFO_
	)

void zpttrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	d__,
		SimTK_Z_ *	e,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zptts2_	(	int *	iuplo,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		double *	d__,
		SimTK_Z_ *	e,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)
	)

void zrot_	(	SimTK_FDIM_(n)	,
		SimTK_Z_ *	cx,
		SimTK_FINC_(x)	,
		SimTK_Z_ *	cy,
		SimTK_FINC_(y)	,
		double *	c__,
		SimTK_Z_ *	s
	)

void zrotg_	(	SimTK_Z_ *	a,
		SimTK_Z_ *	b,
		double *	c,
		SimTK_Z_ *	s
	)

void zscal_	(	SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		SimTK_Z_ *	x,
		SimTK_FINC_(x)
	)

void zspcon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		int *	ipiv,
		double *	anorm,
		double *	rcond,
		SimTK_Z_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zspmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		SimTK_Z_ *	ap,
		SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		SimTK_Z_ *	beta,
		SimTK_Z_ *	y,
		SimTK_FINC_(y)	,
		SimTK_FLEN_(uplo)
	)

void zspr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		SimTK_Z_ *	ap,
		SimTK_FLEN_(uplo)
	)

void zsprfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ap,
		SimTK_Z_ *	afp,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zspsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ap,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zspsvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ap,
		SimTK_Z_ *	afp,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)
	)

void zsptrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		int *	ipiv,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zsptri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		int *	ipiv,
		SimTK_Z_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zsptrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ap,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zstedc_	(	SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		double *	d__,
		double *	e,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		int *	lrwork,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_	,
		SimTK_FLEN_(compz)
	)

void zstein_	(	SimTK_FDIM_(n)	,
		double *	d__,
		double *	e,
		SimTK_FDIM_(m)	,
		double *	w,
		int *	iblock,
		int *	isplit,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		int *	iwork,
		int *	ifail,
		SimTK_INFO_
	)

void zsteqr_	(	SimTK_FOPT_(compz)	,
		SimTK_FDIM_(n)	,
		double *	d__,
		double *	e,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		double *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(compz)
	)

void zswap_	(	SimTK_FDIM_(n)	,
		SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		SimTK_Z_ *	y,
		SimTK_FINC_(y)
	)

void zsycon_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		double *	anorm,
		double *	rcond,
		SimTK_Z_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zsymm_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const SimTK_Z_ *	A,
		SimTK_FDIM_(lda)	,
		const SimTK_Z_ *	B,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_SimTK_Z_, beta,
		SimTK_Z_ *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)
	)

void zsymv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		const	SimTK_FSCL_SimTK_Z_, beta,
		SimTK_Z_ *	y,
		SimTK_FINC_(y)	,
		SimTK_FLEN_(uplo)
	)

void zsyr2k_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const SimTK_Z_ *	A,
		SimTK_FDIM_(lda)	,
		const SimTK_Z_ *	B,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_SimTK_Z_, beta,
		SimTK_Z_ *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)
	)

void zsyr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_FLEN_(uplo)
	)

void zsyrfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	af,
		int *	ldaf,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zsyrk_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const SimTK_Z_ *	A,
		SimTK_FDIM_(lda)	,
		const	SimTK_FSCL_SimTK_Z_, beta,
		SimTK_Z_ *	C,
		SimTK_FDIM_(ldc)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)
	)

void zsysv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zsysvx_	(	SimTK_FOPT_(fact)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	af,
		int *	ldaf,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	rcond,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(fact)	,
		SimTK_FLEN_(uplo)
	)

void zsytf2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zsytrf_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zsytri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_Z_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zsytrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		int *	ipiv,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void ztbcon_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		double *	rcond,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void ztbmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const SimTK_Z_ *	A,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void ztbrfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void ztbsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		const SimTK_Z_ *	A,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void ztbtrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		int *	kd,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ab,
		SimTK_FDIM_(ldab)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void ztgevc_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(howmny)	,
		int *	select,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	vl,
		SimTK_FDIM_(ldvl)	,
		SimTK_Z_ *	vr,
		SimTK_FDIM_(ldvr)	,
		int *	mm,
		SimTK_FDIM_(m)	,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(howmny)
	)

void ztgex2_	(	int *	wantq,
		int *	wantz,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		int *	j1,
		SimTK_INFO_
	)

void ztgexc_	(	int *	wantq,
		int *	wantz,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		int *	ifst,
		int *	ilst,
		SimTK_INFO_
	)

void ztgsen_	(	int *	ijob,
		int *	wantq,
		int *	wantz,
		int *	select,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		SimTK_Z_ *	beta,
		SimTK_Z_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_Z_ *	z__,
		SimTK_FDIM_(ldz)	,
		SimTK_FDIM_(m)	,
		double *	pl,
		double *	pr,
		double *	dif,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		int *	liwork,
		SimTK_INFO_
	)

void ztgsja_	(	SimTK_FOPT_(jobu)	,
		SimTK_FOPT_(jobv)	,
		SimTK_FOPT_(jobq)	,
		SimTK_FDIM_(m)	,
		int *	p,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		int *	l,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		double *	tola,
		double *	tolb,
		const	SimTK_FSCL_double, alpha,
		const	SimTK_FSCL_double, beta,
		SimTK_Z_ *	u,
		SimTK_FDIM_(ldu)	,
		SimTK_Z_ *	v,
		SimTK_FDIM_(ldv)	,
		SimTK_Z_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_Z_ *	work,
		int *	ncycle,
		SimTK_INFO_	,
		SimTK_FLEN_(jobu)	,
		SimTK_FLEN_(jobv)	,
		SimTK_FLEN_(jobq)
	)

void ztgsna_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(howmny)	,
		int *	select,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	vl,
		SimTK_FDIM_(ldvl)	,
		SimTK_Z_ *	vr,
		SimTK_FDIM_(ldvr)	,
		double *	s,
		double *	dif,
		int *	mm,
		SimTK_FDIM_(m)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(howmny)
	)

void ztgsy2_	(	SimTK_FOPT_(trans)	,
		int *	ijob,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_Z_ *	d__,
		int *	ldd,
		SimTK_Z_ *	e,
		int *	lde,
		SimTK_Z_ *	f,
		int *	ldf,
		double *	scale,
		double *	rdsum,
		double *	rdscal,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void ztgsyl_	(	SimTK_FOPT_(trans)	,
		int *	ijob,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_Z_ *	d__,
		int *	ldd,
		SimTK_Z_ *	e,
		int *	lde,
		SimTK_Z_ *	f,
		int *	ldf,
		double *	scale,
		double *	dif,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		int *	iwork,
		SimTK_INFO_	,
		SimTK_FLEN_(trans)
	)

void ztpcon_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		double *	rcond,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void ztpmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		const SimTK_Z_ *	Ap,
		SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void ztprfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ap,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void ztpsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		const SimTK_Z_ *	Ap,
		SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void ztptri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void ztptrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	ap,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void ztrcon_	(	SimTK_FOPT_(norm)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		double *	rcond,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(norm)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void ztrevc_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(howmny)	,
		int *	select,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_Z_ *	vl,
		SimTK_FDIM_(ldvl)	,
		SimTK_Z_ *	vr,
		SimTK_FDIM_(ldvr)	,
		int *	mm,
		SimTK_FDIM_(m)	,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(howmny)
	)

void ztrexc_	(	SimTK_FOPT_(compq)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_Z_ *	q,
		SimTK_FDIM_(ldq)	,
		int *	ifst,
		int *	ilst,
		SimTK_INFO_	,
		SimTK_FLEN_(compq)
	)

void ztrmm_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const SimTK_Z_ *	A,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	B,
		SimTK_FDIM_(ldb)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void ztrmv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		const SimTK_Z_ *	A,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void ztrrfs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	x,
		int *	ldx,
		double *	ferr,
		double *	berr,
		SimTK_Z_ *	work,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void ztrsen_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(compq)	,
		int *	select,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_Z_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_Z_ *	w,
		SimTK_FDIM_(m)	,
		double *	s,
		double *	sep,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(compq)
	)

void ztrsm_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		const	SimTK_FSCL_SimTK_Z_, alpha,
		const SimTK_Z_ *	A,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	B,
		SimTK_FDIM_(ldb)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(diag)
	)

void ztrsna_	(	SimTK_FOPT_(job)	,
		SimTK_FOPT_(howmny)	,
		int *	select,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	t,
		SimTK_FDIM_(ldt)	,
		SimTK_Z_ *	vl,
		SimTK_FDIM_(ldvl)	,
		SimTK_Z_ *	vr,
		SimTK_FDIM_(ldvr)	,
		double *	s,
		double *	sep,
		int *	mm,
		SimTK_FDIM_(m)	,
		SimTK_Z_ *	work,
		int *	ldwork,
		double *	rwork,
		SimTK_INFO_	,
		SimTK_FLEN_(job)	,
		SimTK_FLEN_(howmny)
	)

void ztrsv_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(transA)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		const SimTK_Z_ *	A,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	x,
		SimTK_FINC_(x)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void ztrsyl_	(	char *	tranA,
		char *	tranB,
		int *	isgn,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		double *	scale,
		SimTK_INFO_	,
		SimTK_FLEN_(transA)	,
		SimTK_FLEN_(transB)
	)

void ztrti2_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void ztrtri_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(diag)
	)

void ztrtrs_	(	SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FOPT_(diag)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(nrhs)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	b,
		SimTK_FDIM_(ldb)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)	,
		SimTK_FLEN_(diag)
	)

void ztzrqf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_INFO_
	)

void ztzrzf_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void zung2l_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_INFO_
	)

void zung2r_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_INFO_
	)

void zungbr_	(	SimTK_FOPT_(vect)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(vect)
	)

void zunghr_	(	SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void zungl2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_INFO_
	)

void zunglq_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void zungql_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void zungqr_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void zungr2_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_INFO_
	)

void zungrq_	(	SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_
	)

void zungtr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zunm2l_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_Z_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void zunm2r_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_Z_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void zunmbr_	(	SimTK_FOPT_(vect)	,
		SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(vect)	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void zunmhr_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		int *	ilo,
		int *	ihi,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void zunml2_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_Z_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void zunmlq_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void zunmql_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void zunmqr_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void zunmr2_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_Z_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void zunmr3_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		int *	l,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_Z_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(trans)
	)

void zunmrq_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)
	)

void zunmrz_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_FDIM_(k)	,
		int *	l,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)
	)

void zunmtr_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	a,
		SimTK_FDIM_(lda)	,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_Z_ *	work,
		SimTK_FDIM_(lwork)	,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)
	)

void zupgtr_	(	SimTK_FOPT_(uplo)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	q,
		SimTK_FDIM_(ldq)	,
		SimTK_Z_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(uplo)
	)

void zupmtr_	(	SimTK_FOPT_(side)	,
		SimTK_FOPT_(uplo)	,
		SimTK_FOPT_(trans)	,
		SimTK_FDIM_(m)	,
		SimTK_FDIM_(n)	,
		SimTK_Z_ *	ap,
		SimTK_Z_ *	tau,
		SimTK_Z_ *	c__,
		SimTK_FDIM_(ldc)	,
		SimTK_Z_ *	work,
		SimTK_INFO_	,
		SimTK_FLEN_(side)	,
		SimTK_FLEN_(uplo)	,
		SimTK_FLEN_(trans)
	)