diff options
Diffstat (limited to 'SRC/ztfsm.f')
-rw-r--r-- | SRC/ztfsm.f | 32 |
1 files changed, 14 insertions, 18 deletions
diff --git a/SRC/ztfsm.f b/SRC/ztfsm.f index 1e1f00e2..79c56078 100644 --- a/SRC/ztfsm.f +++ b/SRC/ztfsm.f @@ -15,8 +15,8 @@ *> [TXT]</a> *> \endhtmlonly * -* Definition -* ========== +* Definition: +* =========== * * SUBROUTINE ZTFSM( TRANSR, SIDE, UPLO, TRANS, DIAG, M, N, ALPHA, A, * B, LDB ) @@ -30,11 +30,11 @@ * COMPLEX*16 A( 0: * ), B( 0: LDB-1, 0: * ) * .. * -* Purpose -* ======= * -*>\details \b Purpose: -*>\verbatim +*> \par Purpose: +* ============= +*> +*> \verbatim *> *> Level 3 BLAS like routine for A in RFP Format. *> @@ -50,11 +50,10 @@ *> A is in Rectangular Full Packed (RFP) Format. *> *> The matrix X is overwritten on B. -*> -*>\endverbatim +*> \endverbatim * -* Arguments -* ========= +* Arguments: +* ========== * *> \param[in] TRANSR *> \verbatim @@ -174,10 +173,9 @@ *> max( 1, m ). *> Unchanged on exit. *> \endverbatim -*> * -* Authors -* ======= +* Authors: +* ======== * *> \author Univ. of Tennessee *> \author Univ. of California Berkeley @@ -188,10 +186,9 @@ * *> \ingroup complex16OTHERcomputational * -* -* Further Details -* =============== -*>\details \b Further \b Details +*> \par Further Details: +* ===================== +*> *> \verbatim *> *> We first consider Standard Packed Format when N is even. @@ -295,7 +292,6 @@ *> 03 13 23 33 11 33 11 21 31 41 51 *> -- -- -- -- -- -- -- -- -- *> 04 14 24 34 44 43 44 22 32 42 52 -*> *> \endverbatim *> * ===================================================================== |