summaryrefslogtreecommitdiff
path: root/TESTING
diff options
context:
space:
mode:
authorjulie <julielangou@users.noreply.github.com>2015-11-15 21:06:49 +0000
committerjulie <julielangou@users.noreply.github.com>2015-11-15 21:06:49 +0000
commit87ca83c468114c629872fa28703269cbcdd213c9 (patch)
tree9e8248f72d224b1a98b6999dc56c94323f436426 /TESTING
parent50d40d78527266d390700416e6c2ecdf666302ca (diff)
downloadlapack-87ca83c468114c629872fa28703269cbcdd213c9.tar.gz
lapack-87ca83c468114c629872fa28703269cbcdd213c9.tar.bz2
lapack-87ca83c468114c629872fa28703269cbcdd213c9.zip
Missing parameter definition
Diffstat (limited to 'TESTING')
-rw-r--r--TESTING/LIN/cerrvxx.f2
-rw-r--r--TESTING/LIN/derrvxx.f2
-rw-r--r--TESTING/LIN/serrvxx.f2
-rw-r--r--TESTING/LIN/zerrvxx.f2
4 files changed, 8 insertions, 0 deletions
diff --git a/TESTING/LIN/cerrvxx.f b/TESTING/LIN/cerrvxx.f
index 69d46da8..6134bf33 100644
--- a/TESTING/LIN/cerrvxx.f
+++ b/TESTING/LIN/cerrvxx.f
@@ -70,6 +70,8 @@
* .. Parameters ..
INTEGER NMAX
PARAMETER ( NMAX = 4 )
+ REAL ONE
+ PARAMETER ( ONE = 1.0E+0 )
* ..
* .. Local Scalars ..
CHARACTER EQ
diff --git a/TESTING/LIN/derrvxx.f b/TESTING/LIN/derrvxx.f
index da68375f..b4d0904b 100644
--- a/TESTING/LIN/derrvxx.f
+++ b/TESTING/LIN/derrvxx.f
@@ -70,6 +70,8 @@
* .. Parameters ..
INTEGER NMAX
PARAMETER ( NMAX = 4 )
+ REAL ONE
+ PARAMETER ( ONE = 1.0D+0 )
* ..
* .. Local Scalars ..
CHARACTER EQ
diff --git a/TESTING/LIN/serrvxx.f b/TESTING/LIN/serrvxx.f
index bb901c94..d3eb33c9 100644
--- a/TESTING/LIN/serrvxx.f
+++ b/TESTING/LIN/serrvxx.f
@@ -70,6 +70,8 @@
* .. Parameters ..
INTEGER NMAX
PARAMETER ( NMAX = 4 )
+ REAL ONE
+ PARAMETER ( ONE = 1.0E+0 )
* ..
* .. Local Scalars ..
CHARACTER EQ
diff --git a/TESTING/LIN/zerrvxx.f b/TESTING/LIN/zerrvxx.f
index 9261d0ed..52fd98b4 100644
--- a/TESTING/LIN/zerrvxx.f
+++ b/TESTING/LIN/zerrvxx.f
@@ -70,6 +70,8 @@
* .. Parameters ..
INTEGER NMAX
PARAMETER ( NMAX = 4 )
+ REAL ONE
+ PARAMETER ( ONE = 1.0D+0 )
* ..
* .. Local Scalars ..
CHARACTER EQ