comparison libcruft/lapack/dlamc2.f @ 3339:f8b4692eb51c

[project @ 1999-11-04 16:24:30 by jwe]
author jwe
date Thu, 04 Nov 1999 16:24:31 +0000
parents 30c606bec7a8
children 68db500cb558
comparison
equal deleted inserted replaced
3338:bb5023dbee3d 3339:f8b4692eb51c
1 *
2 ************************************************************************
3 *
4 SUBROUTINE DLAMC2( BETA, T, RND, EPS, EMIN, RMIN, EMAX, RMAX ) 1 SUBROUTINE DLAMC2( BETA, T, RND, EPS, EMIN, RMIN, EMAX, RMAX )
5 * 2 *
6 * -- LAPACK auxiliary routine (version 2.0) -- 3 * -- LAPACK auxiliary routine (version 3.0) --
7 * Univ. of Tennessee, Univ. of California Berkeley, NAG Ltd., 4 * Univ. of Tennessee, Univ. of California Berkeley, NAG Ltd.,
8 * Courant Institute, Argonne National Lab, and Rice University 5 * Courant Institute, Argonne National Lab, and Rice University
9 * October 31, 1992 6 * October 31, 1992
10 * 7 *
11 * .. Scalar Arguments .. 8 * .. Scalar Arguments ..