From c4ef454bc2cd586727a3ce55c578ffe62bfd856d Mon Sep 17 00:00:00 2001
From: Henning Thielemann <git@henning-thielemann.de>
Date: Mon, 12 Jun 2017 11:51:05 +0200
Subject: [PATCH] BLAS/xROTMG; comment on xPARAM: turn to output direction

---
 BLAS/SRC/drotmg.f | 2 +-
 BLAS/SRC/srotmg.f | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/BLAS/SRC/drotmg.f b/BLAS/SRC/drotmg.f
index 570525b376..4510fa7838 100644
--- a/BLAS/SRC/drotmg.f
+++ b/BLAS/SRC/drotmg.f
@@ -65,7 +65,7 @@
 *>          DY1 is DOUBLE PRECISION
 *> \endverbatim
 *>
-*> \param[in,out] DPARAM
+*> \param[out] DPARAM
 *> \verbatim
 *>          DPARAM is DOUBLE PRECISION array, dimension (5)
 *>     DPARAM(1)=DFLAG
diff --git a/BLAS/SRC/srotmg.f b/BLAS/SRC/srotmg.f
index b942e028f7..f167241b29 100644
--- a/BLAS/SRC/srotmg.f
+++ b/BLAS/SRC/srotmg.f
@@ -65,7 +65,7 @@
 *>          SY1 is REAL
 *> \endverbatim
 *>
-*> \param[in,out] SPARAM
+*> \param[out] SPARAM
 *> \verbatim
 *>          SPARAM is REAL array, dimension (5)
 *>     SPARAM(1)=SFLAG