diff options
Diffstat (limited to 'TESTING/LIN/dchksy_aa.f')
-rw-r--r-- | TESTING/LIN/dchksy_aa.f | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/TESTING/LIN/dchksy_aa.f b/TESTING/LIN/dchksy_aa.f index bc622e4a..a5c0594c 100644 --- a/TESTING/LIN/dchksy_aa.f +++ b/TESTING/LIN/dchksy_aa.f @@ -430,7 +430,7 @@ * block factorization, LWORK is the length of AINV. * SRNAMT = 'DSYTRF_AA' - LWORK = N*NB + N + LWORK = MAX( 1, N*NB + N ) CALL DSYTRF_AA( UPLO, N, AFAC, LDA, IWORK, AINV, $ LWORK, INFO ) * @@ -517,7 +517,7 @@ CALL DLACPY( 'Full', N, NRHS, B, LDA, X, LDA ) * SRNAMT = 'DSYTRS_AA' - LWORK = 3*N-2 + LWORK = MAX( 1, 3*N-2 ) CALL DSYTRS_AA( UPLO, N, NRHS, AFAC, LDA, $ IWORK, X, LDA, WORK, LWORK, $ INFO ) |