diff options
Diffstat (limited to 'SRC/csysv_rook.f')
-rw-r--r-- | SRC/csysv_rook.f | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/SRC/csysv_rook.f b/SRC/csysv_rook.f index efac6684..c35d4490 100644 --- a/SRC/csysv_rook.f +++ b/SRC/csysv_rook.f @@ -258,7 +258,7 @@ IF( N.EQ.0 ) THEN LWKOPT = 1 ELSE - CALL DSYTRF( UPLO, N, A, LDA, IPIV, WORK, -1, INFO ) + CALL CSYTRF_ROOK( UPLO, N, A, LDA, IPIV, WORK, -1, INFO ) LWKOPT = WORK(1) END IF WORK( 1 ) = LWKOPT |