modify REAL_TYPE -> PL_REAL.