diff options
| author | julie <julielangou@users.noreply.github.com> | 2010-11-02 18:53:38 +0000 |
|---|---|---|
| committer | julie <julielangou@users.noreply.github.com> | 2010-11-02 18:53:38 +0000 |
| commit | 9205713fbc07fa5bcca7d17e74394430762d9aad (patch) | |
| tree | 8ed1d54491b09b3d768f14003c34b03f96b08d99 /TESTING/LIN/zchksy.f | |
| parent | a4462006fa683e35a6105a0866245ede836387e4 (diff) | |
| download | lapack-9205713fbc07fa5bcca7d17e74394430762d9aad.tar.gz lapack-9205713fbc07fa5bcca7d17e74394430762d9aad.tar.bz2 lapack-9205713fbc07fa5bcca7d17e74394430762d9aad.zip | |
[xSYTRS/xSYSV] Hide the call to syconv inside trs2 to avoid changing the SYTRS interface.
Update the testing accordingly
[DSYTRI2] Comit dsytri2 to get some feedback
Update the testing accordingly
DSYTRI2 is the Level 3 blas Version of DSYTRI
The actual routine that does the work is DSYTRI2X (name can be changed)
DSYTRI2 is just a wrapper to allow to hide the 2D Workspace required by the routine.
The interface had to be changed to integrate the possibility of doing a workspace query.
DSYTRI2x implementation will be documented in a LAWN. This algorithm was inspired by the following paper:
"Families of Algorithms Related to the Inversion of a Symmetric Positive Definite Matrix"
PAOLO BIENTINESI Duke University and BRIAN GUNTER Delft University of Technology and ROBERT A. VAN DE GEIJN The University of Texas at Austin
Diffstat (limited to 'TESTING/LIN/zchksy.f')
| -rw-r--r-- | TESTING/LIN/zchksy.f | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/TESTING/LIN/zchksy.f b/TESTING/LIN/zchksy.f index 58911a90..a82c4548 100644 --- a/TESTING/LIN/zchksy.f +++ b/TESTING/LIN/zchksy.f @@ -415,12 +415,8 @@ CALL ZLACPY( 'Full', N, NRHS, B, LDA, X, LDA ) * SRNAMT = 'ZSYTRS2' - CALL ZSYCONV( UPLO, 'C', N, AFAC, LDA, IWORK, WORK, - $ INFO ) CALL ZSYTRS2( UPLO, N, NRHS, AFAC, LDA, IWORK, X, $ LDA, WORK, INFO ) - CALL ZSYCONV( UPLO, 'R', N, AFAC, LDA, IWORK, WORK, - $ INFO ) * * Check error code from ZSYTRS. * |