| /external/eigen/lapack/ |
| D | dlamch.f | 85 LOGICAL LSAME local
86 EXTERNAL LSAME
105 IF( LSAME( CMACH, 'E' ) ) THEN
107 ELSE IF( LSAME( CMACH, 'S' ) ) THEN
118 ELSE IF( LSAME( CMACH, 'B' ) ) THEN
120 ELSE IF( LSAME( CMACH, 'P' ) ) THEN
122 ELSE IF( LSAME( CMACH, 'N' ) ) THEN
124 ELSE IF( LSAME( CMACH, 'R' ) ) THEN
126 ELSE IF( LSAME( CMACH, 'M' ) ) THEN
128 ELSE IF( LSAME( CMACH, 'U' ) ) THEN
[all …]
|
| D | slamch.f | 89 LOGICAL LSAME local
90 EXTERNAL LSAME
109 IF( LSAME( CMACH, 'E' ) ) THEN
111 ELSE IF( LSAME( CMACH, 'S' ) ) THEN
122 ELSE IF( LSAME( CMACH, 'B' ) ) THEN
124 ELSE IF( LSAME( CMACH, 'P' ) ) THEN
126 ELSE IF( LSAME( CMACH, 'N' ) ) THEN
128 ELSE IF( LSAME( CMACH, 'R' ) ) THEN
130 ELSE IF( LSAME( CMACH, 'M' ) ) THEN
132 ELSE IF( LSAME( CMACH, 'U' ) ) THEN
[all …]
|
| D | dlarfb.f | 223 LOGICAL LSAME local
225 EXTERNAL LSAME, ILADLR, ILADLC
237 IF( LSAME( TRANS, 'N' ) ) THEN
243 IF( LSAME( STOREV, 'C' ) ) THEN
245 IF( LSAME( DIRECT, 'F' ) ) THEN
251 IF( LSAME( SIDE, 'L' ) ) THEN
311 ELSE IF( LSAME( SIDE, 'R' ) ) THEN
377 IF( LSAME( SIDE, 'L' ) ) THEN
438 ELSE IF( LSAME( SIDE, 'R' ) ) THEN
499 ELSE IF( LSAME( STOREV, 'R' ) ) THEN
[all …]
|
| D | slarfb.f | 223 LOGICAL LSAME local
225 EXTERNAL LSAME, ILASLR, ILASLC
237 IF( LSAME( TRANS, 'N' ) ) THEN
243 IF( LSAME( STOREV, 'C' ) ) THEN
245 IF( LSAME( DIRECT, 'F' ) ) THEN
251 IF( LSAME( SIDE, 'L' ) ) THEN
311 ELSE IF( LSAME( SIDE, 'R' ) ) THEN
377 IF( LSAME( SIDE, 'L' ) ) THEN
438 ELSE IF( LSAME( SIDE, 'R' ) ) THEN
499 ELSE IF( LSAME( STOREV, 'R' ) ) THEN
[all …]
|
| D | zlarfb.f | 223 LOGICAL LSAME local
225 EXTERNAL LSAME, ILAZLR, ILAZLC
240 IF( LSAME( TRANS, 'N' ) ) THEN
246 IF( LSAME( STOREV, 'C' ) ) THEN
248 IF( LSAME( DIRECT, 'F' ) ) THEN
254 IF( LSAME( SIDE, 'L' ) ) THEN
314 ELSE IF( LSAME( SIDE, 'R' ) ) THEN
380 IF( LSAME( SIDE, 'L' ) ) THEN
445 ELSE IF( LSAME( SIDE, 'R' ) ) THEN
508 ELSE IF( LSAME( STOREV, 'R' ) ) THEN
[all …]
|
| D | clarfb.f | 223 LOGICAL LSAME local
225 EXTERNAL LSAME, ILACLR, ILACLC
240 IF( LSAME( TRANS, 'N' ) ) THEN
246 IF( LSAME( STOREV, 'C' ) ) THEN
248 IF( LSAME( DIRECT, 'F' ) ) THEN
254 IF( LSAME( SIDE, 'L' ) ) THEN
313 ELSE IF( LSAME( SIDE, 'R' ) ) THEN
379 IF( LSAME( SIDE, 'L' ) ) THEN
442 ELSE IF( LSAME( SIDE, 'R' ) ) THEN
505 ELSE IF( LSAME( STOREV, 'R' ) ) THEN
[all …]
|
| D | zlarft.f | 193 LOGICAL LSAME local
194 EXTERNAL LSAME
203 IF( LSAME( DIRECT, 'F' ) ) THEN
218 IF( LSAME( STOREV, 'C' ) ) THEN
277 IF( LSAME( STOREV, 'C' ) ) THEN
|
| D | slarft.f | 192 LOGICAL LSAME local
193 EXTERNAL LSAME
202 IF( LSAME( DIRECT, 'F' ) ) THEN
217 IF( LSAME( STOREV, 'C' ) ) THEN
276 IF( LSAME( STOREV, 'C' ) ) THEN
|
| D | dlarft.f | 192 LOGICAL LSAME local
193 EXTERNAL LSAME
202 IF( LSAME( DIRECT, 'F' ) ) THEN
217 IF( LSAME( STOREV, 'C' ) ) THEN
276 IF( LSAME( STOREV, 'C' ) ) THEN
|
| D | clarft.f | 193 LOGICAL LSAME local
194 EXTERNAL LSAME
203 IF( LSAME( DIRECT, 'F' ) ) THEN
218 IF( LSAME( STOREV, 'C' ) ) THEN
278 IF( LSAME( STOREV, 'C' ) ) THEN
|
| D | zlarf.f | 160 LOGICAL LSAME local
162 EXTERNAL LSAME, ILAZLR, ILAZLC
166 APPLYLEFT = LSAME( SIDE, 'L' )
|
| D | dlarf.f | 155 LOGICAL LSAME local
157 EXTERNAL LSAME, ILADLR, ILADLC
161 APPLYLEFT = LSAME( SIDE, 'L' )
|
| D | slarf.f | 155 LOGICAL LSAME local
157 EXTERNAL LSAME, ILASLR, ILASLC
161 APPLYLEFT = LSAME( SIDE, 'L' )
|
| /external/eigen/blas/fortran/ |
| D | dtbmv.f | 151 LOGICAL LSAME local
152 EXTERNAL LSAME
164 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
166 ELSE IF (.NOT.LSAME(TRANS,'N') .AND. .NOT.LSAME(TRANS,'T') .AND.
167 + .NOT.LSAME(TRANS,'C')) THEN
169 ELSE IF (.NOT.LSAME(DIAG,'U') .AND. .NOT.LSAME(DIAG,'N')) THEN
189 NOUNIT = LSAME(DIAG,'N')
203 IF (LSAME(TRANS,'N')) THEN
207 IF (LSAME(UPLO,'U')) THEN
272 IF (LSAME(UPLO,'U')) THEN
|
| D | stbmv.f | 151 LOGICAL LSAME local
152 EXTERNAL LSAME
164 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
166 ELSE IF (.NOT.LSAME(TRANS,'N') .AND. .NOT.LSAME(TRANS,'T') .AND.
167 + .NOT.LSAME(TRANS,'C')) THEN
169 ELSE IF (.NOT.LSAME(DIAG,'U') .AND. .NOT.LSAME(DIAG,'N')) THEN
189 NOUNIT = LSAME(DIAG,'N')
203 IF (LSAME(TRANS,'N')) THEN
207 IF (LSAME(UPLO,'U')) THEN
272 IF (LSAME(UPLO,'U')) THEN
|
| D | ctbmv.f | 151 LOGICAL LSAME local
152 EXTERNAL LSAME
164 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
166 ELSE IF (.NOT.LSAME(TRANS,'N') .AND. .NOT.LSAME(TRANS,'T') .AND.
167 + .NOT.LSAME(TRANS,'C')) THEN
169 ELSE IF (.NOT.LSAME(DIAG,'U') .AND. .NOT.LSAME(DIAG,'N')) THEN
189 NOCONJ = LSAME(TRANS,'T')
190 NOUNIT = LSAME(DIAG,'N')
204 IF (LSAME(TRANS,'N')) THEN
208 IF (LSAME(UPLO,'U')) THEN
[all …]
|
| D | ztbmv.f | 151 LOGICAL LSAME local
152 EXTERNAL LSAME
164 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
166 ELSE IF (.NOT.LSAME(TRANS,'N') .AND. .NOT.LSAME(TRANS,'T') .AND.
167 + .NOT.LSAME(TRANS,'C')) THEN
169 ELSE IF (.NOT.LSAME(DIAG,'U') .AND. .NOT.LSAME(DIAG,'N')) THEN
189 NOCONJ = LSAME(TRANS,'T')
190 NOUNIT = LSAME(DIAG,'N')
204 IF (LSAME(TRANS,'N')) THEN
208 IF (LSAME(UPLO,'U')) THEN
[all …]
|
| D | lsame.f | 1 LOGICAL FUNCTION LSAME(CA,CB) function
36 LSAME = CA .EQ. CB
37 IF (LSAME) RETURN
79 LSAME = INTA .EQ. INTB
|
| D | zhpmv.f | 113 LOGICAL LSAME local
114 EXTERNAL LSAME
126 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
190 IF (LSAME(UPLO,'U')) THEN
|
| D | sspmv.f | 109 LOGICAL LSAME local
110 EXTERNAL LSAME
119 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
183 IF (LSAME(UPLO,'U')) THEN
|
| D | chpmv.f | 113 LOGICAL LSAME local
114 EXTERNAL LSAME
126 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
190 IF (LSAME(UPLO,'U')) THEN
|
| D | dspmv.f | 109 LOGICAL LSAME local
110 EXTERNAL LSAME
119 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
183 IF (LSAME(UPLO,'U')) THEN
|
| D | dsbmv.f | 141 LOGICAL LSAME local
142 EXTERNAL LSAME
154 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
221 IF (LSAME(UPLO,'U')) THEN
|
| D | chbmv.f | 147 LOGICAL LSAME local
148 EXTERNAL LSAME
160 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
227 IF (LSAME(UPLO,'U')) THEN
|
| D | ssbmv.f | 143 LOGICAL LSAME local
144 EXTERNAL LSAME
156 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
223 IF (LSAME(UPLO,'U')) THEN
|