·  Home
+   man pages
 -> Linux -> FreeBSD -> OpenBSD -> NetBSD -> Tru64 Unix -> HP-UX 11i -> IRIX
·  Linux HOWTOs
·  FreeBSD Tips
·  *niX Forums

man pages->IRIX man pages -> f90/digits (3)
 Title
 Content
 Arch
 Section All Sections 1 - General Commands 2 - System Calls 3 - Subroutines 4 - Special Files 5 - File Formats 6 - Games 7 - Macros and Conventions 8 - Maintenance Commands 9 - Kernel Interface n - New Commands

### Contents

```
DIGITS(3I)					       Last changed: 1-6-98

```

### NAME[Toc][Back]

```     DIGITS - Returns the number of significant	digits
```

### SYNOPSIS[Toc][Back]

```     DIGITS ([X=]x)
```

### IMPLEMENTATION[Toc][Back]

```     UNICOS, UNICOS/mk,	and IRIX systems
```

### STANDARDS[Toc][Back]

```     Fortran 90
```

### DESCRIPTION[Toc][Back]

```     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.
```

### RETURN VALUES[Toc][Back]

```     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.
```

### EXAMPLES[Toc][Back]

```     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

```

### NAME[Toc][Back]

```     DIGITS - Returns the number of significant	digits
```

### SYNOPSIS[Toc][Back]

```     DIGITS ([X=]x)
```

### IMPLEMENTATION[Toc][Back]

```     UNICOS, UNICOS/mk,	and IRIX systems
```

### STANDARDS[Toc][Back]

```     Fortran 90
```

### DESCRIPTION[Toc][Back]

```     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.
```

### RETURN VALUES[Toc][Back]

```     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.
```

### EXAMPLES[Toc][Back]

```     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)