diff --git a/SRC/dstemr.f b/SRC/dstemr.f
index f39fe0ad1..d0c2d7121 100644
--- a/SRC/dstemr.f
+++ b/SRC/dstemr.f
@@ -345,7 +345,7 @@
 *     ..
 *     .. Local Scalars ..
       LOGICAL            ALLEIG, INDEIG, LQUERY, VALEIG, WANTZ, ZQUERY,
-     $                   DLAESWAP 
+     $                   DLAESWAP
       INTEGER            I, IBEGIN, IEND, IFIRST, IIL, IINDBL, IINDW,
      $                   IINDWK, IINFO, IINSPL, IIU, ILAST, IN, INDD,
      $                   INDE2, INDERR, INDGP, INDGRS, INDWRK, ITMP,