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 d88e382..9e97ace 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 4ae187a..788ed4c 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 26c457e..fd315f7 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 ebaca37..08b4941 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.7.4