DIGITS(3I) Last changed: 1-6-98
DIGITS - Returns the number of significant digits
DIGITS ([X=]x)
UNICOS, UNICOS/mk, and IRIX systems
Fortran 90
The DIGITS intrinsic function returns the number of significant digits
in the model representing numbers of the same type and kind type
parameter as the argument. The number returned is the number of
significant radix digits (base 2 digits), not decimal digits. It
accepts the following argument:
x Must be of type integer or real. It can be scalar or array
valued.
DIGITS is an inquiry function. The name of this intrinsic cannot be
passed as an argument.
The result type is an integer scalar. The result has the value q if x
is of type integer. It has the value p if x is of type real. The
values q and p are defined on the MODELS(3I) man page.
The following code fragment was run on several systems:
INTEGER(KIND=1) i1
INTEGER(KIND=2) i2
INTEGER(KIND=4) i4
INTEGER(KIND=8) i8
INTEGER id
PRINT *,'DIGITS i1=',DIGITS(i1)
PRINT *,'DIGITS i2=',DIGITS(i2)
PRINT *,'DIGITS i4=',DIGITS(i4)
PRINT *,'DIGITS i8=',DIGITS(i8)
PRINT *,'DIGITS id=',DIGITS(id)
END
IRIX systems generated the following results:
DIGITS i1= 7
DIGITS i2= 15
DIGITS i4= 31
DIGITS i8= 63
DIGITS id= 31
CRAY T90 systems that support IEEE floating-point arithmetic generated
the following results:
DIGITS i1= 7
DIGITS i2= 15
DIGITS i4= 31
DIGITS i8= 63
DIGITS id= 63
UNICOS systems, except for CRAY T90 systems that support IEEE
floating-point arithmetic, generated the following results:
DIGITS i1= 7
DIGITS i2= 15
DIGITS i4= 31
DIGITS i8= 63
DIGITS id= 63
UNICOS/mk systems generated the following results:
DIGITS i1= 7
DIGITS i2= 15
DIGITS i4= 31
DIGITS i8= 63
DIGITS id= 63
MODELS(3I)
Intrinsic Procedures Reference Manual, publication SR-2138, for the
printed version of this man page.
DIGITS(3I) Last changed: 1-6-98
DIGITS - Returns the number of significant digits
DIGITS ([X=]x)
UNICOS, UNICOS/mk, and IRIX systems
Fortran 90
The DIGITS intrinsic function returns the number of significant digits
in the model representing numbers of the same type and kind type
parameter as the argument. The number returned is the number of
significant radix digits (base 2 digits), not decimal digits. It
accepts the following argument:
x Must be of type integer or real. It can be scalar or array
valued.
DIGITS is an inquiry function. The name of this intrinsic cannot be
passed as an argument.
The result type is an integer scalar. The result has the value q if x
is of type integer. It has the value p if x is of type real. The
values q and p are defined on the MODELS(3I) man page.
The following code fragment was run on several systems:
INTEGER(KIND=1) i1
INTEGER(KIND=2) i2
INTEGER(KIND=4) i4
INTEGER(KIND=8) i8
INTEGER id
PRINT *,'DIGITS i1=',DIGITS(i1)
PRINT *,'DIGITS i2=',DIGITS(i2)
PRINT *,'DIGITS i4=',DIGITS(i4)
PRINT *,'DIGITS i8=',DIGITS(i8)
PRINT *,'DIGITS id=',DIGITS(id)
END
IRIX systems generated the following results:
DIGITS i1= 7
DIGITS i2= 15
DIGITS i4= 31
DIGITS i8= 63
DIGITS id= 31
CRAY T90 systems that support IEEE floating-point arithmetic generated
the following results:
DIGITS i1= 7
DIGITS i2= 15
DIGITS i4= 31
DIGITS i8= 63
DIGITS id= 63
UNICOS systems, except for CRAY T90 systems that support IEEE
floating-point arithmetic, generated the following results:
DIGITS i1= 7
DIGITS i2= 15
DIGITS i4= 31
DIGITS i8= 63
DIGITS id= 63
UNICOS/mk systems generated the following results:
DIGITS i1= 7
DIGITS i2= 15
DIGITS i4= 31
DIGITS i8= 63
DIGITS id= 63
MODELS(3I)
Intrinsic Procedures Reference Manual, publication SR-2138, for the
printed version of this man page.
[ Back ]
|
