projects / platform / upstream / lapack.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 83fc0b4)
Ed Anderson Bug Fix - Jan 26 2015 - I fixed an old bug in the count of the number...
authorjulie <julielangou@users.noreply.github.com>
Fri, 30 Jan 2015 07:22:01 +0000 (07:22 +0000)
committerjulie <julielangou@users.noreply.github.com>
Fri, 30 Jan 2015 07:22:01 +0000 (07:22 +0000)
TESTING/LIN/cdrvgb.f patch | blob | history
TESTING/LIN/cdrvge.f patch | blob | history
TESTING/LIN/ddrvgb.f patch | blob | history
TESTING/LIN/ddrvge.f patch | blob | history
TESTING/LIN/sdrvgb.f patch | blob | history
TESTING/LIN/sdrvge.f patch | blob | history
TESTING/LIN/zdrvgb.f patch | blob | history
TESTING/LIN/zdrvge.f patch | blob | history

diff --git a/TESTING/LIN/cdrvgb.f b/TESTING/LIN/cdrvgb.f
index 3b8b45478c9f6e4ca4741a2724aa9a7d195dc3bc..2ccad776c7409ce12cc50efd35bc3477eeab1b98 100644 (file)
--- a/TESTING/LIN/cdrvgb.f
+++ b/TESTING/LIN/cdrvgb.f
@@ -758,7 +758,7 @@
                                     NFAIL = NFAIL + 1
                                  END IF
    80                         CONTINUE
-                              NRUN = NRUN + 7 - K1
+                              NRUN = NRUN + NTESTS - K1 + 1
                            ELSE
                               IF( RESULT( 1 ).GE.THRESH .AND. .NOT.
      $                            PREFAC ) THEN
diff --git a/TESTING/LIN/cdrvge.f b/TESTING/LIN/cdrvge.f
index c75fdad3601777713a0ffe4a59dcc3fe47bd53b9..98359fe2bef51b1eeed66479c4328a79a65cd015 100644 (file)
--- a/TESTING/LIN/cdrvge.f
+++ b/TESTING/LIN/cdrvge.f
@@ -649,7 +649,7 @@
                               NFAIL = NFAIL + 1
                            END IF
    40                   CONTINUE
-                        NRUN = NRUN + 7 - K1
+                        NRUN = NRUN + NTESTS - K1 + 1
                      ELSE
                         IF( RESULT( 1 ).GE.THRESH .AND. .NOT.PREFAC )
      $                       THEN
diff --git a/TESTING/LIN/ddrvgb.f b/TESTING/LIN/ddrvgb.f
index 8dc949051d4f9ebd505e662b99f3f2b14741c3bf..9c134c852af80569677e4b069663d9e24baf77f7 100644 (file)
--- a/TESTING/LIN/ddrvgb.f
+++ b/TESTING/LIN/ddrvgb.f
@@ -758,7 +758,7 @@
                                     NFAIL = NFAIL + 1
                                  END IF
    80                         CONTINUE
-                              NRUN = NRUN + 7 - K1
+                              NRUN = NRUN + NTESTS - K1 + 1
                            ELSE
                               IF( RESULT( 1 ).GE.THRESH .AND. .NOT.
      $                            PREFAC ) THEN
diff --git a/TESTING/LIN/ddrvge.f b/TESTING/LIN/ddrvge.f
index f0bdea4de3c7f7f87a6023dc0b648c670b92dde9..2d2c292aac6c68ee82dd7672003336e018641d2b 100644 (file)
--- a/TESTING/LIN/ddrvge.f
+++ b/TESTING/LIN/ddrvge.f
@@ -648,7 +648,7 @@
                               NFAIL = NFAIL + 1
                            END IF
    40                   CONTINUE
-                        NRUN = NRUN + 7 - K1
+                        NRUN = NRUN + NTESTS - K1 + 1
                      ELSE
                         IF( RESULT( 1 ).GE.THRESH .AND. .NOT.PREFAC )
      $                       THEN
diff --git a/TESTING/LIN/sdrvgb.f b/TESTING/LIN/sdrvgb.f
index 5bfd607c67d5f739e2b3f52bde90124df0d28d18..b5320bfa81c733adf34dd599af089f646b63c893 100644 (file)
--- a/TESTING/LIN/sdrvgb.f
+++ b/TESTING/LIN/sdrvgb.f
@@ -758,7 +758,7 @@
                                     NFAIL = NFAIL + 1
                                  END IF
    80                         CONTINUE
-                              NRUN = NRUN + 7 - K1
+                              NRUN = NRUN + NTESTS - K1 + 1
                            ELSE
                               IF( RESULT( 1 ).GE.THRESH .AND. .NOT.
      $                            PREFAC ) THEN
diff --git a/TESTING/LIN/sdrvge.f b/TESTING/LIN/sdrvge.f
index 158492f4c8a14fc5fa2d4babe2064021e8741ebe..b1da5a117861f3eb3527493ae9b672d66f2b747a 100644 (file)
--- a/TESTING/LIN/sdrvge.f
+++ b/TESTING/LIN/sdrvge.f
@@ -648,7 +648,7 @@
                               NFAIL = NFAIL + 1
                            END IF
    40                   CONTINUE
-                        NRUN = NRUN + 7 - K1
+                        NRUN = NRUN + NTESTS - K1 + 1
                      ELSE
                         IF( RESULT( 1 ).GE.THRESH .AND. .NOT.PREFAC )
      $                       THEN
diff --git a/TESTING/LIN/zdrvgb.f b/TESTING/LIN/zdrvgb.f
index 2856cca86b2418afbf5318206668766ec7eb6cb5..98458914991f9db0b416f1d63d51d05514073ae0 100644 (file)
--- a/TESTING/LIN/zdrvgb.f
+++ b/TESTING/LIN/zdrvgb.f
@@ -758,7 +758,7 @@
                                     NFAIL = NFAIL + 1
                                  END IF
    80                         CONTINUE
-                              NRUN = NRUN + 7 - K1
+                              NRUN = NRUN + NTESTS - K1 + 1
                            ELSE
                               IF( RESULT( 1 ).GE.THRESH .AND. .NOT.
      $                            PREFAC ) THEN
diff --git a/TESTING/LIN/zdrvge.f b/TESTING/LIN/zdrvge.f
index 5f7a7d01d88f723c4dc86a2dd16913fbba910914..85f7d0f6322892f455eab583809f63e3ab886ad0 100644 (file)
--- a/TESTING/LIN/zdrvge.f
+++ b/TESTING/LIN/zdrvge.f
@@ -649,7 +649,7 @@
                               NFAIL = NFAIL + 1
                            END IF
    40                   CONTINUE
-                        NRUN = NRUN + 7 - K1
+                        NRUN = NRUN + NTESTS - K1 + 1
                      ELSE
                         IF( RESULT( 1 ).GE.THRESH .AND. .NOT.PREFAC )
      $                       THEN
Domain: System / Base;