/external/cblas/testing/ |
D | c_zblat1.f | 9 INTEGER ICASE, INCX, INCY, MODE, N variable 17 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local 32 INCX = 9999 53 INTEGER ICASE, INCX, INCY, MODE, N local 58 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local 83 INTEGER ICASE, INCX, INCY, MODE, N local 103 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local 200 DO 60 INCX = 1, 2 206 CX(I) = CV(I,NP1,INCX) 210 CALL STEST1(DZNRM2TEST(N,CX,INCX),STRUE2(NP1), [all …]
|
D | c_dblat1.f | 9 INTEGER ICASE, INCX, INCY, MODE, N variable 17 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local 32 INCX = 9999 59 INTEGER ICASE, INCX, INCY, MODE, N local 64 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local 89 INTEGER ICASE, INCX, INCY, MODE, N local 100 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local 150 INTEGER ICASE, INCX, INCY, MODE, N local 167 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local 202 DO 80 INCX = 1, 2 [all …]
|
D | c_sblat2.f | 488 INTEGER I, IA, IB, IC, IKU, IM, IN, INCX, INCXS, INCY, local 589 INCX = INC( IX ) 590 LX = ABS( INCX )*NL 596 $ ABS( INCX ), 0, NL - 1, RESET, TRANSL ) 599 XX( 1 + ABS( INCX )*( NL/2 - 1 ) ) = ZERO 637 INCXS = INCX 649 $ CTRANS, M, N, ALPHA, LDA, INCX, 654 $ ALPHA, AA, LDA, XX, INCX, 660 $ INCX, BETA, INCY 665 $ INCX, BETA, YY, INCY ) [all …]
|
D | c_dblat2.f | 488 INTEGER I, IA, IB, IC, IKU, IM, IN, INCX, INCXS, INCY, local 589 INCX = INC( IX ) 590 LX = ABS( INCX )*NL 596 $ ABS( INCX ), 0, NL - 1, RESET, TRANSL ) 599 XX( 1 + ABS( INCX )*( NL/2 - 1 ) ) = ZERO 637 INCXS = INCX 649 $ CTRANS, M, N, ALPHA, LDA, INCX, 654 $ ALPHA, AA, LDA, XX, INCX, 660 $ INCX, BETA, INCY 665 $ INCX, BETA, YY, INCY ) [all …]
|
D | c_cblat2.f | 497 INTEGER I, IA, IB, IC, IKU, IM, IN, INCX, INCXS, INCY, local 598 INCX = INC( IX ) 599 LX = ABS( INCX )*NL 605 $ ABS( INCX ), 0, NL - 1, RESET, TRANSL ) 608 XX( 1 + ABS( INCX )*( NL/2 - 1 ) ) = ZERO 646 INCXS = INCX 658 $ CTRANS, M, N, ALPHA, LDA, INCX, BETA, 663 $ ALPHA, AA, LDA, XX, INCX, 669 $ INCX, BETA, INCY 674 $ INCX, BETA, YY, INCY ) [all …]
|
D | c_zblat2.f | 498 INTEGER I, IA, IB, IC, IKU, IM, IN, INCX, INCXS, INCY, local 599 INCX = INC( IX ) 600 LX = ABS( INCX )*NL 606 $ ABS( INCX ), 0, NL - 1, RESET, TRANSL ) 609 XX( 1 + ABS( INCX )*( NL/2 - 1 ) ) = ZERO 647 INCXS = INCX 659 $ CTRANS, M, N, ALPHA, LDA, INCX, BETA, 664 $ ALPHA, AA, LDA, XX, INCX, 670 $ INCX, BETA, INCY 675 $ INCX, BETA, YY, INCY ) [all …]
|
D | c_sblat1.f | 9 INTEGER ICASE, INCX, INCY, MODE, N variable 17 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local 32 INCX = 9999 59 INTEGER ICASE, INCX, INCY, MODE, N local 64 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local 89 INTEGER ICASE, INCX, INCY, MODE, N local 100 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local 150 INTEGER ICASE, INCX, INCY, MODE, N local 167 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local 202 DO 80 INCX = 1, 2 [all …]
|
D | c_cblat1.f | 9 INTEGER ICASE, INCX, INCY, MODE, N variable 17 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local 32 INCX = 9999 53 INTEGER ICASE, INCX, INCY, MODE, N local 58 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local 83 INTEGER ICASE, INCX, INCY, MODE, N local 103 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local 200 DO 60 INCX = 1, 2 206 CX(I) = CV(I,NP1,INCX) 210 CALL STEST1(SCNRM2TEST(N,CX,INCX),STRUE2(NP1), [all …]
|
D | din2 | 12 4 NUMBER OF VALUES OF INCX AND INCY 13 1 2 -1 -2 VALUES OF INCX AND INCY
|
/external/eigen/blas/testing/ |
D | zblat1.f | 51 INTEGER ICASE, INCX, INCY, MODE, N variable 59 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local 74 INCX = 9999 95 INTEGER ICASE, INCX, INCY, MODE, N local 100 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local 125 INTEGER ICASE, INCX, INCY, MODE, N local 145 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local 242 DO 60 INCX = 1, 2 248 CX(I) = CV(I,NP1,INCX) 252 CALL STEST1(DZNRM2(N,CX,INCX),STRUE2(NP1),STRUE2(NP1), [all …]
|
D | dblat1.f | 51 INTEGER ICASE, INCX, INCY, N variable 59 COMMON /COMBLA/ICASE, N, INCX, INCY, PASS local 74 INCX = 9999 100 INTEGER ICASE, INCX, INCY, N local 105 COMMON /COMBLA/ICASE, N, INCX, INCY, PASS local 133 INTEGER ICASE, INCX, INCY, N local 144 COMMON /COMBLA/ICASE, N, INCX, INCY, PASS local 249 INTEGER ICASE, INCX, INCY, N local 266 COMMON /COMBLA/ICASE, N, INCX, INCY, PASS local 301 DO 80 INCX = 1, 2 [all …]
|
D | cblat2.f | 472 INTEGER I, IA, IB, IC, IKU, IM, IN, INCX, INCXS, INCY, local 565 INCX = INC( IX ) 566 LX = ABS( INCX )*NL 572 $ ABS( INCX ), 0, NL - 1, RESET, TRANSL ) 575 XX( 1 + ABS( INCX )*( NL/2 - 1 ) ) = ZERO 613 INCXS = INCX 625 $ TRANS, M, N, ALPHA, LDA, INCX, BETA, 630 $ LDA, XX, INCX, BETA, YY, 636 $ INCX, BETA, INCY 640 $ AA, LDA, XX, INCX, BETA, [all …]
|
D | zblat2.f | 474 INTEGER I, IA, IB, IC, IKU, IM, IN, INCX, INCXS, INCY, local 567 INCX = INC( IX ) 568 LX = ABS( INCX )*NL 574 $ ABS( INCX ), 0, NL - 1, RESET, TRANSL ) 577 XX( 1 + ABS( INCX )*( NL/2 - 1 ) ) = ZERO 615 INCXS = INCX 627 $ TRANS, M, N, ALPHA, LDA, INCX, BETA, 632 $ LDA, XX, INCX, BETA, YY, 638 $ INCX, BETA, INCY 642 $ AA, LDA, XX, INCX, BETA, [all …]
|
D | dblat2.f | 462 INTEGER I, IA, IB, IC, IKU, IM, IN, INCX, INCXS, INCY, local 555 INCX = INC( IX ) 556 LX = ABS( INCX )*NL 562 $ ABS( INCX ), 0, NL - 1, RESET, TRANSL ) 565 XX( 1 + ABS( INCX )*( NL/2 - 1 ) ) = ZERO 603 INCXS = INCX 615 $ TRANS, M, N, ALPHA, LDA, INCX, BETA, 620 $ LDA, XX, INCX, BETA, YY, 626 $ INCX, BETA, INCY 630 $ AA, LDA, XX, INCX, BETA, [all …]
|
D | sblat2.f | 462 INTEGER I, IA, IB, IC, IKU, IM, IN, INCX, INCXS, INCY, local 555 INCX = INC( IX ) 556 LX = ABS( INCX )*NL 562 $ ABS( INCX ), 0, NL - 1, RESET, TRANSL ) 565 XX( 1 + ABS( INCX )*( NL/2 - 1 ) ) = ZERO 603 INCXS = INCX 615 $ TRANS, M, N, ALPHA, LDA, INCX, BETA, 620 $ LDA, XX, INCX, BETA, YY, 626 $ INCX, BETA, INCY 630 $ AA, LDA, XX, INCX, BETA, [all …]
|
D | cblat1.f | 51 INTEGER ICASE, INCX, INCY, MODE, N variable 59 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local 74 INCX = 9999 95 INTEGER ICASE, INCX, INCY, MODE, N local 100 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local 125 INTEGER ICASE, INCX, INCY, MODE, N local 145 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local 242 DO 60 INCX = 1, 2 248 CX(I) = CV(I,NP1,INCX) 252 CALL STEST1(SCNRM2(N,CX,INCX),STRUE2(NP1),STRUE2(NP1), [all …]
|
D | sblat1.f | 51 INTEGER ICASE, INCX, INCY, N variable 59 COMMON /COMBLA/ICASE, N, INCX, INCY, PASS local 74 INCX = 9999 100 INTEGER ICASE, INCX, INCY, N local 105 COMMON /COMBLA/ICASE, N, INCX, INCY, PASS local 133 INTEGER ICASE, INCX, INCY, N local 144 COMMON /COMBLA/ICASE, N, INCX, INCY, PASS local 249 INTEGER ICASE, INCX, INCY, N local 266 COMMON /COMBLA/ICASE, N, INCX, INCY, PASS local 301 DO 80 INCX = 1, 2 [all …]
|
D | sblat2.dat | 13 4 NUMBER OF VALUES OF INCX AND INCY 14 1 2 -1 -2 VALUES OF INCX AND INCY
|
/external/eigen/blas/fortran/ |
D | complexdots.f | 1 COMPLEX FUNCTION CDOTC(N,CX,INCX,CY,INCY) 2 INTEGER INCX,INCY,N local 7 CALL CDOTCW(N,CX,INCX,CY,INCY,RES) 12 COMPLEX FUNCTION CDOTU(N,CX,INCX,CY,INCY) 13 INTEGER INCX,INCY,N local 18 CALL CDOTUW(N,CX,INCX,CY,INCY,RES) 23 DOUBLE COMPLEX FUNCTION ZDOTC(N,CX,INCX,CY,INCY) 24 INTEGER INCX,INCY,N local 29 CALL ZDOTCW(N,CX,INCX,CY,INCY,RES) 34 DOUBLE COMPLEX FUNCTION ZDOTU(N,CX,INCX,CY,INCY) [all …]
|
/external/eigen/lapack/ |
D | clacgv.f | 75 SUBROUTINE CLACGV( N, X, INCX ) argument 83 INTEGER INCX, N local 99 IF( INCX.EQ.1 ) THEN 105 IF( INCX.LT.0 ) 106 $ IOFF = 1 - ( N-1 )*INCX 109 IOFF = IOFF + INCX
|
D | zlacgv.f | 75 SUBROUTINE ZLACGV( N, X, INCX ) argument 83 INTEGER INCX, N local 99 IF( INCX.EQ.1 ) THEN 105 IF( INCX.LT.0 ) 106 $ IOFF = 1 - ( N-1 )*INCX 109 IOFF = IOFF + INCX
|
D | slarfg.f | 107 SUBROUTINE SLARFG( N, ALPHA, X, INCX, TAU ) argument 115 INTEGER INCX, N local 149 XNORM = SNRM2( N-1, X, INCX ) 170 CALL SSCAL( N-1, RSAFMN, X, INCX ) 178 XNORM = SNRM2( N-1, X, INCX ) 182 CALL SSCAL( N-1, ONE / ( ALPHA-BETA ), X, INCX )
|
D | dlarfg.f | 107 SUBROUTINE DLARFG( N, ALPHA, X, INCX, TAU ) argument 115 INTEGER INCX, N local 149 XNORM = DNRM2( N-1, X, INCX ) 170 CALL DSCAL( N-1, RSAFMN, X, INCX ) 178 XNORM = DNRM2( N-1, X, INCX ) 182 CALL DSCAL( N-1, ONE / ( ALPHA-BETA ), X, INCX )
|
D | clarfg.f | 107 SUBROUTINE CLARFG( N, ALPHA, X, INCX, TAU ) argument 115 INTEGER INCX, N local 150 XNORM = SCNRM2( N-1, X, INCX ) 174 CALL CSSCAL( N-1, RSAFMN, X, INCX ) 183 XNORM = SCNRM2( N-1, X, INCX ) 189 CALL CSCAL( N-1, ALPHA, X, INCX )
|
D | zlarfg.f | 107 SUBROUTINE ZLARFG( N, ALPHA, X, INCX, TAU ) argument 115 INTEGER INCX, N local 150 XNORM = DZNRM2( N-1, X, INCX ) 174 CALL ZDSCAL( N-1, RSAFMN, X, INCX ) 183 XNORM = DZNRM2( N-1, X, INCX ) 189 CALL ZSCAL( N-1, ALPHA, X, INCX )
|