modif pascal