aboutsummaryrefslogtreecommitdiff
path: root/TESTING/MATGEN
diff options
context:
space:
mode:
authorlangou <langou@users.noreply.github.com>2015-06-10 21:41:42 +0000
committerlangou <langou@users.noreply.github.com>2015-06-10 21:41:42 +0000
commit6f1cef6f81505146e7272d8967bcc8f15c5fcce2 (patch)
tree13205ee09b5d0baa4f8e67ff61ba61b0ca84d38e /TESTING/MATGEN
parent5277dad956fe3f28f5cbb7db8693fb39e923b0c1 (diff)
IDIST is an INTEGER, change the comment
Diffstat (limited to 'TESTING/MATGEN')
-rw-r--r--TESTING/MATGEN/clatm1.f2
-rw-r--r--TESTING/MATGEN/dlatm1.f2
-rw-r--r--TESTING/MATGEN/slatm1.f2
-rw-r--r--TESTING/MATGEN/zlatm1.f2
4 files changed, 4 insertions, 4 deletions
diff --git a/TESTING/MATGEN/clatm1.f b/TESTING/MATGEN/clatm1.f
index d88e3823..9e97aceb 100644
--- a/TESTING/MATGEN/clatm1.f
+++ b/TESTING/MATGEN/clatm1.f
@@ -74,7 +74,7 @@
*>
*> \param[in] IDIST
*> \verbatim
-*> IDIST is CHARACTER*1
+*> IDIST is INTEGER
*> On entry, IDIST specifies the type of distribution to be
*> used to generate a random matrix .
*> 1 => real and imaginary parts each UNIFORM( 0, 1 )
diff --git a/TESTING/MATGEN/dlatm1.f b/TESTING/MATGEN/dlatm1.f
index 4ae187af..788ed4ca 100644
--- a/TESTING/MATGEN/dlatm1.f
+++ b/TESTING/MATGEN/dlatm1.f
@@ -73,7 +73,7 @@
*>
*> \param[in] IDIST
*> \verbatim
-*> IDIST is CHARACTER*1
+*> IDIST is INTEGER
*> On entry, IDIST specifies the type of distribution to be
*> used to generate a random matrix .
*> 1 => UNIFORM( 0, 1 )
diff --git a/TESTING/MATGEN/slatm1.f b/TESTING/MATGEN/slatm1.f
index 26c457e4..fd315f79 100644
--- a/TESTING/MATGEN/slatm1.f
+++ b/TESTING/MATGEN/slatm1.f
@@ -73,7 +73,7 @@
*>
*> \param[in] IDIST
*> \verbatim
-*> IDIST is CHARACTER*1
+*> IDIST is INTEGER
*> On entry, IDIST specifies the type of distribution to be
*> used to generate a random matrix .
*> 1 => UNIFORM( 0, 1 )
diff --git a/TESTING/MATGEN/zlatm1.f b/TESTING/MATGEN/zlatm1.f
index ebaca371..08b49413 100644
--- a/TESTING/MATGEN/zlatm1.f
+++ b/TESTING/MATGEN/zlatm1.f
@@ -74,7 +74,7 @@
*>
*> \param[in] IDIST
*> \verbatim
-*> IDIST is CHARACTER*1
+*> IDIST is INTEGER
*> On entry, IDIST specifies the type of distribution to be
*> used to generate a random matrix .
*> 1 => real and imaginary parts each UNIFORM( 0, 1 )