Fortran Wiki
precision (Rev #3)

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 May 3, 2009 22:47:57 by Jason Blevins

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