/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/ |
H A D | dla_porfsx_extended.f | 416 INTEGER UPLO2, CNT, I, J, X_STATE, Z_STATE 498 X_STATE = WORKING_STATE 571 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 572 $ X_STATE = WORKING_STATE 573 IF ( X_STATE .EQ. WORKING_STATE ) THEN 575 X_STATE = CONV_STATE 580 X_STATE = NOPROG_STATE 585 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 611 IF ( X_STATE.NE.WORKING_STATE.AND. 640 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
H A D | sla_porfsx_extended.f | 413 INTEGER UPLO2, CNT, I, J, X_STATE, Z_STATE 495 X_STATE = WORKING_STATE 568 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 569 $ X_STATE = WORKING_STATE 570 IF ( X_STATE .EQ. WORKING_STATE ) THEN 572 X_STATE = CONV_STATE 577 X_STATE = NOPROG_STATE 582 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 608 IF ( X_STATE.NE.WORKING_STATE.AND. 637 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
H A D | sla_gbrfsx_extended.f | 439 INTEGER CNT, I, J, M, X_STATE, Z_STATE, Y_PREC_STATE 513 X_STATE = WORKING_STATE 590 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 591 $ X_STATE = WORKING_STATE 592 IF ( X_STATE .EQ. WORKING_STATE ) THEN 594 X_STATE = CONV_STATE 599 X_STATE = NOPROG_STATE 604 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 634 IF ( X_STATE.NE.WORKING_STATE ) THEN 666 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
H A D | dla_gbrfsx_extended.f | 441 INTEGER CNT, I, J, M, X_STATE, Z_STATE, Y_PREC_STATE 515 X_STATE = WORKING_STATE 592 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 593 $ X_STATE = WORKING_STATE 594 IF ( X_STATE .EQ. WORKING_STATE ) THEN 596 X_STATE = CONV_STATE 601 X_STATE = NOPROG_STATE 606 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 636 IF ( X_STATE.NE.WORKING_STATE ) THEN 668 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
H A D | dla_gerfsx_extended.f | 425 INTEGER CNT, I, J, X_STATE, Z_STATE, Y_PREC_STATE 498 X_STATE = WORKING_STATE 572 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 573 $ X_STATE = WORKING_STATE 574 IF ( X_STATE .EQ. WORKING_STATE ) THEN 576 X_STATE = CONV_STATE 581 X_STATE = NOPROG_STATE 586 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 616 IF ( X_STATE.NE.WORKING_STATE ) THEN 648 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
H A D | sla_gerfsx_extended.f | 425 INTEGER CNT, I, J, X_STATE, Z_STATE, Y_PREC_STATE 498 X_STATE = WORKING_STATE 572 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 573 $ X_STATE = WORKING_STATE 574 IF ( X_STATE .EQ. WORKING_STATE ) THEN 576 X_STATE = CONV_STATE 581 X_STATE = NOPROG_STATE 586 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 616 IF ( X_STATE.NE.WORKING_STATE ) THEN 648 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
H A D | sla_syrfsx_extended.f | 423 INTEGER UPLO2, CNT, I, J, X_STATE, Z_STATE 525 X_STATE = WORKING_STATE 598 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 599 $ X_STATE = WORKING_STATE 600 IF ( X_STATE .EQ. WORKING_STATE ) THEN 602 X_STATE = CONV_STATE 607 X_STATE = NOPROG_STATE 612 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 638 IF ( X_STATE.NE.WORKING_STATE.AND. 667 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
/dports/math/xlapack/lapack-3.10.0/SRC/ |
H A D | dla_porfsx_extended.f | 410 INTEGER UPLO2, CNT, I, J, X_STATE, Z_STATE 492 X_STATE = WORKING_STATE 565 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 566 $ X_STATE = WORKING_STATE 567 IF ( X_STATE .EQ. WORKING_STATE ) THEN 569 X_STATE = CONV_STATE 574 X_STATE = NOPROG_STATE 579 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 605 IF ( X_STATE.NE.WORKING_STATE.AND. 634 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
H A D | sla_porfsx_extended.f | 410 INTEGER UPLO2, CNT, I, J, X_STATE, Z_STATE 492 X_STATE = WORKING_STATE 565 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 566 $ X_STATE = WORKING_STATE 567 IF ( X_STATE .EQ. WORKING_STATE ) THEN 569 X_STATE = CONV_STATE 574 X_STATE = NOPROG_STATE 579 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 605 IF ( X_STATE.NE.WORKING_STATE.AND. 634 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
H A D | cla_syrfsx_extended.f | 419 INTEGER UPLO2, CNT, I, J, X_STATE, Z_STATE, 529 X_STATE = WORKING_STATE 602 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 603 $ X_STATE = WORKING_STATE 604 IF ( X_STATE .EQ. WORKING_STATE ) THEN 606 X_STATE = CONV_STATE 611 X_STATE = NOPROG_STATE 616 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 642 IF ( X_STATE.NE.WORKING_STATE.AND. 671 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
H A D | cla_herfsx_extended.f | 419 INTEGER UPLO2, CNT, I, J, X_STATE, Z_STATE, 529 X_STATE = WORKING_STATE 602 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 603 $ X_STATE = WORKING_STATE 604 IF ( X_STATE .EQ. WORKING_STATE ) THEN 606 X_STATE = CONV_STATE 611 X_STATE = NOPROG_STATE 616 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 642 IF ( X_STATE.NE.WORKING_STATE.AND. 671 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
H A D | cla_porfsx_extended.f | 410 INTEGER UPLO2, CNT, I, J, X_STATE, Z_STATE, 500 X_STATE = WORKING_STATE 573 IF (X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH) 574 $ X_STATE = WORKING_STATE 575 IF (X_STATE .EQ. WORKING_STATE) THEN 577 X_STATE = CONV_STATE 582 X_STATE = NOPROG_STATE 587 IF (X_STATE .GT. WORKING_STATE) FINAL_DX_X = DX_X 613 IF ( X_STATE.NE.WORKING_STATE.AND. 642 IF (X_STATE .EQ. WORKING_STATE) FINAL_DX_X = DX_X
|
H A D | dla_gbrfsx_extended.f | 435 INTEGER CNT, I, J, M, X_STATE, Z_STATE, Y_PREC_STATE 509 X_STATE = WORKING_STATE 586 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 587 $ X_STATE = WORKING_STATE 588 IF ( X_STATE .EQ. WORKING_STATE ) THEN 590 X_STATE = CONV_STATE 595 X_STATE = NOPROG_STATE 600 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 630 IF ( X_STATE.NE.WORKING_STATE ) THEN 662 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
H A D | zla_gerfsx_extended.f | 420 INTEGER CNT, I, J, X_STATE, Z_STATE, Y_PREC_STATE 501 X_STATE = WORKING_STATE 577 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 578 $ X_STATE = WORKING_STATE 579 IF ( X_STATE .EQ. WORKING_STATE ) THEN 581 X_STATE = CONV_STATE 586 X_STATE = NOPROG_STATE 591 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 621 IF ( X_STATE.NE.WORKING_STATE ) THEN 653 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
H A D | dla_gerfsx_extended.f | 419 INTEGER CNT, I, J, X_STATE, Z_STATE, Y_PREC_STATE 492 X_STATE = WORKING_STATE 566 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 567 $ X_STATE = WORKING_STATE 568 IF ( X_STATE .EQ. WORKING_STATE ) THEN 570 X_STATE = CONV_STATE 575 X_STATE = NOPROG_STATE 580 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 610 IF ( X_STATE.NE.WORKING_STATE ) THEN 642 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
/dports/math/blas/lapack-3.10.0/SRC/ |
H A D | dla_porfsx_extended.f | 410 INTEGER UPLO2, CNT, I, J, X_STATE, Z_STATE 492 X_STATE = WORKING_STATE 565 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 566 $ X_STATE = WORKING_STATE 567 IF ( X_STATE .EQ. WORKING_STATE ) THEN 569 X_STATE = CONV_STATE 574 X_STATE = NOPROG_STATE 579 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 605 IF ( X_STATE.NE.WORKING_STATE.AND. 634 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
H A D | sla_porfsx_extended.f | 410 INTEGER UPLO2, CNT, I, J, X_STATE, Z_STATE 492 X_STATE = WORKING_STATE 565 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 566 $ X_STATE = WORKING_STATE 567 IF ( X_STATE .EQ. WORKING_STATE ) THEN 569 X_STATE = CONV_STATE 574 X_STATE = NOPROG_STATE 579 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 605 IF ( X_STATE.NE.WORKING_STATE.AND. 634 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
/dports/math/lapacke/lapack-3.10.0/SRC/ |
H A D | dla_porfsx_extended.f | 410 INTEGER UPLO2, CNT, I, J, X_STATE, Z_STATE 492 X_STATE = WORKING_STATE 565 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 566 $ X_STATE = WORKING_STATE 567 IF ( X_STATE .EQ. WORKING_STATE ) THEN 569 X_STATE = CONV_STATE 574 X_STATE = NOPROG_STATE 579 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 605 IF ( X_STATE.NE.WORKING_STATE.AND. 634 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
H A D | sla_porfsx_extended.f | 410 INTEGER UPLO2, CNT, I, J, X_STATE, Z_STATE 492 X_STATE = WORKING_STATE 565 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 566 $ X_STATE = WORKING_STATE 567 IF ( X_STATE .EQ. WORKING_STATE ) THEN 569 X_STATE = CONV_STATE 574 X_STATE = NOPROG_STATE 579 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 605 IF ( X_STATE.NE.WORKING_STATE.AND. 634 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
/dports/math/lapack/lapack-3.10.0/SRC/ |
H A D | dla_porfsx_extended.f | 410 INTEGER UPLO2, CNT, I, J, X_STATE, Z_STATE 492 X_STATE = WORKING_STATE 565 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 566 $ X_STATE = WORKING_STATE 567 IF ( X_STATE .EQ. WORKING_STATE ) THEN 569 X_STATE = CONV_STATE 574 X_STATE = NOPROG_STATE 579 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 605 IF ( X_STATE.NE.WORKING_STATE.AND. 634 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
H A D | sla_porfsx_extended.f | 410 INTEGER UPLO2, CNT, I, J, X_STATE, Z_STATE 492 X_STATE = WORKING_STATE 565 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 566 $ X_STATE = WORKING_STATE 567 IF ( X_STATE .EQ. WORKING_STATE ) THEN 569 X_STATE = CONV_STATE 574 X_STATE = NOPROG_STATE 579 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 605 IF ( X_STATE.NE.WORKING_STATE.AND. 634 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/SRC/ |
H A D | dla_porfsx_extended.f | 413 INTEGER UPLO2, CNT, I, J, X_STATE, Z_STATE local 495 X_STATE = WORKING_STATE 568 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 569 $ X_STATE = WORKING_STATE 570 IF ( X_STATE .EQ. WORKING_STATE ) THEN 572 X_STATE = CONV_STATE 577 X_STATE = NOPROG_STATE 582 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 608 IF ( X_STATE.NE.WORKING_STATE.AND. 637 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
H A D | sla_porfsx_extended.f | 413 INTEGER UPLO2, CNT, I, J, X_STATE, Z_STATE local 495 X_STATE = WORKING_STATE 568 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 569 $ X_STATE = WORKING_STATE 570 IF ( X_STATE .EQ. WORKING_STATE ) THEN 572 X_STATE = CONV_STATE 577 X_STATE = NOPROG_STATE 582 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 608 IF ( X_STATE.NE.WORKING_STATE.AND. 637 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
/dports/math/cblas/lapack-3.10.0/SRC/ |
H A D | dla_porfsx_extended.f | 410 INTEGER UPLO2, CNT, I, J, X_STATE, Z_STATE 492 X_STATE = WORKING_STATE 565 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 566 $ X_STATE = WORKING_STATE 567 IF ( X_STATE .EQ. WORKING_STATE ) THEN 569 X_STATE = CONV_STATE 574 X_STATE = NOPROG_STATE 579 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 605 IF ( X_STATE.NE.WORKING_STATE.AND. 634 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|
H A D | sla_porfsx_extended.f | 410 INTEGER UPLO2, CNT, I, J, X_STATE, Z_STATE 492 X_STATE = WORKING_STATE 565 IF ( X_STATE .EQ. NOPROG_STATE .AND. DXRAT .LE. RTHRESH ) 566 $ X_STATE = WORKING_STATE 567 IF ( X_STATE .EQ. WORKING_STATE ) THEN 569 X_STATE = CONV_STATE 574 X_STATE = NOPROG_STATE 579 IF ( X_STATE .GT. WORKING_STATE ) FINAL_DX_X = DX_X 605 IF ( X_STATE.NE.WORKING_STATE.AND. 634 IF ( X_STATE .EQ. WORKING_STATE ) FINAL_DX_X = DX_X
|