let bijection_couleur_color (echelle:(Graphics.color array)) (ma_couleur:Resolution.couleur) =
echelle.(ma_couleur - 1)