int à chaîner caml
let number = 1 ;;
let number_str = string_of_int ( numbber ) ;;
Yasha
let number = 1 ;;
let number_str = string_of_int ( numbber ) ;;