Mercurial > octave-nkf

comparison libcruft/lapack/zlarfb.f @ 7034:68db500cb558

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-10-16 18:54:19 by jwe]
author jwe
date Tue, 16 Oct 2007 18:54:23 +0000
parents 15cddaacbc2d
children
comparison
equal deleted inserted replaced
7033:f0142f2afdc6 7034:68db500cb558
1 SUBROUTINE ZLARFB( SIDE, TRANS, DIRECT, STOREV, M, N, K, V, LDV, 1 SUBROUTINE ZLARFB( SIDE, TRANS, DIRECT, STOREV, M, N, K, V, LDV,
2 $ T, LDT, C, LDC, WORK, LDWORK ) 2 $ T, LDT, C, LDC, WORK, LDWORK )
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 * September 30, 1994
8 * 7 *
9 * .. Scalar Arguments .. 8 * .. Scalar Arguments ..
10 CHARACTER DIRECT, SIDE, STOREV, TRANS 9 CHARACTER DIRECT, SIDE, STOREV, TRANS
11 INTEGER K, LDC, LDT, LDV, LDWORK, M, N 10 INTEGER K, LDC, LDT, LDV, LDWORK, M, N
12 * .. 11 * ..