REAL (number [,kind])

  Class:  Elemental function - Generic

  Converts the argument to a real value.

  +------+---------+----------+------------+-------------+
  | Args | Generic | Specific |  Argument  | Result Type |
  +------+---------+----------+------------+-------------+
  |  1   |  REAL   |  --      | INTEGER*1  | REAL*4      |
  |      |         | FLOATI   | INTEGER*2  | REAL*4      |
  |      |see note1| FLOAT    | INTEGER*4  | REAL*4      |
  |      |         | REAL     | INTEGER*4  | REAL*4      |
  |      |         | FLOATK   | INTEGER*8  | REAL*4      |
  |      |         |  --      | REAL*4     | REAL*4      |
  |      |see note2| SNGL     | REAL*8     | REAL*4      |
  |      |         | SNGLQ    | REAL*16    | REAL*4      |
  |      |         |  --      | COMPLEX*8  | REAL*4      |
  |      |         |  --      | COMPLEX*16 | REAL*4      |
  +------+---------+----------+------------+-------------+

  Note1: Or FLOATJ. For compatibility with older versions of
         Fortran, FLOAT can also be specified as a generic
         function.
  Note2: 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.

  These functions cannot be passed as actual arguments.

  REAL is also a specific name for a function that returns the real
  part of a complex number.  The argument must be a COMPLEX*8 data
  type.  The result is a REAL*4 data type.

  The setting of compiler options specifying real size can affect
  FLOAT, REAL, and SNGL.