diff options
| author | julie <julielangou@users.noreply.github.com> | 2011-10-06 06:53:11 +0000 |
|---|---|---|
| committer | julie <julielangou@users.noreply.github.com> | 2011-10-06 06:53:11 +0000 |
| commit | e1d39294aee16fa6db9ba079b14442358217db71 (patch) | |
| tree | 30e5aa04c1f6596991fda5334f63dfb9b8027849 /TESTING/LIN/zerrpo.f | |
| parent | 5fe0466a14e395641f4f8a300ecc9dcb8058081b (diff) | |
| download | lapack-e1d39294aee16fa6db9ba079b14442358217db71.tar.gz lapack-e1d39294aee16fa6db9ba079b14442358217db71.tar.bz2 lapack-e1d39294aee16fa6db9ba079b14442358217db71.zip | |
Integrating Doxygen in comments
Diffstat (limited to 'TESTING/LIN/zerrpo.f')
| -rw-r--r-- | TESTING/LIN/zerrpo.f | 71 |
1 files changed, 57 insertions, 14 deletions
diff --git a/TESTING/LIN/zerrpo.f b/TESTING/LIN/zerrpo.f index b2e6dd38..ef18ad92 100644 --- a/TESTING/LIN/zerrpo.f +++ b/TESTING/LIN/zerrpo.f @@ -1,28 +1,71 @@ - SUBROUTINE ZERRPO( PATH, NUNIT ) +*> \brief \b ZERRPO * -* -- LAPACK test routine (version 3.1) -- -* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. -* November 2006 +* =========== DOCUMENTATION =========== * -* .. Scalar Arguments .. - CHARACTER*3 PATH - INTEGER NUNIT -* .. +* Online html documentation available at +* http://www.netlib.org/lapack/explore-html/ +* +* Definition +* ========== * +* SUBROUTINE ZERRPO( PATH, NUNIT ) +* +* .. Scalar Arguments .. +* CHARACTER*3 PATH +* INTEGER NUNIT +* .. +* * Purpose * ======= * -* ZERRPO tests the error exits for the COMPLEX*16 routines -* for Hermitian positive definite matrices. +*>\details \b Purpose: +*>\verbatim +*> +*> ZERRPO tests the error exits for the COMPLEX*16 routines +*> for Hermitian positive definite matrices. +*> +*>\endverbatim * * Arguments * ========= * -* PATH (input) CHARACTER*3 -* The LAPACK path name for the routines to be tested. +*> \param[in] PATH +*> \verbatim +*> PATH is CHARACTER*3 +*> The LAPACK path name for the routines to be tested. +*> \endverbatim +*> +*> \param[in] NUNIT +*> \verbatim +*> NUNIT is INTEGER +*> The unit number for output. +*> \endverbatim +*> +* +* Authors +* ======= +* +*> \author Univ. of Tennessee +*> \author Univ. of California Berkeley +*> \author Univ. of Colorado Denver +*> \author NAG Ltd. +* +*> \date November 2011 * -* NUNIT (input) INTEGER -* The unit number for output. +*> \ingroup complex16_lin +* +* ===================================================================== + SUBROUTINE ZERRPO( PATH, NUNIT ) +* +* -- LAPACK test routine (version 3.1) -- +* -- LAPACK is a software package provided by Univ. of Tennessee, -- +* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- +* November 2011 +* +* .. Scalar Arguments .. + CHARACTER*3 PATH + INTEGER NUNIT +* .. * * ===================================================================== * |