Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer(kind=ilp), | intent(in) | :: | ijob | |||
logical(kind=lk), | intent(in) | :: | wantq | |||
logical(kind=lk), | intent(in) | :: | wantz | |||
logical(kind=lk), | intent(in) | :: | select(*) | |||
integer(kind=ilp), | intent(in) | :: | n | |||
real(kind=sp), | intent(inout) | :: | a(lda,*) | |||
integer(kind=ilp), | intent(in) | :: | lda | |||
real(kind=sp), | intent(inout) | :: | b(ldb,*) | |||
integer(kind=ilp), | intent(in) | :: | ldb | |||
real(kind=sp), | intent(out) | :: | alphar(*) | |||
real(kind=sp), | intent(out) | :: | alphai(*) | |||
real(kind=sp), | intent(out) | :: | beta(*) | |||
real(kind=sp), | intent(inout) | :: | q(ldq,*) | |||
integer(kind=ilp), | intent(in) | :: | ldq | |||
real(kind=sp), | intent(inout) | :: | z(ldz,*) | |||
integer(kind=ilp), | intent(in) | :: | ldz | |||
integer(kind=ilp), | intent(out) | :: | m | |||
real(kind=sp), | intent(out) | :: | pl | |||
real(kind=sp), | intent(out) | :: | pr | |||
real(kind=sp), | intent(out) | :: | dif(*) | |||
real(kind=sp), | intent(out) | :: | work(*) | |||
integer(kind=ilp), | intent(in) | :: | lwork | |||
integer(kind=ilp), | intent(out) | :: | iwork(*) | |||
integer(kind=ilp), | intent(in) | :: | liwork | |||
integer(kind=ilp), | intent(out) | :: | info |