From 6f1cef6f81505146e7272d8967bcc8f15c5fcce2 Mon Sep 17 00:00:00 2001 From: langou Date: Wed, 10 Jun 2015 21:41:42 +0000 Subject: [PATCH] IDIST is an INTEGER, change the comment --- TESTING/MATGEN/clatm1.f | 2 +- TESTING/MATGEN/dlatm1.f | 2 +- TESTING/MATGEN/slatm1.f | 2 +- TESTING/MATGEN/zlatm1.f | 2 +- 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 ) -- 2.34.1