Lines Matching defs:DSYTRD_SB2ST
230 SUBROUTINE DSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, subroutine
245 CHARACTER STAGE1, UPLO, VECT
246 INTEGER N, KD, LDAB, LHOUS, LWORK, INFO
249 DOUBLE PRECISION D( * ), E( * )
250 DOUBLE PRECISION AB( LDAB, * ), HOUS( * ), WORK( * )
256 DOUBLE PRECISION RZERO
257 DOUBLE PRECISION ZERO, ONE
263 LOGICAL LQUERY, WANTQ, UPPER, AFTERS1
264 INTEGER I, M, K, IB, SWEEPID, MYID, SHIFT, STT, ST,
265 $ ED, STIND, EDIND, BLKLASTIND, COLPT, THED,
266 $ STEPERCOL, GRSIZ, THGRSIZ, THGRNB, THGRID,
267 $ NBTILES, TTYPE, TID, NTHREADS, DEBUG,
268 $ ABDPOS, ABOFDPOS, DPOS, OFDPOS, AWPOS,
269 $ INDA, INDW, APOS, SIZEA, LDA, INDV, INDTAU,
270 $ SIDEV, SIZETAU, LDV, LHMIN, LWMIN
297 IB = ILAENV2STAGE( 2, 'DSYTRD_SB2ST', VECT, N, KD, -1, -1 ) argument
379 30 CONTINUE
382 40 CONTINUE
402 50 CONTINUE
407 60 CONTINUE
411 70 CONTINUE
518 140 CONTINUE
519 130 CONTINUE
520 120 CONTINUE
521 110 CONTINUE
522 100 CONTINUE
553 * End of DSYTRD_SB2ST argument