GNU Info

(g77-295.info)Real Intrinsic

---

Next: RealPart Intrinsic Prev: Range Intrinsic Up: Table of Intrinsic Functions

---

Enter node , (file) or (file)node

Real Intrinsic
..............

     Real(A)

Real: `REAL' function.  The exact type is `REAL(KIND=1)' when argument
A is any type other than `COMPLEX', or when it is `COMPLEX(KIND=1)'.
When A is any `COMPLEX' type other than `COMPLEX(KIND=1)', this
intrinsic is valid only when used as the argument to `REAL()', as
explained below.

A: `INTEGER', `REAL', or `COMPLEX'; scalar; INTENT(IN).

Intrinsic groups: (standard FORTRAN 77).

Description:

   Converts A to `REAL(KIND=1)'.

   Use of `REAL()' with a `COMPLEX' argument (other than
`COMPLEX(KIND=1)') is restricted to the following case:

     REAL(REAL(A))

This expression converts the real part of A to `REAL(KIND=1)'.

   Note: RealPart Intrinsic, for information on a GNU Fortran
intrinsic that extracts the real part of an arbitrary `COMPLEX' value.

   Note: REAL() and AIMAG() of Complex, for more information.