A is of type INTEGER, REAL or COMPLEX.
If A is of type INTEGER or REAL, the result is REAL and kind type of the result
is KIND if it is present otherwise it is the default real kind. If A is of type
COMPLEX, the result is REAL and the kind type of the result is KIND otherwise
it is the kind type of A (i.e. A is COMPLEX and the result is REAL with the
same kind type value). |