REAL

 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.