Discussion :

[gratuitus]

Bonjour,
j'essaies de transformer une matrice en image à l'aide du module graphics sur caml light, mais cela ne marche pas :

Pour dessiner la matrice:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
let coloriage_matrice M= open_graph "1000x1000";
draw_image (make_image M) ;;

Le programme pour créer une matrice "damier":

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
let damier M = 
let (n,p)=dims M in 
for i=0 to (n-1) do
for j= 0 to (p-1) do
if (i+j) mod 2= 0 
then M.(i).(j)<-white
else M.(i).(j)<-black done done;M ;;