summaryrefslogtreecommitdiff
path: root/SRC/ctpttf.f
diff options
context:
space:
mode:
Diffstat (limited to 'SRC/ctpttf.f')
-rw-r--r--SRC/ctpttf.f32
1 files changed, 14 insertions, 18 deletions
diff --git a/SRC/ctpttf.f b/SRC/ctpttf.f
index d97e4e38..9b495913 100644
--- a/SRC/ctpttf.f
+++ b/SRC/ctpttf.f
@@ -15,8 +15,8 @@
*> [TXT]</a>
*> \endhtmlonly
*
-* Definition
-* ==========
+* Definition:
+* ===========
*
* SUBROUTINE CTPTTF( TRANSR, UPLO, N, AP, ARF, INFO )
*
@@ -27,19 +27,18 @@
* .. Array Arguments ..
* COMPLEX AP( 0: * ), ARF( 0: * )
*
-* Purpose
-* =======
*
-*>\details \b Purpose:
-*>\verbatim
+*> \par Purpose:
+* =============
+*>
+*> \verbatim
*>
*> CTPTTF copies a triangular matrix A from standard packed format (TP)
*> to rectangular full packed format (TF).
-*>
-*>\endverbatim
+*> \endverbatim
*
-* Arguments
-* =========
+* Arguments:
+* ==========
*
*> \param[in] TRANSR
*> \verbatim
@@ -84,10 +83,9 @@
*> = 0: successful exit
*> < 0: if INFO = -i, the i-th argument had an illegal value
*> \endverbatim
-*>
*
-* Authors
-* =======
+* Authors:
+* ========
*
*> \author Univ. of Tennessee
*> \author Univ. of California Berkeley
@@ -98,10 +96,9 @@
*
*> \ingroup complexOTHERcomputational
*
-*
-* Further Details
-* ===============
-*>\details \b Further \b Details
+*> \par Further Details:
+* =====================
+*>
*> \verbatim
*>
*> We first consider Standard Packed Format when N is even.
@@ -205,7 +202,6 @@
*> 03 13 23 33 11 33 11 21 31 41 51
*> -- -- -- -- -- -- -- -- --
*> 04 14 24 34 44 43 44 22 32 42 52
-*>
*> \endverbatim
*>
* =====================================================================