diff options
| author | julie <julielangou@users.noreply.github.com> | 2010-08-10 16:22:10 +0000 |
|---|---|---|
| committer | julie <julielangou@users.noreply.github.com> | 2010-08-10 16:22:10 +0000 |
| commit | 067bfbf1595b1f3e10ae84045791bd58ac1061ec (patch) | |
| tree | aac9de4e5a41b79dcb5d952be579b930017f78ec /SRC/dtftri.f | |
| parent | db2a14bcf99ab733813e24f0583f6fa486a7365b (diff) | |
| download | lapack-067bfbf1595b1f3e10ae84045791bd58ac1061ec.tar.gz lapack-067bfbf1595b1f3e10ae84045791bd58ac1061ec.tar.bz2 lapack-067bfbf1595b1f3e10ae84045791bd58ac1061ec.zip | |
Various comment fixes
Diffstat (limited to 'SRC/dtftri.f')
| -rw-r--r-- | SRC/dtftri.f | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/SRC/dtftri.f b/SRC/dtftri.f index ae75fe45..20e9bbf9 100644 --- a/SRC/dtftri.f +++ b/SRC/dtftri.f @@ -27,15 +27,15 @@ * Arguments * ========= * -* TRANSR (input) CHARACTER +* TRANSR (input) CHARACTER*1 * = 'N': The Normal TRANSR of RFP A is stored; * = 'T': The Transpose TRANSR of RFP A is stored. * -* UPLO (input) CHARACTER +* UPLO (input) CHARACTER*1 * = 'U': A is upper triangular; * = 'L': A is lower triangular. * -* DIAG (input) CHARACTER +* DIAG (input) CHARACTER*1 * = 'N': A is non-unit triangular; * = 'U': A is unit triangular. * |