diff options
Diffstat (limited to 'TESTING/EIG/cerrgg.f')
-rw-r--r-- | TESTING/EIG/cerrgg.f | 73 |
1 files changed, 58 insertions, 15 deletions
diff --git a/TESTING/EIG/cerrgg.f b/TESTING/EIG/cerrgg.f index 5da0ccbf..5e539357 100644 --- a/TESTING/EIG/cerrgg.f +++ b/TESTING/EIG/cerrgg.f @@ -1,29 +1,72 @@ - SUBROUTINE CERRGG( PATH, NUNIT ) +*> \brief \b CERRGG * -* -- 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 CERRGG( PATH, NUNIT ) +* +* .. Scalar Arguments .. +* CHARACTER*3 PATH +* INTEGER NUNIT +* .. +* * Purpose * ======= * -* CERRGG tests the error exits for CGGES, CGGESX, CGGEV, CGGEVX, -* CGGGLM, CGGHRD, CGGLSE, CGGQRF, CGGRQF, CGGSVD, CGGSVP, CHGEQZ, -* CTGEVC, CTGEXC, CTGSEN, CTGSJA, CTGSNA, and CTGSYL. +*>\details \b Purpose: +*>\verbatim +*> +*> CERRGG tests the error exits for CGGES, CGGESX, CGGEV, CGGEVX, +*> CGGGLM, CGGHRD, CGGLSE, CGGQRF, CGGRQF, CGGSVD, CGGSVP, CHGEQZ, +*> CTGEVC, CTGEXC, CTGSEN, CTGSJA, CTGSNA, and CTGSYL. +*> +*>\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 complex_eig +* +* ===================================================================== + SUBROUTINE CERRGG( 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 +* .. * * ===================================================================== * |