REAL Function

Elemental Intrinsic Function (Generic): Converts a value to real type.

Syntax

result = REAL (a [, kind])

a
(Input) Must be of type integer, real, or complex.

kind
(Optional; input) Must be a scalar integer initialization expression.

Results:

The result is of type real. If kind is present, the kind parameter is that specified by kind. If kind is not present, see the following table for the kind parameter.

Functions that cause conversion of one data type to another type have the same affect as the implied conversion in assignment statements.

If a is integer or real, the result is equal to an approximation of a. If a is complex, the result is equal to an approximation of the real part of a.

Specific Name 1 Argument Type Result Type
  INTEGER(1) REAL(4)
FLOATI INTEGER(2) REAL(4)
FLOAT 2, 3 INTEGER(4) REAL(4)
REAL 2 INTEGER(4) REAL(4)
FLOATK INTEGER(8) REAL(4)
  REAL(4) REAL(4)
SNGL 2, 4 REAL(8) REAL(4)
SNGLQ 5 REAL(16) REAL(4)
  COMPLEX(4) REAL(4)
  COMPLEX(8) REAL(8)
1 These specific functions cannot be passed as actual arguments.
2 The setting of compiler option /real_size can affect FLOAT, REAL, and SNGL.
3 Or FLOATJ. For compatibility with older versions of Fortran, FLOAT can also be specified as a generic function.
4 For compatibility with older versions of Fortran, SNGL can also be specified as a generic function. The generic SNGL includes specific function REAL, which takes a REAL(4) argument and produces a REAL(4) result.
5 VMS, U*X

Compatibility

CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB

See Also: DFLOAT, DREAL, DBLE

Examples

REAL (-4) has the value -4.0.

REAL (Y) has the same kind parameter and value as the real part of complex variable Y.