@Guesset
J'ai appliqué les modifications que tu as proposées (sauf pour la notation des couleurs, qui demande encore réflexion).
Soit dit en passant, j'ai vu que tu avais remplacé
if vValue > result then result := vValue;
par
result := Max(vValue, result);
Je me suis demandé si c'était une question de brièveté d'écriture ou s'il y avait aussi une différence d'efficacité.
Maintenant je vais essayer d'augmenter un peu la profondeur pour voir si ça fonctionne et si le programme est un peu plus fort.
Partager