37 char jobv1t,
char jobv2t,
char trans,
lapack_int m,
39 double* phi,
double* u1,
lapack_int ldu1,
double* u2,
42 double* b11e,
double* b12d,
double* b12e,
43 double* b21d,
double* b21e,
double* b22d,
50 lapack_int nrows_u1, nrows_u2, nrows_v1t, nrows_v2t;
55 #ifndef LAPACK_DISABLE_NAN_CHECK
90 trans, m, p, q, theta, phi, u1, ldu1, u2, ldu2,
91 v1t, ldv1t, v2t, ldv2t, b11d, b11e, b12d, b12e,
92 b21d, b21e, b22d, b22e, &work_query, lwork );
105 trans, m, p, q, theta, phi, u1, ldu1, u2, ldu2,
106 v1t, ldv1t, v2t, ldv2t, b11d, b11e, b12d, b12e,
107 b21d, b21e, b22d, b22e, work, lwork );