let fbij_jolie_quatorze ~(c : int) (i:Resolution.couleur) = match i with
        | 1 -> Graphics.red;
        | 2 -> Graphics.green;
        | 3 -> Graphics.yellow;
        | 4 -> Graphics.blue;
        | 0  -> Graphics.black; (* Pour dessiner les lignes *)
        | -1 -> Graphics.white; (* Pour le fond *)
        | 5 -> Graphics.magenta;
        | 6 -> Graphics.cyan;
        | 7 -> rose;
        | 8 -> mandarine;
        | 9 -> orange;
        | 10 -> jaunefaible;
        | 11 -> saumon;
        | 12 -> violet;
        | 13 -> indigo;
        | 14 -> vertjaune