![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to zla_gercond_x.f CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [local] / rpl / lapack / lapack|
Return to zla_gercond_x.f CVS log | Up to [local] / rpl / lapack / lapack |
| version 1.7, 2011/11/21 22:19:49 | version 1.8, 2012/07/31 11:06:39 |
|---|---|
| Line 190 | Line 190 |
| INFO = -1 | INFO = -1 |
| ELSE IF( N.LT.0 ) THEN | ELSE IF( N.LT.0 ) THEN |
| INFO = -2 | INFO = -2 |
| ELSE IF( LDA.LT.MAX( 1, N ) ) THEN | |
| INFO = -4 | |
| ELSE IF( LDAF.LT.MAX( 1, N ) ) THEN | |
| INFO = -6 | |
| END IF | END IF |
| IF( INFO.NE.0 ) THEN | IF( INFO.NE.0 ) THEN |
| CALL XERBLA( 'ZLA_GERCOND_X', -INFO ) | CALL XERBLA( 'ZLA_GERCOND_X', -INFO ) |