--- rpl/lapack/lapack/zstemr.f	2012/12/14 14:22:54	1.12
+++ rpl/lapack/lapack/zstemr.f	2014/01/27 09:24:36	1.13
@@ -311,7 +311,7 @@
 *> \author Univ. of Colorado Denver 
 *> \author NAG Ltd. 
 *
-*> \date September 2012
+*> \date November 2013
 *
 *> \ingroup complex16OTHERcomputational
 *
@@ -329,10 +329,10 @@
      $                   M, W, Z, LDZ, NZC, ISUPPZ, TRYRAC, WORK, LWORK,
      $                   IWORK, LIWORK, INFO )
 *
-*  -- LAPACK computational routine (version 3.4.2) --
+*  -- LAPACK computational routine (version 3.5.0) --
 *  -- LAPACK is a software package provided by Univ. of Tennessee,    --
 *  -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-*     September 2012
+*     November 2013
 *
 *     .. Scalar Arguments ..
       CHARACTER          JOBZ, RANGE
@@ -408,7 +408,8 @@
       WU = ZERO
       IIL = 0
       IIU = 0
-
+      NSPLIT = 0
+      
       IF( VALEIG ) THEN
 *        We do not reference VL, VU in the cases RANGE = 'I','A'
 *        The interval (WL, WU] contains all the wanted eigenvalues.