| /external/cblas/testing/ |
| D | c_dblat1.f | 9 INTEGER ICASE, INCX, INCY, MODE, N variable
17 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
23 ICASE = IC
35 IF (ICASE.EQ.3) THEN
37 ELSE IF (ICASE.EQ.7 .OR. ICASE.EQ.8 .OR. ICASE.EQ.9 .OR.
38 + ICASE.EQ.10) THEN
40 ELSE IF (ICASE.EQ.1 .OR. ICASE.EQ.2 .OR. ICASE.EQ.5 .OR.
41 + ICASE.EQ.6) THEN
43 ELSE IF (ICASE.EQ.4) THEN
59 INTEGER ICASE, INCX, INCY, MODE, N local
[all …]
|
| D | c_zblat1.f | 9 INTEGER ICASE, INCX, INCY, MODE, N variable
17 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
23 ICASE = IC
35 IF (ICASE.LE.5) THEN
37 ELSE IF (ICASE.GE.6) THEN
53 INTEGER ICASE, INCX, INCY, MODE, N local
58 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
71 WRITE (NOUT,99999) ICASE, L(ICASE)
83 INTEGER ICASE, INCX, INCY, MODE, N local
103 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
[all …]
|
| D | c_sblat1.f | 9 INTEGER ICASE, INCX, INCY, MODE, N variable
17 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
23 ICASE = IC
35 IF (ICASE.EQ.3) THEN
37 ELSE IF (ICASE.EQ.7 .OR. ICASE.EQ.8 .OR. ICASE.EQ.9 .OR.
38 + ICASE.EQ.10) THEN
40 ELSE IF (ICASE.EQ.1 .OR. ICASE.EQ.2 .OR. ICASE.EQ.5 .OR.
41 + ICASE.EQ.6) THEN
43 ELSE IF (ICASE.EQ.4) THEN
59 INTEGER ICASE, INCX, INCY, MODE, N local
[all …]
|
| D | c_cblat1.f | 9 INTEGER ICASE, INCX, INCY, MODE, N variable
17 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
23 ICASE = IC
35 IF (ICASE.LE.5) THEN
37 ELSE IF (ICASE.GE.6) THEN
53 INTEGER ICASE, INCX, INCY, MODE, N local
58 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
71 WRITE (NOUT,99999) ICASE, L(ICASE)
83 INTEGER ICASE, INCX, INCY, MODE, N local
103 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
[all …]
|
| /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
65 ICASE = IC
77 IF (ICASE.LE.5) THEN
79 ELSE IF (ICASE.GE.6) THEN
95 INTEGER ICASE, INCX, INCY, MODE, N local
100 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
113 WRITE (NOUT,99999) ICASE, L(ICASE)
125 INTEGER ICASE, INCX, INCY, MODE, N local
145 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
[all …]
|
| D | dblat1.f | 51 INTEGER ICASE, INCX, INCY, N variable
59 COMMON /COMBLA/ICASE, N, INCX, INCY, PASS local
65 ICASE = IC
76 IF (ICASE.EQ.3 .OR. ICASE.EQ.11) THEN
78 ELSE IF (ICASE.EQ.7 .OR. ICASE.EQ.8 .OR. ICASE.EQ.9 .OR.
79 + ICASE.EQ.10) THEN
81 ELSE IF (ICASE.EQ.1 .OR. ICASE.EQ.2 .OR. ICASE.EQ.5 .OR.
82 + ICASE.EQ.6 .OR. ICASE.EQ.12 .OR. ICASE.EQ.13) THEN
84 ELSE IF (ICASE.EQ.4) THEN
100 INTEGER ICASE, INCX, INCY, N local
[all …]
|
| D | sblat1.f | 51 INTEGER ICASE, INCX, INCY, N variable
59 COMMON /COMBLA/ICASE, N, INCX, INCY, PASS local
65 ICASE = IC
76 IF (ICASE.EQ.3 .OR. ICASE.EQ.11) THEN
78 ELSE IF (ICASE.EQ.7 .OR. ICASE.EQ.8 .OR. ICASE.EQ.9 .OR.
79 + ICASE.EQ.10) THEN
81 ELSE IF (ICASE.EQ.1 .OR. ICASE.EQ.2 .OR. ICASE.EQ.5 .OR.
82 + ICASE.EQ.6 .OR. ICASE.EQ.12 .OR. ICASE.EQ.13) THEN
84 ELSE IF (ICASE.EQ.4) THEN
100 INTEGER ICASE, INCX, INCY, N local
[all …]
|
| D | cblat1.f | 51 INTEGER ICASE, INCX, INCY, MODE, N variable
59 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
65 ICASE = IC
77 IF (ICASE.LE.5) THEN
79 ELSE IF (ICASE.GE.6) THEN
95 INTEGER ICASE, INCX, INCY, MODE, N local
100 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
113 WRITE (NOUT,99999) ICASE, L(ICASE)
125 INTEGER ICASE, INCX, INCY, MODE, N local
145 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
[all …]
|