Some changes and functions added in pascal