·  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/precision (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

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

```

### NAME[Toc][Back]

```     PRECISION - Returns the decimal precision of a number in the real
number model
```

### SYNOPSIS[Toc][Back]

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

### IMPLEMENTATION[Toc][Back]

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

### STANDARDS[Toc][Back]

```     Fortran 90
```

### DESCRIPTION[Toc][Back]

```     The PRECISION intrinsic function returns the decimal precision of a
number in the real	number model.  The real	number model is	described
in	the MODELS(3I) man page.  This function	accepts	the following
argument:

x	  Must be of type real or complex.  It may be scalar or	array
valued.

PRECISION is an inquiry function.	The name of this intrinsic cannot
be	passed as an argument.
```

### RETURN VALUES[Toc][Back]

```     The result	is a default integer scalar.  The result has the value
INT((p-1)*LOG10(b))+k, where b and	p are as defined in the	model and
where k is	1 if b is an integral power of 10 and 0	otherwise.
```

### EXAMPLES[Toc][Back]

```     On	UNICOS systems,	except for CRAY	T90 systems that support IEEE
floating-point arithmetic,	PRECISION(X) has the value 13 for
REAL(KIND=8).

On	CRAY T90 systems that support IEEE floating-point arithmetic,
PRECISION(X) has the following values:

* 6 for REAL(KIND=4) X

* 15 for REAL(KIND=8) X

* 33 for REAL(KIND=16) X

On	IRIX systems, PRECISION(X) has the following values:

* 6 for REAL(KIND=4) X

* 15 for REAL(KIND=8) X

* 31 for REAL(KIND=16) X

On	UNICOS/mk systems, PRECISION(X)	has the	following values:

* 6 for REAL(KIND=4) X

* 15 for REAL(KIND=8) X
```

```     MODELS(3I)

Intrinsic Procedures Reference Manual, publication	SR-2138, for the
printed version of	this man page.

PRECISION(3I)					       Last changed: 1-6-98

```

### NAME[Toc][Back]

```     PRECISION - Returns the decimal precision of a number in the real
number model
```

### SYNOPSIS[Toc][Back]

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

### IMPLEMENTATION[Toc][Back]

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

### STANDARDS[Toc][Back]

```     Fortran 90
```

### DESCRIPTION[Toc][Back]

```     The PRECISION intrinsic function returns the decimal precision of a
number in the real	number model.  The real	number model is	described
in	the MODELS(3I) man page.  This function	accepts	the following
argument:

x	  Must be of type real or complex.  It may be scalar or	array
valued.

PRECISION is an inquiry function.	The name of this intrinsic cannot
be	passed as an argument.
```

### RETURN VALUES[Toc][Back]

```     The result	is a default integer scalar.  The result has the value
INT((p-1)*LOG10(b))+k, where b and	p are as defined in the	model and
where k is	1 if b is an integral power of 10 and 0	otherwise.
```

### EXAMPLES[Toc][Back]

```     On	UNICOS systems,	except for CRAY	T90 systems that support IEEE
floating-point arithmetic,	PRECISION(X) has the value 13 for
REAL(KIND=8).

On	CRAY T90 systems that support IEEE floating-point arithmetic,
PRECISION(X) has the following values:

* 6 for REAL(KIND=4) X

* 15 for REAL(KIND=8) X

* 33 for REAL(KIND=16) X

On	IRIX systems, PRECISION(X) has the following values:

* 6 for REAL(KIND=4) X

* 15 for REAL(KIND=8) X

* 31 for REAL(KIND=16) X

On	UNICOS/mk systems, PRECISION(X)	has the	following values:

* 6 for REAL(KIND=4) X

* 15 for REAL(KIND=8) X
```

```     MODELS(3I)