Programme en caml

bonjour
je cherche à programmer un algorithme permettant de visualiser les courbes de Bézier en caml
seulement je n'arrive pas à modifier le tableau dans les boucles
voici mon programme, j'aimerais savoir pourquoi il ne fonctionne pas:
let remplirpremièrecolonne v= let n=vect_length v in

let p=vect_length (v.(1)) in

let u=make_vect p 0 in


let m=make_matrix n n u in


for k=0 to (n-1) do

let n=vect_length v in


let m=(remplirpremièrecolonne v) in

let p=vect_length (v.(0)) in


for k=0 to (p-1) do


for c=1 to (n-1) do


for l=0 to (n-c-1) do


m.(c).(l).(k) <- (t*(m.(c-1).(l).(k))+(1-t)*(m.(c-1).(l+1).(k)))


done;


done;


done;


m;;

m.(0).(k) <- v.(k)


done;


m;;

merci