diff options
author | julie <julielangou@users.noreply.github.com> | 2010-04-13 19:09:55 +0000 |
---|---|---|
committer | julie <julielangou@users.noreply.github.com> | 2010-04-13 19:09:55 +0000 |
commit | 594291cfc064379adfa2861a32af8c1b836c08a7 (patch) | |
tree | 7969dd6b3c3e2b3fad11be1d1b451fe75d3b703c /TESTING/MATGEN/dlatm3.f | |
parent | 07c14f97cc8d95688117d7f561edd3a214e56df6 (diff) | |
download | lapack-594291cfc064379adfa2861a32af8c1b836c08a7.tar.gz lapack-594291cfc064379adfa2861a32af8c1b836c08a7.tar.bz2 lapack-594291cfc064379adfa2861a32af8c1b836c08a7.zip |
Many comment fix for allowing C Wrapper to work on MATGEN
Diffstat (limited to 'TESTING/MATGEN/dlatm3.f')
-rw-r--r-- | TESTING/MATGEN/dlatm3.f | 34 |
1 files changed, 17 insertions, 17 deletions
diff --git a/TESTING/MATGEN/dlatm3.f b/TESTING/MATGEN/dlatm3.f index 159c044d..ac3b5e89 100644 --- a/TESTING/MATGEN/dlatm3.f +++ b/TESTING/MATGEN/dlatm3.f @@ -65,31 +65,31 @@ * Arguments * ========= * -* M - INTEGER +* M (input) INTEGER * Number of rows of matrix. Not modified. * -* N - INTEGER +* N (input) INTEGER * Number of columns of matrix. Not modified. * -* I - INTEGER +* I (input) INTEGER * Row of unpivoted entry to be returned. Not modified. * -* J - INTEGER +* J (input) INTEGER * Column of unpivoted entry to be returned. Not modified. * -* ISUB - INTEGER +* ISUB (input/output) INTEGER * Row of pivoted entry to be returned. Changed on exit. * -* JSUB - INTEGER +* JSUB (input/output) INTEGER * Column of pivoted entry to be returned. Changed on exit. * -* KL - INTEGER +* KL (input) INTEGER * Lower bandwidth. Not modified. * -* KU - INTEGER +* KU (input) INTEGER * Upper bandwidth. Not modified. * -* IDIST - INTEGER +* IDIST (input) INTEGER * On entry, IDIST specifies the type of distribution to be * used to generate a random matrix . * 1 => UNIFORM( 0, 1 ) @@ -97,14 +97,14 @@ * 3 => NORMAL( 0, 1 ) * Not modified. * -* ISEED - INTEGER array of dimension ( 4 ) +* ISEED (input/output) INTEGER array of dimension ( 4 ) * Seed for random number generator. * Changed on exit. * -* D - DOUBLE PRECISION array of dimension ( MIN( I , J ) ) +* D (input) DOUBLE PRECISION array of dimension ( MIN( I , J ) ) * Diagonal entries of matrix. Not modified. * -* IGRADE - INTEGER +* IGRADE (input) INTEGER * Specifies grading of matrix as follows: * 0 => no grading * 1 => matrix premultiplied by diag( DL ) @@ -117,13 +117,13 @@ * postmultiplied by diag( DL ) * Not modified. * -* DL - DOUBLE PRECISION array ( I or J, as appropriate ) +* DL (input) DOUBLE PRECISION array ( I or J, as appropriate ) * Left scale factors for grading matrix. Not modified. * -* DR - DOUBLE PRECISION array ( I or J, as appropriate ) +* DR (input) DOUBLE PRECISION array ( I or J, as appropriate ) * Right scale factors for grading matrix. Not modified. * -* IPVTNG - INTEGER +* IPVTNG (input) INTEGER * On entry specifies pivoting permutations as follows: * 0 => none. * 1 => row pivoting. @@ -131,13 +131,13 @@ * 3 => full pivoting, i.e., on both sides. * Not modified. * -* IWORK - INTEGER array ( I or J, as appropriate ) +* IWORK (input) INTEGER array ( I or J, as appropriate ) * This array specifies the permutation used. The * row (or column) originally in position K is in * position IWORK( K ) after pivoting. * This differs from IWORK for DLATM2. Not modified. * -* SPARSE - DOUBLE PRECISION between 0. and 1. +* SPARSE (input) DOUBLE PRECISION between 0. and 1. * On entry specifies the sparsity of the matrix * if sparse matix is to be generated. * SPARSE should lie between 0 and 1. |