Subroutine f08ysf ( |
jobu, jobv, jobq, m, p, n, k, l, a, lda, b, ldb, tola, tolb, alpha, beta, u, ldu, v, ldv, q, ldq, work, ncycle, info) |
Integer, Intent (In) |
:: |
m, p, n, k, l, lda, ldb, ldu, ldv, ldq |
Integer, Intent (Out) |
:: |
ncycle, info |
Real (Kind=nag_wp), Intent (In) |
:: |
tola, tolb |
Real (Kind=nag_wp), Intent (Out) |
:: |
alpha(n), beta(n) |
Complex (Kind=nag_wp), Intent (Inout) |
:: |
a(lda,*), b(ldb,*), u(ldu,*), v(ldv,*), q(ldq,*) |
Complex (Kind=nag_wp), Intent (Out) |
:: |
work(2*n) |
Character (1), Intent (In) |
:: |
jobu, jobv, jobq |
|