Next: RENAME, Previous: RANK, Up: Intrinsic Procedures

### 8.204 `REAL` — Convert to real type

Description:
  `REAL(A [, KIND])` converts its argument A to a real type. The `REALPART` function is provided for compatibility with `g77`, and its use is strongly discouraged.
Standard:
  Fortran 77 and later
Class:
  Elemental function
Syntax:

  `RESULT = REAL(A [, KIND])`
  `RESULT = REALPART(Z)`

Arguments:

  A | Shall be `INTEGER`, `REAL`, or `COMPLEX`.
  KIND | (Optional) An `INTEGER` initialization expression indicating the kind parameter of the result.

Return value:
  These functions return a `REAL` variable or array under the following rules:
  (A)
    `REAL(A)` is converted to a default real type if A is an integer or real variable.
  (B)
    `REAL(A)` is converted to a real type with the kind type parameter of A if A is a complex variable.
  (C)
    `REAL(A, KIND)` is converted to a real type with kind type parameter KIND if A is a complex, integer, or real variable.
Example:

                program test_real
                  complex :: x = (1.0, 2.0)
                  print *, real(x), real(x,8), realpart(x)
                end program test_real

Specific names:

  Name | Argument | Return type | Standard
  `FLOAT(A)` | `INTEGER(4)` | `REAL(4)` | Fortran 77 and later
  `DFLOAT(A)` | `INTEGER(4)` | `REAL(8)` | GNU extension
  `SNGL(A)` | `INTEGER(8)` | `REAL(4)` | Fortran 77 and later

See also:
  DBLE