dlamchtst(l) - Linux man page
Name
Synopsis
- PROGRAM TEST3
DOUBLE
PRECISION BASE, EMAX, EMIN, EPS, PREC, RMAX, RMIN, RND, SFMIN, T
DOUBLE
PRECISION DLAMCH
EXTERNAL
DLAMCH
EPS
= DLAMCH( 'Epsilon' )
SFMIN
= DLAMCH( 'Safe minimum' )
BASE
= DLAMCH( 'Base' )
PREC
= DLAMCH( 'Precision' )
T
= DLAMCH( 'Number of digits in mantissa' )
RND
= DLAMCH( 'Rounding mode' )
EMIN
= DLAMCH( 'Minimum exponent' )
RMIN
= DLAMCH( 'Underflow threshold' )
EMAX
= DLAMCH( 'Largest exponent' )
RMAX
= DLAMCH( 'Overflow threshold' )
WRITE(
6, * )' Epsilon = ', EPS
WRITE(
6, * )' Safe minimum = ', SFMIN
WRITE(
6, * )' Base = ', BASE
WRITE(
6, * )' Precision = ', PREC
WRITE(
6, * )' Number of digits in mantissa = ', T
WRITE(
6, * )' Rounding mode = ', RND
WRITE(
6, * )' Minimum exponent = ', EMIN
WRITE(
6, * )' Underflow threshold = ', RMIN
WRITE(
6, * )' Largest exponent = ', EMAX
WRITE(
6, * )' Overflow threshold = ', RMAX
WRITE(
6, * )' Reciprocal of safe minimum = ', 1 / SFMIN
END