1 files changed, 53 insertions, 25 deletions
diff --git a/SRC/slarfb.f b/SRC/slarfb.f
index 27a47f6c..232d69e7 100644
--- a/SRC/slarfb.f
+++ b/SRC/slarfb.f
@@ -93,53 +93,81 @@
 *>          reflectors whose product defines the block reflector).
 *> \endverbatim
 *>
-*
-*  Authors
-*  =======
-*
-*> \author Univ. of Tennessee 
-*> \author Univ. of California Berkeley 
-*> \author Univ. of Colorado Denver 
-*> \author NAG Ltd. 
-*
-*> \date November 2011
-*
-*> \ingroup realOTHERauxiliary
-*
-*
-*  Further Details
-*  ===============
-*>\details \b Further \b Details
+*> \param[in] V
 *> \verbatim
-*          The matrix V. See Further Details.
+*>          V is REAL array, dimension
+*>                                (LDV,K) if STOREV = 'C'
+*>                                (LDV,M) if STOREV = 'R' and SIDE = 'L'
+*>                                (LDV,N) if STOREV = 'R' and SIDE = 'R'
+*>          The matrix V. See Further Details.
+*> \endverbatim
 *>
-*>  LDV     (input) INTEGER
+*> \param[in] LDV
+*> \verbatim
+*>          LDV is INTEGER
 *>          The leading dimension of the array V.
 *>          If STOREV = 'C' and SIDE = 'L', LDV >= max(1,M);
 *>          if STOREV = 'C' and SIDE = 'R', LDV >= max(1,N);
 *>          if STOREV = 'R', LDV >= K.
+*> \endverbatim
 *>
-*>  T       (input) REAL array, dimension (LDT,K)
+*> \param[in] T
+*> \verbatim
+*>          T is REAL array, dimension (LDT,K)
 *>          The triangular k by k matrix T in the representation of the
 *>          block reflector.
+*> \endverbatim
 *>
-*>  LDT     (input) INTEGER
+*> \param[in] LDT
+*> \verbatim
+*>          LDT is INTEGER
 *>          The leading dimension of the array T. LDT >= K.
+*> \endverbatim
 *>
-*>  C       (input/output) REAL array, dimension (LDC,N)
+*> \param[in,out] C
+*> \verbatim
+*>          C is REAL array, dimension (LDC,N)
 *>          On entry, the m by n matrix C.
 *>          On exit, C is overwritten by H*C or H**T*C or C*H or C*H**T.
+*> \endverbatim
 *>
-*>  LDC     (input) INTEGER
+*> \param[in] LDC
+*> \verbatim
+*>          LDC is INTEGER
 *>          The leading dimension of the array C. LDC >= max(1,M).
+*> \endverbatim
 *>
-*>  WORK    (workspace) REAL array, dimension (LDWORK,K)
+*> \param[out] WORK
+*> \verbatim
+*>          WORK is REAL array, dimension (LDWORK,K)
+*> \endverbatim
 *>
-*>  LDWORK  (input) INTEGER
+*> \param[in] LDWORK
+*> \verbatim
+*>          LDWORK is INTEGER
 *>          The leading dimension of the array WORK.
 *>          If SIDE = 'L', LDWORK >= max(1,N);
 *>          if SIDE = 'R', LDWORK >= max(1,M).
+*> \endverbatim
 *>
+*
+*  Authors
+*  =======
+*
+*> \author Univ. of Tennessee 
+*> \author Univ. of California Berkeley 
+*> \author Univ. of Colorado Denver 
+*> \author NAG Ltd. 
+*
+*> \date November 2011
+*
+*> \ingroup realOTHERauxiliary
+*
+*
+*  Further Details
+*  ===============
+*>\details \b Further \b Details
+*> \verbatim
 *>
 *>  The shape of the matrix V and the storage of the vectors which define
 *>  the H(i) is best illustrated by the following example with n = 5 and