Searched refs:LSAME (Results 1 - 25 of 27) sorted by relevance

12

/external/eigen/lapack/
H A Ddlamch.f85 LOGICAL LSAME local in function:DLAMCH
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( CMAC
[all...]
H A Dslamch.f89 LOGICAL LSAME local in function:SLAMCH
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( CMAC
[all...]
H A Dclarf.f160 LOGICAL LSAME local in subroutine:CLARF
162 EXTERNAL LSAME, ILACLR, ILACLC
166 APPLYLEFT = LSAME( SIDE, 'L' )
H A Ddlarf.f155 LOGICAL LSAME local in subroutine:DLARF
157 EXTERNAL LSAME, ILADLR, ILADLC
161 APPLYLEFT = LSAME( SIDE, 'L' )
H A Dslarf.f155 LOGICAL LSAME local in subroutine:SLARF
157 EXTERNAL LSAME, ILASLR, ILASLC
161 APPLYLEFT = LSAME( SIDE, 'L' )
H A Dzlarf.f160 LOGICAL LSAME local in subroutine:ZLARF
162 EXTERNAL LSAME, ILAZLR, ILAZLC
166 APPLYLEFT = LSAME( SIDE, 'L' )
H A Dclarfb.f223 LOGICAL LSAME local in subroutine:CLARFB
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( STORE
[all...]
H A Ddlarfb.f223 LOGICAL LSAME local in subroutine:DLARFB
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( STORE
[all...]
H A Dslarfb.f223 LOGICAL LSAME local in subroutine:SLARFB
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( STORE
[all...]
H A Dzlarfb.f223 LOGICAL LSAME local in subroutine:ZLARFB
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( STORE
[all...]
H A Dclarft.f193 LOGICAL LSAME local in subroutine:CLARFT
194 EXTERNAL LSAME
203 IF( LSAME( DIRECT, 'F' ) ) THEN
218 IF( LSAME( STOREV, 'C' ) ) THEN
278 IF( LSAME( STOREV, 'C' ) ) THEN
H A Ddlarft.f192 LOGICAL LSAME local in subroutine:DLARFT
193 EXTERNAL LSAME
202 IF( LSAME( DIRECT, 'F' ) ) THEN
217 IF( LSAME( STOREV, 'C' ) ) THEN
276 IF( LSAME( STOREV, 'C' ) ) THEN
H A Dslarft.f192 LOGICAL LSAME local in subroutine:SLARFT
193 EXTERNAL LSAME
202 IF( LSAME( DIRECT, 'F' ) ) THEN
217 IF( LSAME( STOREV, 'C' ) ) THEN
276 IF( LSAME( STOREV, 'C' ) ) THEN
H A Dzlarft.f193 LOGICAL LSAME local in subroutine:ZLARFT
194 EXTERNAL LSAME
203 IF( LSAME( DIRECT, 'F' ) ) THEN
218 IF( LSAME( STOREV, 'C' ) ) THEN
277 IF( LSAME( STOREV, 'C' ) ) THEN
/external/eigen/blas/
H A Dlsame.f1 LOGICAL FUNCTION LSAME(CA,CB) function
14 * LSAME returns .TRUE. if CA is the same letter as CB regardless of
36 LSAME = CA .EQ. CB
37 IF (LSAME) RETURN
79 LSAME = INTA .EQ. INTB
83 * End of LSAME
H A Dctbmv.f151 LOGICAL LSAME local in subroutine:CTBMV
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(TRAN
[all...]
H A Dztbmv.f151 LOGICAL LSAME local in subroutine:ZTBMV
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(TRAN
[all...]
H A Ddtbmv.f151 LOGICAL LSAME local in subroutine:DTBMV
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(DIA
[all...]
H A Dstbmv.f151 LOGICAL LSAME local in subroutine:STBMV
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(DIA
[all...]
H A Ddspmv.f109 LOGICAL LSAME local in subroutine:DSPMV
110 EXTERNAL LSAME
119 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
183 IF (LSAME(UPLO,'U')) THEN
H A Dsspmv.f109 LOGICAL LSAME local in subroutine:SSPMV
110 EXTERNAL LSAME
119 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
183 IF (LSAME(UPLO,'U')) THEN
H A Dchbmv.f147 LOGICAL LSAME local in subroutine:CHBMV
148 EXTERNAL LSAME
160 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
227 IF (LSAME(UPLO,'U')) THEN
H A Dchpmv.f113 LOGICAL LSAME local in subroutine:CHPMV
114 EXTERNAL LSAME
126 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
190 IF (LSAME(UPLO,'U')) THEN
H A Ddsbmv.f141 LOGICAL LSAME local in subroutine:DSBMV
142 EXTERNAL LSAME
154 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
221 IF (LSAME(UPLO,'U')) THEN
H A Dssbmv.f143 LOGICAL LSAME local in subroutine:SSBMV
144 EXTERNAL LSAME
156 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN
223 IF (LSAME(UPLO,'U')) THEN

Completed in 199 milliseconds

12