CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
c  CVS Info
c  $Date: 2005/01/10 21:56:20 $
c  $Revision: 1.2 $
c  $RCSfile: decalpha.h,v $
c  $Name: rel_5 $
C                                                                    
C  File Name: decalpha.h                                             
C                                                                    
C  Functional Description: The header file decalpha.h defines       
C      macros used by FORTRAN code on the DEC Alpha when             
C      implementing the bench11 multiple precision benchmark         
C      routines.                                                     
C                                                                    
CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
C
C  On the DEC Alpha the INTEGER*8 (64 bit) is the largest supported type
#define MPLONG INTEGER*8
C
C  For MPI transfers (on Cray, MPI_INTEGER)
#define MY_INTEGER     MPI_INTEGER8
C
C  No Double Precision on Cray
#define MY_DOUBLE       DOUBLE PRECISION
C
C  The total number of bits in an MPLONG
#define WORDLEN		64
C
C  The number of bits in each digit word used by the multiple
C  precision structure (normally WORDLEN/2)
#if GMP
#define BITSPERWORD	64
#else
#define BITSPERWORD	32
#endif
C
C  The number of usable bits in the mantissa of a double
C  (Look in the file /usr/include/float.h)
C  Also define a fudge factor so that for any values of
C  rem and div 
C  floor(rem/div) > int(float(rem-DIVFUDGE*2^stuff)/float(div))
C  where float(x) is the double precision representation
C  of the top DBL_MANT_DIG-1 bits of x and stuff is chosen so
C  DIVFUDGE effects only the bottom bits of those chosen by float.
#define DBL_MANT_DIG	53
#define DIVFUDGE	3
C
C  There are 32 bits in an INTEGER on the DEC Alpha using the 
C  default flags. This is important because many functions 
C  return an INTEGER, not an MPLONG. Note that the
C  "-integer_size 64" or the "-i8" compiler options will
C  force integers to be 64 bits.
#define INTEGER_BITS	64
#define INT32		1
C
#define VECTLEN		1
C
C  Define the best implementation of a leading zero count
C  On the DECALPHA we use the software version in utility/util.f
c#define LEADZ(n) LEADZ(n)
c      INTEGER LEADZ
C
C Define a string containing a single backslash
#define BACKSLASH "\"