Mercurial > hg > octave-nkf
view libcruft/lapack/dlamc3.f @ 4957:2da9205571f2
[project @ 2004-09-02 03:12:55 by jwe]
author | jwe |
---|---|
date | Thu, 02 Sep 2004 03:12:55 +0000 |
parents | f8b4692eb51c |
children | 68db500cb558 |
line wrap: on
line source
DOUBLE PRECISION FUNCTION DLAMC3( A, B ) * * -- LAPACK auxiliary routine (version 3.0) -- * Univ. of Tennessee, Univ. of California Berkeley, NAG Ltd., * Courant Institute, Argonne National Lab, and Rice University * October 31, 1992 * * .. Scalar Arguments .. DOUBLE PRECISION A, B * .. * * Purpose * ======= * * DLAMC3 is intended to force A and B to be stored prior to doing * the addition of A and B , for use in situations where optimizers * might hold one of these in a register. * * Arguments * ========= * * A, B (input) DOUBLE PRECISION * The values A and B. * * ===================================================================== * * .. Executable Statements .. * DLAMC3 = A + B * RETURN * * End of DLAMC3 * END