| /external/eigen/blas/f2c/ |
| D | stbmv.c | 25 extern logical lsame_(char *, char *, ftnlen, ftnlen); in stbmv_()
187 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", ( in stbmv_()
190 } else if (! lsame_(trans, "N", (ftnlen)1, (ftnlen)1) && ! lsame_(trans, in stbmv_()
191 "T", (ftnlen)1, (ftnlen)1) && ! lsame_(trans, "C", (ftnlen)1, ( in stbmv_()
194 } else if (! lsame_(diag, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(diag, in stbmv_()
217 nounit = lsame_(diag, "N", (ftnlen)1, (ftnlen)1); in stbmv_()
231 if (lsame_(trans, "N", (ftnlen)1, (ftnlen)1)) { in stbmv_()
235 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) { in stbmv_()
334 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) { in stbmv_()
|
| D | dtbmv.c | 25 extern logical lsame_(char *, char *, ftnlen, ftnlen); in dtbmv_()
187 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", ( in dtbmv_()
190 } else if (! lsame_(trans, "N", (ftnlen)1, (ftnlen)1) && ! lsame_(trans, in dtbmv_()
191 "T", (ftnlen)1, (ftnlen)1) && ! lsame_(trans, "C", (ftnlen)1, ( in dtbmv_()
194 } else if (! lsame_(diag, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(diag, in dtbmv_()
217 nounit = lsame_(diag, "N", (ftnlen)1, (ftnlen)1); in dtbmv_()
231 if (lsame_(trans, "N", (ftnlen)1, (ftnlen)1)) { in dtbmv_()
235 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) { in dtbmv_()
334 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) { in dtbmv_()
|
| D | sspmv.c | 25 extern logical lsame_(char *, char *, ftnlen, ftnlen); in sspmv_()
140 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", ( in sspmv_()
217 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) { in sspmv_()
|
| D | dspmv.c | 25 extern logical lsame_(char *, char *, ftnlen, ftnlen); in dspmv_()
140 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", ( in dspmv_()
217 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) { in dspmv_()
|
| D | ctbmv.c | 29 extern logical lsame_(char *, char *, ftnlen, ftnlen); in ctbmv_()
191 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", ( in ctbmv_()
194 } else if (! lsame_(trans, "N", (ftnlen)1, (ftnlen)1) && ! lsame_(trans, in ctbmv_()
195 "T", (ftnlen)1, (ftnlen)1) && ! lsame_(trans, "C", (ftnlen)1, ( in ctbmv_()
198 } else if (! lsame_(diag, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(diag, in ctbmv_()
221 noconj = lsame_(trans, "T", (ftnlen)1, (ftnlen)1); in ctbmv_()
222 nounit = lsame_(diag, "N", (ftnlen)1, (ftnlen)1); in ctbmv_()
236 if (lsame_(trans, "N", (ftnlen)1, (ftnlen)1)) { in ctbmv_()
240 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) { in ctbmv_()
403 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) { in ctbmv_()
|
| D | ztbmv.c | 29 extern logical lsame_(char *, char *, ftnlen, ftnlen); in ztbmv_()
191 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", ( in ztbmv_()
194 } else if (! lsame_(trans, "N", (ftnlen)1, (ftnlen)1) && ! lsame_(trans, in ztbmv_()
195 "T", (ftnlen)1, (ftnlen)1) && ! lsame_(trans, "C", (ftnlen)1, ( in ztbmv_()
198 } else if (! lsame_(diag, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(diag, in ztbmv_()
221 noconj = lsame_(trans, "T", (ftnlen)1, (ftnlen)1); in ztbmv_()
222 nounit = lsame_(diag, "N", (ftnlen)1, (ftnlen)1); in ztbmv_()
236 if (lsame_(trans, "N", (ftnlen)1, (ftnlen)1)) { in ztbmv_()
240 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) { in ztbmv_()
403 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) { in ztbmv_()
|
| D | dsbmv.c | 25 extern logical lsame_(char *, char *, ftnlen, ftnlen); in dsbmv_()
177 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", ( in dsbmv_()
257 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) { in dsbmv_()
|
| D | ssbmv.c | 25 extern logical lsame_(char *, char *, ftnlen, ftnlen); in ssbmv_()
179 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", ( in ssbmv_()
259 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) { in ssbmv_()
|
| D | lsame.c | 15 logical lsame_(char *ca, char *cb, ftnlen ca_len, ftnlen cb_len) in lsame_() function
|
| D | zhpmv.c | 30 extern logical lsame_(char *, char *, ftnlen, ftnlen); in zhpmv_()
149 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", ( in zhpmv_()
239 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) { in zhpmv_()
|
| D | chpmv.c | 30 extern logical lsame_(char *, char *, ftnlen, ftnlen); in chpmv_()
149 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", ( in chpmv_()
239 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) { in chpmv_()
|
| D | chbmv.c | 30 extern logical lsame_(char *, char *, ftnlen, ftnlen); in chbmv_()
186 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", ( in chbmv_()
279 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) { in chbmv_()
|
| D | zhbmv.c | 31 extern logical lsame_(char *, char *, ftnlen, ftnlen); in zhbmv_()
187 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", ( in zhbmv_()
280 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) { in zhbmv_()
|