264 SUBROUTINE sstegr( JOBZ, RANGE, N, D, E, VL, VU, IL, IU,
265 $ abstol, m, w, z, ldz, isuppz, work, lwork, iwork,
274 CHARACTER JOBZ, RANGE
275 INTEGER IL, INFO, IU, LDZ, LIWORK, LWORK, M, N
279 INTEGER ISUPPZ( * ), IWORK( * )
280 REAL D( * ), E( * ), W( * ), WORK( * )
296 CALL sstemr( jobz, range, n, d, e, vl, vu, il, iu,
297 $ m, w, z, ldz, n, isuppz, tryrac, work, lwork,
298 $ iwork, liwork, info )
subroutine sstegr(JOBZ, RANGE, N, D, E, VL, VU, IL, IU, ABSTOL, M, W, Z, LDZ, ISUPPZ, WORK, LWORK, IWORK, LIWORK, INFO)
SSTEGR
subroutine sstemr(JOBZ, RANGE, N, D, E, VL, VU, IL, IU, M, W, Z, LDZ, NZC, ISUPPZ, TRYRAC, WORK, LWORK, IWORK, LIWORK, INFO)
SSTEMR