Classes
struct	cilist

Typedefs
typedef long int	integer

typedef long int	logical

typedef long int	flag

typedef long int	ftnlen

typedef long int	ftnint

Functions
int	stopx_ (integer *i)

**	I1MACH (2)

THE BASE ***	I1MACH (8) = S

THE BASE THE NUMBER OF BASE A DIGITS ***	I1MACH (9) = A**S - 1

THE BASE THE NUMBER OF BASE A DIGITS THE LARGEST MAGNITUDE ***FLOATS HAVE FORM	SIGN (B *E)((X(1)/B)+...+(X(T)/B *T))/*WHERE EMIN.LE.E.LE.EMAX./**I1MACH(10) = B

THE BASE THE NUMBER OF BASE A DIGITS THE LARGEST MAGNITUDE *FLOATS HAVE FORM THE BASE SINGLE PRECISION **	I1MACH (11) = T

THE BASE THE NUMBER OF BASE A DIGITS THE LARGEST MAGNITUDE *FLOATS HAVE FORM THE BASE SINGLE PRECISION THE NUMBER OF BASE B DIGITS **	I1MACH (12) = EMIN

THE BASE THE NUMBER OF BASE A DIGITS THE LARGEST MAGNITUDE *FLOATS HAVE FORM THE BASE SINGLE PRECISION THE NUMBER OF BASE B DIGITS THE SMALLEST EXPONENT E **	I1MACH (13) = EMAX

THE BASE THE NUMBER OF BASE A DIGITS THE LARGEST MAGNITUDE *FLOATS HAVE FORM THE BASE SINGLE PRECISION THE NUMBER OF BASE B DIGITS THE SMALLEST EXPONENT E THE LARGEST EXPONENT E DOUBLE PRECISION *	I1MACH (14) = T

THE BASE THE NUMBER OF BASE A DIGITS THE LARGEST MAGNITUDE *FLOATS HAVE FORM THE BASE SINGLE PRECISION THE NUMBER OF BASE B DIGITS THE SMALLEST EXPONENT E THE LARGEST EXPONENT E DOUBLE PRECISION THE NUMBER OF BASE B DIGITS *	I1MACH (15) = EMIN

THE BASE THE NUMBER OF BASE A DIGITS THE LARGEST MAGNITUDE *FLOATS HAVE FORM THE BASE SINGLE PRECISION THE NUMBER OF BASE B DIGITS THE SMALLEST EXPONENT E THE LARGEST EXPONENT E DOUBLE PRECISION THE NUMBER OF BASE B DIGITS THE SMALLEST EXPONENT E *	I1MACH (16) = EMAX

THE BASE THE NUMBER OF BASE A DIGITS THE LARGEST MAGNITUDE *FLOATS HAVE FORM THE BASE SINGLE PRECISION THE NUMBER OF BASE B DIGITS THE SMALLEST EXPONENT E THE LARGEST EXPONENT E DOUBLE PRECISION THE NUMBER OF BASE B DIGITS THE SMALLEST EXPONENT E THE LARGEST EXPONENT E INCLUDING AUTO DOUBLE COMPILERS TO COMPILE ON OLDER ADD A C IN COLUMN ON THE NEXT LINE AND REMOVE THE C FROM COLUMN IN ONE OF THE SECTIONS BELOW CONSTANTS FOR EVEN OLDER MACHINES CAN BE OBTAINED BY mail netlib research bell labs com send old1mach from blas PLEASE SEND CORRECTIONS TO dmg OR ehg bell labs com ***DATA	IMACH (2)/6//DATA IMACH(3)/43//*DATA IMACH(4)/6//*DATA IMACH(5)/36//*DATA IMACH(6)/4//*DATA IMACH(7)/2//*DATA IMACH(8)/35//*DATA IMACH(9)/O377777777777//*DATA IMACH(10)/2//*DATA IMACH(11)/27//*DATA IMACH(12)/-127//*DATA IMACH(13)/127//*DATA IMACH(14)/63//*DATA IMACH(15)/-127//**DATA IMACH(16)/127/

THE BASE THE NUMBER OF BASE A DIGITS THE LARGEST MAGNITUDE *FLOATS HAVE FORM THE BASE SINGLE PRECISION THE NUMBER OF BASE B DIGITS THE SMALLEST EXPONENT E THE LARGEST EXPONENT E DOUBLE PRECISION THE NUMBER OF BASE B DIGITS THE SMALLEST EXPONENT E THE LARGEST EXPONENT E INCLUDING AUTO DOUBLE COMPILERS TO COMPILE ON OLDER ADD A C IN COLUMN ON THE NEXT LINE AND REMOVE THE C FROM COLUMN IN ONE OF THE SECTIONS BELOW CONSTANTS FOR EVEN OLDER MACHINES CAN BE OBTAINED BY mail netlib research bell labs com send old1mach from blas PLEASE SEND CORRECTIONS TO dmg OR ehg bell labs com *DATA SC BIT INTEGER ARITHMETIC DATA SC WHICH IS APPROPRIATE FOR THE UNIVAC FOR SYSTEM IF YOU HAVE THE UNIVAC FTN SET IT TO *DATA SC Note that some values may need changing *******long	i1mach_ (long *i)

template<typename T >
T	d1mach_ (long *i)

integer	i7mdcn_ (integer *k)

template<typename doublereal >
doublereal	dr7mdc_ (integer *k)

template<typename doublereal >
int	dv7dfl_ (integer alg, integer lv, doublereal *v)

template<typename doublereal >
int	divset_ (integer alg, integer iv, integer liv, integer lv, doublereal *v)

template<typename doublereal >
int	dv7scp_ (integer p, doublereal y, doublereal *s)

template<typename doublereal >
int	dv7vmp_ (integer n, doublereal x, doublereal y, doublereal z__, integer *k)

template<typename doublereal >
doublereal	dv2nrm_ (integer p, doublereal x)

template<typename doublereal >
int	dv7cpy_ (integer p, doublereal y, doublereal *x)

template<typename doublereal >
doublereal	dd7tpr_ (integer p, doublereal x, doublereal *y)

template<typename doublereal >
int	dl7ivm_ (integer n, doublereal x, doublereal l, doublereal y)

template<typename doublereal >
int	dl7itv_ (integer n, doublereal x, doublereal l, doublereal y)

template<typename doublereal >
int	dl7tvm_ (integer n, doublereal x, doublereal l, doublereal y)

template<typename doublereal >
int	dd7dog_ (doublereal dig, integer lv, integer n, doublereal nwtstp, doublereal step, doublereal v)

template<typename doublereal >
int	dv2axy_ (integer p, doublereal w, doublereal a, doublereal x, doublereal *y)

template<typename doublereal >
doublereal	drldst_ (integer p, doublereal d__, doublereal x, doublereal x0)

template<typename doublereal >
int	da7sst_ (integer iv, integer liv, integer lv, doublereal v)

template<typename doublereal >
int	dl7vml_ (integer n, doublereal x, doublereal l, doublereal y)

template<typename doublereal >
int	dw7zbf_ (doublereal l, integer n, doublereal s, doublereal w, doublereal y, doublereal z__)

template<typename doublereal >
int	dl7upd_ (doublereal beta, doublereal gamma, doublereal l, doublereal lambda, doublereal lplus, integer n, doublereal w, doublereal z__)

template<typename doublereal >
int	dparck_ (integer alg, doublereal d__, integer iv, integer liv, integer lv, integer n, doublereal *v)

template<typename doublereal >
int	drmng_ (doublereal d__, doublereal fx, doublereal g, integer iv, integer liv, integer lv, integer n, doublereal v, doublereal *x)

int	i7shft_ (integer n, integer k, integer *x)

Variables
THE BASE THE NUMBER OF BASE A DIGITS THE LARGEST MAGNITUDE *FLOATS HAVE FORM THE BASE SINGLE PRECISION THE NUMBER OF BASE B DIGITS THE SMALLEST EXPONENT E THE LARGEST EXPONENT E DOUBLE PRECISION THE NUMBER OF BASE B DIGITS THE SMALLEST EXPONENT E THE LARGEST EXPONENT E INCLUDING AUTO DOUBLE COMPILERS *TO COMPILE ON OLDER	MACHINES

THE BASE THE NUMBER OF BASE A DIGITS THE LARGEST MAGNITUDE *FLOATS HAVE FORM THE BASE SINGLE PRECISION THE NUMBER OF BASE B DIGITS THE SMALLEST EXPONENT E THE LARGEST EXPONENT E DOUBLE PRECISION THE NUMBER OF BASE B DIGITS THE SMALLEST EXPONENT E THE LARGEST EXPONENT E INCLUDING AUTO DOUBLE COMPILERS TO COMPILE ON OLDER ADD A C IN COLUMN ON THE NEXT LINE AND REMOVE THE C FROM COLUMN IN ONE OF THE SECTIONS BELOW CONSTANTS FOR EVEN OLDER MACHINES CAN BE OBTAINED BY mail netlib research bell labs com send old1mach from blas PLEASE SEND CORRECTIONS TO dmg OR ehg bell labs com *DATA SC BIT INTEGER ARITHMETIC DATA SC WHICH IS APPROPRIATE FOR THE UNIVAC FOR SYSTEM *IF YOU HAVE THE UNIVAC FTN	SYSTEM

Detailed Description

Partial C++ conversion of the netlib port library.

http://www.netlib.org/port/

Function Documentation

** port::I1MACH ( 2 )

Initial value:

= THE STANDARD OUTPUT UNIT. */
     * *    I1MACH( 3) = THE STANDARD PUNCH UNIT. */
     * *    I1MACH( 4) = THE STANDARD ERROR MESSAGE UNIT. */
     * *    I1MACH( 5) = THE NUMBER OF BITS PER INTEGER STORAGE UNIT. */
     * *    I1MACH( 6) = THE NUMBER OF CHARACTERS PER CHARACTER STORAGE UNIT. */
     * *    INTEGERS HAVE FORM SIGN ( X(S-1)*A**(S-1) + ... + X(1)*A + X(0) ) */
     * *    I1MACH( 7) = A

THE BASE THE NUMBER OF BASE A DIGITS THE LARGEST MAGNITUDE ***FLOATS HAVE FORM THE BASE ***SINGLE PRECISION THE NUMBER OF BASE B DIGITS THE SMALLEST EXPONENT E THE LARGEST EXPONENT E ***DOUBLE PRECISION THE NUMBER OF BASE B DIGITS THE SMALLEST EXPONENT E THE LARGEST EXPONENT E ****INCLUDING AUTO DOUBLE COMPILERS ***TO COMPILE ON OLDER ADD A C IN COLUMN ***ON THE NEXT LINE ***AND REMOVE THE C FROM COLUMN IN ONE OF THE SECTIONS BELOW ***CONSTANTS FOR EVEN OLDER MACHINES CAN BE OBTAINED BY ***mail netlib research bell labs com ***send old1mach from blas ***PLEASE SEND CORRECTIONS TO dmg OR ehg bell labs com ****DATA SC ****BIT INTEGER ARITHMETIC ****DATA SC ****WHICH IS APPROPRIATE FOR THE UNIVAC FOR SYSTEM ***IF YOU HAVE THE UNIVAC FTN SET IT TO ****DATA SC ****Note that some values may need changing *********long port::i1mach_ ( long * i )

inline

*** CHECK FOR AUTODOUBLE *** */* *** AUTODOUBLED *** */* *** IEEE *** */* *** VAX WITH D_FLOATING *** */* *** IBM MAINFRAME *** */* *** IEEE *** */* *** VAX *** */* *** IBM MAINFRAME *** */* *** CONVEX C-1 *** */* L10: */* *** CRAY T3E *** */* *** CRAY 1, XMP, 2, AND 3 *** */

THE BASE THE NUMBER OF BASE A DIGITS THE LARGEST MAGNITUDE ***FLOATS HAVE FORM THE BASE ***SINGLE PRECISION THE NUMBER OF BASE B DIGITS THE SMALLEST EXPONENT E THE LARGEST EXPONENT E ***DOUBLE PRECISION THE NUMBER OF BASE B DIGITS THE SMALLEST EXPONENT E THE LARGEST EXPONENT E ****INCLUDING AUTO DOUBLE COMPILERS ***TO COMPILE ON OLDER ADD A C IN COLUMN ***ON THE NEXT LINE ***AND REMOVE THE C FROM COLUMN IN ONE OF THE SECTIONS BELOW ***CONSTANTS FOR EVEN OLDER MACHINES CAN BE OBTAINED BY ***mail netlib research bell labs com ***send old1mach from blas ***PLEASE SEND CORRECTIONS TO dmg OR ehg bell labs com ****DATA SC ****BIT INTEGER ARITHMETIC ****DATA SC ****WHICH IS APPROPRIATE FOR THE UNIVAC FOR SYSTEM ***IF YOU HAVE THE UNIVAC FTN SET IT TO ****DATA port::IMACH ( 2 )

MACHINE CONSTANTS FOR THE HONEYWELL DPS 8/70 SERIES. */

Variable Documentation

THE BASE THE NUMBER OF BASE A DIGITS THE LARGEST MAGNITUDE ***FLOATS HAVE FORM THE BASE ***SINGLE PRECISION THE NUMBER OF BASE B DIGITS THE SMALLEST EXPONENT E THE LARGEST EXPONENT E ***DOUBLE PRECISION THE NUMBER OF BASE B DIGITS THE SMALLEST EXPONENT E THE LARGEST EXPONENT E ****INCLUDING AUTO DOUBLE COMPILERS ***TO COMPILE ON OLDER ADD A C IN COLUMN ***ON THE NEXT LINE ***AND REMOVE THE C FROM COLUMN IN ONE OF THE SECTIONS BELOW ***CONSTANTS FOR EVEN OLDER MACHINES CAN BE OBTAINED BY ***mail netlib research bell labs com ***send old1mach from blas ***PLEASE SEND CORRECTIONS TO dmg OR ehg bell labs com ****DATA SC ****BIT INTEGER ARITHMETIC ****DATA SC ****WHICH IS APPROPRIATE FOR THE UNIVAC FOR SYSTEM ***IF YOU HAVE THE UNIVAC FTN port::SYSTEM

MACHINE CONSTANTS FOR THE UNIVAC 1100 SERIES. */

Classes

Typedefs

Functions

Variables

Detailed Description

Function Documentation

Variable Documentation