let lp=ref [];;

let definies=ref [];;
let a_definir=ref [];;