Lines Matching defs:DLARRJ

167       SUBROUTINE DLARRJ( N, D, E2, IFIRST, ILAST,  subroutine
177       INTEGER            IFIRST, ILAST, INFO, N, OFFSET
178       DOUBLE PRECISION   PIVMIN, RTOL, SPDIAM
181       INTEGER            IWORK( * )
182       DOUBLE PRECISION   D( * ), E2( * ), W( * ),
183      $                   WERR( * ), WORK( * )
189       DOUBLE PRECISION   ZERO, ONE, TWO, HALF
192       INTEGER   MAXITR
195       INTEGER            CNT, I, I1, I2, II, ITER, J, K, NEXT, NINT,
196      $                   OLNINT, P, PREV, SAVI1
197       DOUBLE PRECISION   DPLUS, FAC, LEFT, MID, RIGHT, S, TMP, WIDTH
257  20         CONTINUE
265  30         CONTINUE
275  50         CONTINUE
283  60         CONTINUE
295  75   CONTINUE
304  80   CONTINUE
347  90      CONTINUE
377 *     End of DLARRJ  argument