Fortran Wiki
precision (Rev #1)

Skip the Navigation Links | Home Page | All Pages | Recently Revised | Authors | Feeds | Export |

Description

precision(x) returns the decimal precision in the model of the type of x.

Standard

Fortran 95 and later

Class

Inquiry function

Syntax

result = precision(x)

Arguments

• x - Shall be of type real or complex.

Return value

The return value is of type integer and of the default integer kind.

Example

program prec_and_range
 real(kind=4) :: x(2)
 complex(kind=8) :: y
 print *, precision(x), range(x)
 print *, precision(y), range(y)
end program prec_and_range

Revision from April 26, 2009 19:22:01 by Jason Blevins

Forward in time (3 more) | See current | History | Rollback | View: Source | Linked from: Intrinsic procedures, range, selected_real_kind, Intrinsic types