diff options
| author | james <james@8a072113-8704-0410-8d35-dd094bca7971> | 2011-12-20 14:22:39 +0000 |
|---|---|---|
| committer | james <james@8a072113-8704-0410-8d35-dd094bca7971> | 2011-12-20 14:22:39 +0000 |
| commit | 52abf911e298228e970a4ea0b5905995e22f5da5 (patch) | |
| tree | 8da2ac0ebef580820277c9b4bf9922d1c04ad872 /INSTALL/dlamchf77.f | |
| parent | d146d498ca94cd68fe54706eab560e616e8ff11a (diff) | |
fixed.
Diffstat (limited to 'INSTALL/dlamchf77.f')
| -rw-r--r-- | INSTALL/dlamchf77.f | 29 |
1 files changed, 0 insertions, 29 deletions
diff --git a/INSTALL/dlamchf77.f b/INSTALL/dlamchf77.f index 3cefba67..587ee7c7 100644 --- a/INSTALL/dlamchf77.f +++ b/INSTALL/dlamchf77.f @@ -71,35 +71,6 @@ * .. Scalar Arguments .. CHARACTER CMACH * .. -* -* .. Scalar Arguments .. - LOGICAL IEEE1, RND - INTEGER BETA, T -* .. -* -* .. Scalar Arguments .. - LOGICAL RND - INTEGER BETA, EMAX, EMIN, T - DOUBLE PRECISION EPS, RMAX, RMIN -* .. -* -* .. Scalar Arguments .. - DOUBLE PRECISION A, B -* .. -* -* .. Scalar Arguments .. - INTEGER BASE, EMIN - DOUBLE PRECISION START -* .. -* -* .. Scalar Arguments .. - LOGICAL IEEE - INTEGER BETA, EMAX, EMIN, P - DOUBLE PRECISION RMAX -* .. -* -* ===================================================================== -* * .. Parameters .. DOUBLE PRECISION ONE, ZERO PARAMETER ( ONE = 1.0D+0, ZERO = 0.0D+0 ) |