diff --git a/SRC/dgeqp3rk.f b/SRC/dgeqp3rk.f
index fd1a6060e..8571f8477 100755
--- a/SRC/dgeqp3rk.f
+++ b/SRC/dgeqp3rk.f
@@ -272,7 +272,7 @@
 *>          modified, and the matrix A is itself the residual.
 *>
 *>          NOTE: We recommend that RELTOL satisfy
-*>                min(max(M,N)*EPS, sqrt(EPS)) <= RELTOL
+*>                min( max(M,N)*EPS, sqrt(EPS) ) <= RELTOL
 *> \endverbatim
 *>
 *> \param[in,out] A
diff --git a/SRC/zgeqp3rk.f b/SRC/zgeqp3rk.f
index d9c26fb65..d12ed5e58 100755
--- a/SRC/zgeqp3rk.f
+++ b/SRC/zgeqp3rk.f
@@ -273,7 +273,7 @@
 *>          modified, and the matrix A is itself the residual.
 *>
 *>          NOTE: We recommend that RELTOL satisfy
-*>                min(max(M,N)*EPS, sqrt(EPS)) <= RELTOL
+*>                min( 10*max(M,N)*EPS, sqrt(EPS) ) <= RELTOL
 *> \endverbatim
 *>
 *> \param[in,out] A