Replaced Predefined with Pascal version