Mercurial > octave-nkf
comparison libcruft/lapack/dlatbs.f @ 7034:68db500cb558
[project @ 2007-10-16 18:54:19 by jwe]
author | jwe |
---|---|
date | Tue, 16 Oct 2007 18:54:23 +0000 |
parents | 57077d0ddc8e |
children |
comparison
equal
deleted
inserted
replaced
7033:f0142f2afdc6 | 7034:68db500cb558 |
---|---|
1 SUBROUTINE DLATBS( UPLO, TRANS, DIAG, NORMIN, N, KD, AB, LDAB, X, | 1 SUBROUTINE DLATBS( UPLO, TRANS, DIAG, NORMIN, N, KD, AB, LDAB, X, |
2 $ SCALE, CNORM, INFO ) | 2 $ SCALE, CNORM, INFO ) |
3 * | 3 * |
4 * -- LAPACK auxiliary routine (version 3.0) -- | 4 * -- LAPACK auxiliary routine (version 3.1) -- |
5 * Univ. of Tennessee, Univ. of California Berkeley, NAG Ltd., | 5 * Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd.. |
6 * Courant Institute, Argonne National Lab, and Rice University | 6 * November 2006 |
7 * June 30, 1992 | |
8 * | 7 * |
9 * .. Scalar Arguments .. | 8 * .. Scalar Arguments .. |
10 CHARACTER DIAG, NORMIN, TRANS, UPLO | 9 CHARACTER DIAG, NORMIN, TRANS, UPLO |
11 INTEGER INFO, KD, LDAB, N | 10 INTEGER INFO, KD, LDAB, N |
12 DOUBLE PRECISION SCALE | 11 DOUBLE PRECISION SCALE |