ERROR - A reference to the REAL function contains an invalid data type
  keyword, for example, A = REAL(A, LONG).  Change the invalid data type
  keyword.  The REAL  function  returns  only  SINGLE,  DOUBLE,  GFLOAT,
  SFLOAT, TFLOAT, or XFLOAT values.