Subroutine e04nc_a1w_f ( |
ad_handle, m, n, nclin, ldc, lda, c, bl, bu, cvec, istate, kx, x, a, b, iter, obj, clamda, iwork, liwork, work, lwork, lwsav, iwsav, rwsav, ifail) |
Integer, Intent (In) |
:: |
m, n, nclin, ldc, lda, liwork, lwork |
Integer, Intent (Inout) |
:: |
istate(n+nclin), kx(n), iwsav(610), ifail |
Integer, Intent (Out) |
:: |
iter, iwork(liwork) |
Type (nagad_a1w_w_rtype), Intent (In) |
:: |
c(ldc,*), bl(n+nclin), bu(n+nclin), cvec(*) |
Type (nagad_a1w_w_rtype), Intent (Inout) |
:: |
x(n), a(lda,*), b(*), rwsav(475) |
Type (nagad_a1w_w_rtype), Intent (Out) |
:: |
obj, clamda(n+nclin), work(lwork) |
Logical, Intent (Inout) |
:: |
lwsav(120) |
Type (c_ptr), Intent (Inout) |
:: |
ad_handle |
|