/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/ |
H A D | dla_porfsx_extended.f | 417 DOUBLE PRECISION YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 533 DYK = ABS( DY( I ) ) 536 DZ_Z = MAX( DZ_Z, DYK / YK ) 537 ELSE IF ( DYK .NE. 0.0D+0 ) THEN 547 NORMDX = MAX( NORMDX, DYK * C( I ) ) 550 NORMDX = MAX( NORMDX, DYK )
|
H A D | sla_porfsx_extended.f | 414 REAL YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 530 DYK = ABS( DY( I ) ) 533 DZ_Z = MAX( DZ_Z, DYK / YK ) 534 ELSE IF ( DYK .NE. 0.0 ) THEN 544 NORMDX = MAX( NORMDX, DYK * C( I ) ) 547 NORMDX = MAX( NORMDX, DYK )
|
H A D | sla_gbrfsx_extended.f | 440 REAL YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 551 DYK = ABS( DY( I ) ) 554 DZ_Z = MAX( DZ_Z, DYK / YK ) 555 ELSE IF ( DYK .NE. 0.0 ) THEN 565 NORMDX = MAX( NORMDX, DYK * C( I ) ) 568 NORMDX = MAX( NORMDX, DYK )
|
H A D | dla_gbrfsx_extended.f | 442 DOUBLE PRECISION YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 553 DYK = ABS( DY( I ) ) 556 DZ_Z = MAX( DZ_Z, DYK / YK ) 557 ELSE IF ( DYK .NE. 0.0D+0 ) THEN 567 NORMDX = MAX( NORMDX, DYK * C( I ) ) 570 NORMDX = MAX( NORMDX, DYK )
|
H A D | dla_gerfsx_extended.f | 426 DOUBLE PRECISION YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 533 DYK = ABS( DY( I ) ) 536 DZ_Z = MAX( DZ_Z, DYK / YK ) 537 ELSE IF ( DYK .NE. 0.0D+0 ) THEN 547 NORMDX = MAX( NORMDX, DYK * C( I ) ) 550 NORMDX = MAX( NORMDX, DYK )
|
H A D | sla_gerfsx_extended.f | 426 REAL YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 533 DYK = ABS( DY( I ) ) 536 DZ_Z = MAX( DZ_Z, DYK / YK ) 537 ELSE IF ( DYK .NE. 0.0 ) THEN 547 NORMDX = MAX( NORMDX, DYK * C( I ) ) 550 NORMDX = MAX( NORMDX, DYK )
|
H A D | sla_syrfsx_extended.f | 424 REAL YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 560 DYK = ABS( DY( I ) ) 563 DZ_Z = MAX( DZ_Z, DYK / YK ) 564 ELSE IF ( DYK .NE. 0.0 ) THEN 574 NORMDX = MAX( NORMDX, DYK * C( I ) ) 577 NORMDX = MAX(NORMDX, DYK)
|
/dports/math/xlapack/lapack-3.10.0/SRC/ |
H A D | dla_porfsx_extended.f | 411 DOUBLE PRECISION YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 527 DYK = ABS( DY( I ) ) 530 DZ_Z = MAX( DZ_Z, DYK / YK ) 531 ELSE IF ( DYK .NE. 0.0D+0 ) THEN 541 NORMDX = MAX( NORMDX, DYK * C( I ) ) 544 NORMDX = MAX( NORMDX, DYK )
|
H A D | sla_porfsx_extended.f | 411 REAL YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 527 DYK = ABS( DY( I ) ) 530 DZ_Z = MAX( DZ_Z, DYK / YK ) 531 ELSE IF ( DYK .NE. 0.0 ) THEN 541 NORMDX = MAX( NORMDX, DYK * C( I ) ) 544 NORMDX = MAX( NORMDX, DYK )
|
H A D | cla_syrfsx_extended.f | 421 REAL YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 564 DYK = CABS1( DY( I ) ) 567 DZ_Z = MAX( DZ_Z, DYK / YK ) 568 ELSE IF ( DYK .NE. 0.0 ) THEN 578 NORMDX = MAX( NORMDX, DYK * C( I ) ) 581 NORMDX = MAX( NORMDX, DYK )
|
H A D | cla_herfsx_extended.f | 421 REAL YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 564 DYK = CABS1( DY( I ) ) 567 DZ_Z = MAX( DZ_Z, DYK / YK ) 568 ELSE IF ( DYK .NE. 0.0 ) THEN 578 NORMDX = MAX( NORMDX, DYK * C( I ) ) 581 NORMDX = MAX( NORMDX, DYK )
|
H A D | cla_porfsx_extended.f | 412 REAL YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 535 DYK = CABS1(DY(I)) 538 DZ_Z = MAX( DZ_Z, DYK / YK ) 539 ELSE IF (DYK .NE. 0.0) THEN 549 NORMDX = MAX(NORMDX, DYK * C(I)) 552 NORMDX = MAX(NORMDX, DYK)
|
H A D | dla_gbrfsx_extended.f | 436 DOUBLE PRECISION YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 547 DYK = ABS( DY( I ) ) 550 DZ_Z = MAX( DZ_Z, DYK / YK ) 551 ELSE IF ( DYK .NE. 0.0D+0 ) THEN 561 NORMDX = MAX( NORMDX, DYK * C( I ) ) 564 NORMDX = MAX( NORMDX, DYK )
|
H A D | zla_gerfsx_extended.f | 421 DOUBLE PRECISION YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 538 DYK = CABS1( DY( I ) ) 541 DZ_Z = MAX( DZ_Z, DYK / YK ) 542 ELSE IF ( DYK .NE. 0.0D+0 ) THEN 552 NORMDX = MAX( NORMDX, DYK * C( I ) ) 555 NORMDX = MAX(NORMDX, DYK)
|
H A D | dla_gerfsx_extended.f | 420 DOUBLE PRECISION YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 527 DYK = ABS( DY( I ) ) 530 DZ_Z = MAX( DZ_Z, DYK / YK ) 531 ELSE IF ( DYK .NE. 0.0D+0 ) THEN 541 NORMDX = MAX( NORMDX, DYK * C( I ) ) 544 NORMDX = MAX( NORMDX, DYK )
|
/dports/math/blas/lapack-3.10.0/SRC/ |
H A D | dla_porfsx_extended.f | 411 DOUBLE PRECISION YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 527 DYK = ABS( DY( I ) ) 530 DZ_Z = MAX( DZ_Z, DYK / YK ) 531 ELSE IF ( DYK .NE. 0.0D+0 ) THEN 541 NORMDX = MAX( NORMDX, DYK * C( I ) ) 544 NORMDX = MAX( NORMDX, DYK )
|
H A D | sla_porfsx_extended.f | 411 REAL YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 527 DYK = ABS( DY( I ) ) 530 DZ_Z = MAX( DZ_Z, DYK / YK ) 531 ELSE IF ( DYK .NE. 0.0 ) THEN 541 NORMDX = MAX( NORMDX, DYK * C( I ) ) 544 NORMDX = MAX( NORMDX, DYK )
|
/dports/math/lapacke/lapack-3.10.0/SRC/ |
H A D | dla_porfsx_extended.f | 411 DOUBLE PRECISION YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 527 DYK = ABS( DY( I ) ) 530 DZ_Z = MAX( DZ_Z, DYK / YK ) 531 ELSE IF ( DYK .NE. 0.0D+0 ) THEN 541 NORMDX = MAX( NORMDX, DYK * C( I ) ) 544 NORMDX = MAX( NORMDX, DYK )
|
H A D | sla_porfsx_extended.f | 411 REAL YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 527 DYK = ABS( DY( I ) ) 530 DZ_Z = MAX( DZ_Z, DYK / YK ) 531 ELSE IF ( DYK .NE. 0.0 ) THEN 541 NORMDX = MAX( NORMDX, DYK * C( I ) ) 544 NORMDX = MAX( NORMDX, DYK )
|
/dports/math/lapack/lapack-3.10.0/SRC/ |
H A D | dla_porfsx_extended.f | 411 DOUBLE PRECISION YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 527 DYK = ABS( DY( I ) ) 530 DZ_Z = MAX( DZ_Z, DYK / YK ) 531 ELSE IF ( DYK .NE. 0.0D+0 ) THEN 541 NORMDX = MAX( NORMDX, DYK * C( I ) ) 544 NORMDX = MAX( NORMDX, DYK )
|
H A D | sla_porfsx_extended.f | 411 REAL YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 527 DYK = ABS( DY( I ) ) 530 DZ_Z = MAX( DZ_Z, DYK / YK ) 531 ELSE IF ( DYK .NE. 0.0 ) THEN 541 NORMDX = MAX( NORMDX, DYK * C( I ) ) 544 NORMDX = MAX( NORMDX, DYK )
|
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/SRC/ |
H A D | dla_porfsx_extended.f | 414 DOUBLE PRECISION YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, local 530 DYK = ABS( DY( I ) ) 533 DZ_Z = MAX( DZ_Z, DYK / YK ) 534 ELSE IF ( DYK .NE. 0.0D+0 ) THEN 544 NORMDX = MAX( NORMDX, DYK * C( I ) ) 547 NORMDX = MAX( NORMDX, DYK )
|
H A D | sla_porfsx_extended.f | 414 REAL YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, local 530 DYK = ABS( DY( I ) ) 533 DZ_Z = MAX( DZ_Z, DYK / YK ) 534 ELSE IF ( DYK .NE. 0.0 ) THEN 544 NORMDX = MAX( NORMDX, DYK * C( I ) ) 547 NORMDX = MAX( NORMDX, DYK )
|
/dports/math/cblas/lapack-3.10.0/SRC/ |
H A D | dla_porfsx_extended.f | 411 DOUBLE PRECISION YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 527 DYK = ABS( DY( I ) ) 530 DZ_Z = MAX( DZ_Z, DYK / YK ) 531 ELSE IF ( DYK .NE. 0.0D+0 ) THEN 541 NORMDX = MAX( NORMDX, DYK * C( I ) ) 544 NORMDX = MAX( NORMDX, DYK )
|
H A D | sla_porfsx_extended.f | 411 REAL YK, DYK, YMIN, NORMY, NORMX, NORMDX, DXRAT, 527 DYK = ABS( DY( I ) ) 530 DZ_Z = MAX( DZ_Z, DYK / YK ) 531 ELSE IF ( DYK .NE. 0.0 ) THEN 541 NORMDX = MAX( NORMDX, DYK * C( I ) ) 544 NORMDX = MAX( NORMDX, DYK )
|