--- rpl/lapack/lapack/zla_gercond_x.f 2011/11/21 22:19:49 1.7 +++ rpl/lapack/lapack/zla_gercond_x.f 2012/07/31 11:06:39 1.8 @@ -190,6 +190,10 @@ INFO = -1 ELSE IF( N.LT.0 ) THEN INFO = -2 + ELSE IF( LDA.LT.MAX( 1, N ) ) THEN + INFO = -4 + ELSE IF( LDAF.LT.MAX( 1, N ) ) THEN + INFO = -6 END IF IF( INFO.NE.0 ) THEN CALL XERBLA( 'ZLA_GERCOND_X', -INFO )