Implement pascal