[, SINGLE ]
                          [, DOUBLE ]
      real-var = REAL(exp [, GFLOAT ] )
                          [, SFLOAT ]
                          [, TFLOAT ]
                          [, XFLOAT ]