45 LAPACK_strsyl( &trana, &tranb, &isgn, &m, &n, a, &lda, b, &ldb, c, &ldc,
94 LAPACK_strsyl( &trana, &tranb, &isgn, &m, &n, a_t, &lda_t, b_t, &ldb_t,
95 c_t, &ldc_t, scale, &info );
void LAPACKE_sge_trans(int matrix_order, lapack_int m, lapack_int n, const float *in, lapack_int ldin, float *out, lapack_int ldout)
lapack_int LAPACKE_strsyl_work(int matrix_order, char trana, char tranb, lapack_int isgn, lapack_int m, lapack_int n, const float *a, lapack_int lda, const float *b, lapack_int ldb, float *c, lapack_int ldc, float *scale)
set ue cd $ADTTMP cat<< EOF > tmp f Program LinearEquations Implicit none Real b(3) integer i
void LAPACK_strsyl(char *trana, char *tranb, lapack_int *isgn, lapack_int *m, lapack_int *n, const float *a, lapack_int *lda, const float *b, lapack_int *ldb, float *c, lapack_int *ldc, float *scale, lapack_int *info)
#define LAPACKE_malloc(size)
#define LAPACK_TRANSPOSE_MEMORY_ERROR
set ue cd $ADTTMP cat<< EOF > tmp c void LAPACKE_xerbla(const char *name, lapack_int info)