diff options
author | igor175 <igor175@8a072113-8704-0410-8d35-dd094bca7971> | 2011-12-24 01:49:37 +0000 |
---|---|---|
committer | igor175 <igor175@8a072113-8704-0410-8d35-dd094bca7971> | 2011-12-24 01:49:37 +0000 |
commit | 907d76cce5557c965686792ed895c093175d7873 (patch) | |
tree | efeb4ea87c8f5e649da88fc3af8fa6234381d1ef /TESTING/LIN/zchksy.f | |
parent | 1d12a003ebd733d73fec0b1eb9e78ba82e8998b1 (diff) | |
download | lapack-907d76cce5557c965686792ed895c093175d7873.tar.gz lapack-907d76cce5557c965686792ed895c093175d7873.tar.bz2 lapack-907d76cce5557c965686792ed895c093175d7873.zip |
added a comment to schksy.f cchksy.f dchksy.f zchksy.f
Diffstat (limited to 'TESTING/LIN/zchksy.f')
-rw-r--r-- | TESTING/LIN/zchksy.f | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/TESTING/LIN/zchksy.f b/TESTING/LIN/zchksy.f index bd1eefe8..6ef38808 100644 --- a/TESTING/LIN/zchksy.f +++ b/TESTING/LIN/zchksy.f @@ -482,6 +482,9 @@ $ N, -1, -1, -1, IMAT, NFAIL, NERRS, $ NOUT ) * +* Compute the residual for a symmetric matrix times +* its inverse. +* CALL ZSYT03( UPLO, N, A, LDA, AINV, LDA, WORK, LDA, $ RWORK, RCONDC, RESULT( 2 ) ) NT = NT + 1 |