Ajoute la fonction pr
Améliore légèrement la fonction pr