Searched refs:lsame_ (Results 1 – 2 of 2) sorted by relevance
| /petsc/lib/petsc/bin/maint/ |
| H A D | toclapack.sh | 627 extern logical lsame_(char *, char *);
1711 if (lsame_(cmach, "E")) {
1713 } else if (lsame_(cmach, "S")) {
1715 } else if (lsame_(cmach, "B")) {
1717 } else if (lsame_(cmach, "P")) {
1719 } else if (lsame_(cmach, "N")) {
1721 } else if (lsame_(cmach, "R")) {
1723 } else if (lsame_(cmach, "M")) {
1725 } else if (lsame_(cmach, "U")) {
1727 } else if (lsame_(cmach, "L")) {
[all …]
|
| /petsc/src/sys/objects/ |
| H A D | pinit.c | 1808 PETSC_EXTERN int lsame_(char *a, char *b) in lsame_() function
|