| /external/eigen/blas/f2c/ |
| dtbmv.c | 25 extern logical lsame_(char *, char *, ftnlen, ftnlen);
187 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", (
190 } else if (! lsame_(trans, "N", (ftnlen)1, (ftnlen)1) && ! lsame_(trans,
191 "T", (ftnlen)1, (ftnlen)1) && ! lsame_(trans, "C", (ftnlen)1, (
194 } else if (! lsame_(diag, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(diag,
217 nounit = lsame_(diag, "N", (ftnlen)1, (ftnlen)1);
231 if (lsame_(trans, "N", (ftnlen)1, (ftnlen)1))
[all...] |
| stbmv.c | 25 extern logical lsame_(char *, char *, ftnlen, ftnlen);
187 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", (
190 } else if (! lsame_(trans, "N", (ftnlen)1, (ftnlen)1) && ! lsame_(trans,
191 "T", (ftnlen)1, (ftnlen)1) && ! lsame_(trans, "C", (ftnlen)1, (
194 } else if (! lsame_(diag, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(diag,
217 nounit = lsame_(diag, "N", (ftnlen)1, (ftnlen)1);
231 if (lsame_(trans, "N", (ftnlen)1, (ftnlen)1))
[all...] |
| lsame.c | 15 logical lsame_(char *ca, char *cb, ftnlen ca_len, ftnlen cb_len) function
116 } /* lsame_ */
|
| dsbmv.c | 25 extern logical lsame_(char *, char *, ftnlen, ftnlen);
177 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", (
257 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) {
|
| dspmv.c | 25 extern logical lsame_(char *, char *, ftnlen, ftnlen);
140 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", (
217 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) {
|
| ssbmv.c | 25 extern logical lsame_(char *, char *, ftnlen, ftnlen);
179 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", (
259 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) {
|
| sspmv.c | 25 extern logical lsame_(char *, char *, ftnlen, ftnlen);
140 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", (
217 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) {
|
| ctbmv.c | 29 extern logical lsame_(char *, char *, ftnlen, ftnlen);
191 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", (
194 } else if (! lsame_(trans, "N", (ftnlen)1, (ftnlen)1) && ! lsame_(trans,
195 "T", (ftnlen)1, (ftnlen)1) && ! lsame_(trans, "C", (ftnlen)1, (
198 } else if (! lsame_(diag, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(diag,
221 noconj = lsame_(trans, "T", (ftnlen)1, (ftnlen)1);
222 nounit = lsame_(diag, "N", (ftnlen)1, (ftnlen)1)
[all...] |
| ztbmv.c | 29 extern logical lsame_(char *, char *, ftnlen, ftnlen);
191 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", (
194 } else if (! lsame_(trans, "N", (ftnlen)1, (ftnlen)1) && ! lsame_(trans,
195 "T", (ftnlen)1, (ftnlen)1) && ! lsame_(trans, "C", (ftnlen)1, (
198 } else if (! lsame_(diag, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(diag,
221 noconj = lsame_(trans, "T", (ftnlen)1, (ftnlen)1);
222 nounit = lsame_(diag, "N", (ftnlen)1, (ftnlen)1)
[all...] |
| chpmv.c | 30 extern logical lsame_(char *, char *, ftnlen, ftnlen);
149 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", (
239 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) {
|
| zhpmv.c | 30 extern logical lsame_(char *, char *, ftnlen, ftnlen);
149 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", (
239 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) {
|
| chbmv.c | 30 extern logical lsame_(char *, char *, ftnlen, ftnlen);
186 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", (
279 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) {
|
| zhbmv.c | 31 extern logical lsame_(char *, char *, ftnlen, ftnlen);
187 if (! lsame_(uplo, "U", (ftnlen)1, (ftnlen)1) && ! lsame_(uplo, "L", (
280 if (lsame_(uplo, "U", (ftnlen)1, (ftnlen)1)) {
|
