/dports/math/xlapack/lapack-3.10.0/SRC/ |
H A D | zlaqr5.f | 322 IF( KTOP.GE.KBOT ) 345 IF( KTOP+2.LE.KBOT ) 346 $ H( KTOP+2, KTOP ) = ZERO 363 JTOP = MAX( KTOP, INCOL ) 367 JTOP = KTOP 410 IF( K.EQ.KTOP-1 ) THEN 462 IF( K.GE.KTOP ) THEN 524 IF( K.EQ.KTOP-1 ) THEN 525 CALL ZLAQR1( 3, H( KTOP, KTOP ), LDH, S( 2*M-1 ), 642 IF( K.LT.KTOP) [all …]
|
H A D | slaqr5.f | 322 IF( KTOP.GE.KBOT ) 367 IF( KTOP+2.LE.KBOT ) 368 $ H( KTOP+2, KTOP ) = ZERO 385 JTOP = MAX( KTOP, INCOL ) 389 JTOP = KTOP 432 IF( K.EQ.KTOP-1 ) THEN 483 IF( K.GE.KTOP ) THEN 545 IF( K.EQ.KTOP-1 ) THEN 546 CALL SLAQR1( 3, H( KTOP, KTOP ), LDH, SR( 2*M-1 ), 660 IF( K.LT.KTOP) [all …]
|
H A D | claqr5.f | 322 IF( KTOP.GE.KBOT ) 345 IF( KTOP+2.LE.KBOT ) 346 $ H( KTOP+2, KTOP ) = ZERO 363 JTOP = MAX( KTOP, INCOL ) 367 JTOP = KTOP 410 IF( K.EQ.KTOP-1 ) THEN 462 IF( K.GE.KTOP) THEN 524 IF( K.EQ.KTOP-1 ) THEN 525 CALL CLAQR1( 3, H( KTOP, KTOP ), LDH, S( 2*M-1 ), 642 IF( K.LT.KTOP) [all …]
|
H A D | dlaqr5.f | 322 IF( KTOP.GE.KBOT ) 367 IF( KTOP+2.LE.KBOT ) 368 $ H( KTOP+2, KTOP ) = ZERO 385 JTOP = MAX( KTOP, INCOL ) 389 JTOP = KTOP 432 IF( K.EQ.KTOP-1 ) THEN 483 IF( K.GE.KTOP ) THEN 545 IF( K.EQ.KTOP-1 ) THEN 546 CALL DLAQR1( 3, H( KTOP, KTOP ), LDH, SR( 2*M-1 ), 660 IF( K.LT.KTOP) [all …]
|
/dports/math/blas/lapack-3.10.0/SRC/ |
H A D | dlaqr5.f | 322 IF( KTOP.GE.KBOT ) 367 IF( KTOP+2.LE.KBOT ) 368 $ H( KTOP+2, KTOP ) = ZERO 385 JTOP = MAX( KTOP, INCOL ) 389 JTOP = KTOP 432 IF( K.EQ.KTOP-1 ) THEN 483 IF( K.GE.KTOP ) THEN 545 IF( K.EQ.KTOP-1 ) THEN 546 CALL DLAQR1( 3, H( KTOP, KTOP ), LDH, SR( 2*M-1 ), 660 IF( K.LT.KTOP) [all …]
|
H A D | zlaqr5.f | 322 IF( KTOP.GE.KBOT ) 345 IF( KTOP+2.LE.KBOT ) 346 $ H( KTOP+2, KTOP ) = ZERO 363 JTOP = MAX( KTOP, INCOL ) 367 JTOP = KTOP 410 IF( K.EQ.KTOP-1 ) THEN 462 IF( K.GE.KTOP ) THEN 524 IF( K.EQ.KTOP-1 ) THEN 525 CALL ZLAQR1( 3, H( KTOP, KTOP ), LDH, S( 2*M-1 ), 642 IF( K.LT.KTOP) [all …]
|
H A D | slaqr5.f | 322 IF( KTOP.GE.KBOT ) 367 IF( KTOP+2.LE.KBOT ) 368 $ H( KTOP+2, KTOP ) = ZERO 385 JTOP = MAX( KTOP, INCOL ) 389 JTOP = KTOP 432 IF( K.EQ.KTOP-1 ) THEN 483 IF( K.GE.KTOP ) THEN 545 IF( K.EQ.KTOP-1 ) THEN 546 CALL SLAQR1( 3, H( KTOP, KTOP ), LDH, SR( 2*M-1 ), 660 IF( K.LT.KTOP) [all …]
|
H A D | claqr5.f | 322 IF( KTOP.GE.KBOT ) 345 IF( KTOP+2.LE.KBOT ) 346 $ H( KTOP+2, KTOP ) = ZERO 363 JTOP = MAX( KTOP, INCOL ) 367 JTOP = KTOP 410 IF( K.EQ.KTOP-1 ) THEN 462 IF( K.GE.KTOP) THEN 524 IF( K.EQ.KTOP-1 ) THEN 525 CALL CLAQR1( 3, H( KTOP, KTOP ), LDH, S( 2*M-1 ), 642 IF( K.LT.KTOP) [all …]
|
/dports/math/lapacke/lapack-3.10.0/SRC/ |
H A D | dlaqr5.f | 322 IF( KTOP.GE.KBOT ) 367 IF( KTOP+2.LE.KBOT ) 368 $ H( KTOP+2, KTOP ) = ZERO 385 JTOP = MAX( KTOP, INCOL ) 389 JTOP = KTOP 432 IF( K.EQ.KTOP-1 ) THEN 483 IF( K.GE.KTOP ) THEN 545 IF( K.EQ.KTOP-1 ) THEN 546 CALL DLAQR1( 3, H( KTOP, KTOP ), LDH, SR( 2*M-1 ), 660 IF( K.LT.KTOP) [all …]
|
H A D | claqr5.f | 322 IF( KTOP.GE.KBOT ) 345 IF( KTOP+2.LE.KBOT ) 346 $ H( KTOP+2, KTOP ) = ZERO 363 JTOP = MAX( KTOP, INCOL ) 367 JTOP = KTOP 410 IF( K.EQ.KTOP-1 ) THEN 462 IF( K.GE.KTOP) THEN 524 IF( K.EQ.KTOP-1 ) THEN 525 CALL CLAQR1( 3, H( KTOP, KTOP ), LDH, S( 2*M-1 ), 642 IF( K.LT.KTOP) [all …]
|
H A D | zlaqr5.f | 322 IF( KTOP.GE.KBOT ) 345 IF( KTOP+2.LE.KBOT ) 346 $ H( KTOP+2, KTOP ) = ZERO 363 JTOP = MAX( KTOP, INCOL ) 367 JTOP = KTOP 410 IF( K.EQ.KTOP-1 ) THEN 462 IF( K.GE.KTOP ) THEN 524 IF( K.EQ.KTOP-1 ) THEN 525 CALL ZLAQR1( 3, H( KTOP, KTOP ), LDH, S( 2*M-1 ), 642 IF( K.LT.KTOP) [all …]
|
H A D | slaqr5.f | 322 IF( KTOP.GE.KBOT ) 367 IF( KTOP+2.LE.KBOT ) 368 $ H( KTOP+2, KTOP ) = ZERO 385 JTOP = MAX( KTOP, INCOL ) 389 JTOP = KTOP 432 IF( K.EQ.KTOP-1 ) THEN 483 IF( K.GE.KTOP ) THEN 545 IF( K.EQ.KTOP-1 ) THEN 546 CALL SLAQR1( 3, H( KTOP, KTOP ), LDH, SR( 2*M-1 ), 660 IF( K.LT.KTOP) [all …]
|
/dports/math/lapack/lapack-3.10.0/SRC/ |
H A D | claqr5.f | 322 IF( KTOP.GE.KBOT ) 345 IF( KTOP+2.LE.KBOT ) 346 $ H( KTOP+2, KTOP ) = ZERO 363 JTOP = MAX( KTOP, INCOL ) 367 JTOP = KTOP 410 IF( K.EQ.KTOP-1 ) THEN 462 IF( K.GE.KTOP) THEN 524 IF( K.EQ.KTOP-1 ) THEN 525 CALL CLAQR1( 3, H( KTOP, KTOP ), LDH, S( 2*M-1 ), 642 IF( K.LT.KTOP) [all …]
|
H A D | slaqr5.f | 322 IF( KTOP.GE.KBOT ) 367 IF( KTOP+2.LE.KBOT ) 368 $ H( KTOP+2, KTOP ) = ZERO 385 JTOP = MAX( KTOP, INCOL ) 389 JTOP = KTOP 432 IF( K.EQ.KTOP-1 ) THEN 483 IF( K.GE.KTOP ) THEN 545 IF( K.EQ.KTOP-1 ) THEN 546 CALL SLAQR1( 3, H( KTOP, KTOP ), LDH, SR( 2*M-1 ), 660 IF( K.LT.KTOP) [all …]
|
H A D | dlaqr5.f | 322 IF( KTOP.GE.KBOT ) 367 IF( KTOP+2.LE.KBOT ) 368 $ H( KTOP+2, KTOP ) = ZERO 385 JTOP = MAX( KTOP, INCOL ) 389 JTOP = KTOP 432 IF( K.EQ.KTOP-1 ) THEN 483 IF( K.GE.KTOP ) THEN 545 IF( K.EQ.KTOP-1 ) THEN 546 CALL DLAQR1( 3, H( KTOP, KTOP ), LDH, SR( 2*M-1 ), 660 IF( K.LT.KTOP) [all …]
|
H A D | zlaqr5.f | 322 IF( KTOP.GE.KBOT ) 345 IF( KTOP+2.LE.KBOT ) 346 $ H( KTOP+2, KTOP ) = ZERO 363 JTOP = MAX( KTOP, INCOL ) 367 JTOP = KTOP 410 IF( K.EQ.KTOP-1 ) THEN 462 IF( K.GE.KTOP ) THEN 524 IF( K.EQ.KTOP-1 ) THEN 525 CALL ZLAQR1( 3, H( KTOP, KTOP ), LDH, S( 2*M-1 ), 642 IF( K.LT.KTOP) [all …]
|
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/SRC/ |
H A D | claqr5.f | 325 IF( KTOP.GE.KBOT ) 348 IF( KTOP+2.LE.KBOT ) 349 $ H( KTOP+2, KTOP ) = ZERO 366 JTOP = MAX( KTOP, INCOL ) 370 JTOP = KTOP 413 IF( K.EQ.KTOP-1 ) THEN 465 IF( K.GE.KTOP) THEN 527 IF( K.EQ.KTOP-1 ) THEN 528 CALL CLAQR1( 3, H( KTOP, KTOP ), LDH, S( 2*M-1 ), 645 IF( K.LT.KTOP) [all …]
|
H A D | dlaqr5.f | 325 IF( KTOP.GE.KBOT ) 370 IF( KTOP+2.LE.KBOT ) 371 $ H( KTOP+2, KTOP ) = ZERO 388 JTOP = MAX( KTOP, INCOL ) 392 JTOP = KTOP 435 IF( K.EQ.KTOP-1 ) THEN 486 IF( K.GE.KTOP ) THEN 548 IF( K.EQ.KTOP-1 ) THEN 549 CALL DLAQR1( 3, H( KTOP, KTOP ), LDH, SR( 2*M-1 ), 663 IF( K.LT.KTOP) [all …]
|
H A D | slaqr5.f | 325 IF( KTOP.GE.KBOT ) 370 IF( KTOP+2.LE.KBOT ) 371 $ H( KTOP+2, KTOP ) = ZERO 388 JTOP = MAX( KTOP, INCOL ) 392 JTOP = KTOP 435 IF( K.EQ.KTOP-1 ) THEN 486 IF( K.GE.KTOP ) THEN 548 IF( K.EQ.KTOP-1 ) THEN 549 CALL SLAQR1( 3, H( KTOP, KTOP ), LDH, SR( 2*M-1 ), 663 IF( K.LT.KTOP) [all …]
|
H A D | zlaqr5.f | 325 IF( KTOP.GE.KBOT ) 348 IF( KTOP+2.LE.KBOT ) 349 $ H( KTOP+2, KTOP ) = ZERO 366 JTOP = MAX( KTOP, INCOL ) 370 JTOP = KTOP 413 IF( K.EQ.KTOP-1 ) THEN 465 IF( K.GE.KTOP ) THEN 527 IF( K.EQ.KTOP-1 ) THEN 528 CALL ZLAQR1( 3, H( KTOP, KTOP ), LDH, S( 2*M-1 ), 645 IF( K.LT.KTOP) [all …]
|
/dports/math/cblas/lapack-3.10.0/SRC/ |
H A D | dlaqr5.f | 322 IF( KTOP.GE.KBOT ) 367 IF( KTOP+2.LE.KBOT ) 368 $ H( KTOP+2, KTOP ) = ZERO 385 JTOP = MAX( KTOP, INCOL ) 389 JTOP = KTOP 432 IF( K.EQ.KTOP-1 ) THEN 483 IF( K.GE.KTOP ) THEN 545 IF( K.EQ.KTOP-1 ) THEN 546 CALL DLAQR1( 3, H( KTOP, KTOP ), LDH, SR( 2*M-1 ), 660 IF( K.LT.KTOP) [all …]
|
H A D | claqr5.f | 322 IF( KTOP.GE.KBOT ) 345 IF( KTOP+2.LE.KBOT ) 346 $ H( KTOP+2, KTOP ) = ZERO 363 JTOP = MAX( KTOP, INCOL ) 367 JTOP = KTOP 410 IF( K.EQ.KTOP-1 ) THEN 462 IF( K.GE.KTOP) THEN 524 IF( K.EQ.KTOP-1 ) THEN 525 CALL CLAQR1( 3, H( KTOP, KTOP ), LDH, S( 2*M-1 ), 642 IF( K.LT.KTOP) [all …]
|
H A D | slaqr5.f | 322 IF( KTOP.GE.KBOT ) 367 IF( KTOP+2.LE.KBOT ) 368 $ H( KTOP+2, KTOP ) = ZERO 385 JTOP = MAX( KTOP, INCOL ) 389 JTOP = KTOP 432 IF( K.EQ.KTOP-1 ) THEN 483 IF( K.GE.KTOP ) THEN 545 IF( K.EQ.KTOP-1 ) THEN 546 CALL SLAQR1( 3, H( KTOP, KTOP ), LDH, SR( 2*M-1 ), 660 IF( K.LT.KTOP) [all …]
|
H A D | zlaqr5.f | 322 IF( KTOP.GE.KBOT ) 345 IF( KTOP+2.LE.KBOT ) 346 $ H( KTOP+2, KTOP ) = ZERO 363 JTOP = MAX( KTOP, INCOL ) 367 JTOP = KTOP 410 IF( K.EQ.KTOP-1 ) THEN 462 IF( K.GE.KTOP ) THEN 524 IF( K.EQ.KTOP-1 ) THEN 525 CALL ZLAQR1( 3, H( KTOP, KTOP ), LDH, S( 2*M-1 ), 642 IF( K.LT.KTOP) [all …]
|
/dports/math/scalapack/scalapack-2.1.0/SRC/ |
H A D | dlaqr6.f | 210 IF( KTOP.GE.KBOT ) 276 $ H( KTOP+2, KTOP ) = ZERO 297 SINCOL = KTOP 301 SINCOL = KTOP 346 IF( K.EQ.KTOP-1 ) THEN 347 CALL DLAQR1( 3, H( KTOP, KTOP ), LDH, SR( 2*M-1 ), 421 IF( K.EQ.KTOP-1 ) THEN 481 JTOP = KTOP 582 IF( K.GE.KTOP+1 ) 636 JTOP = KTOP [all …]
|