(* Roman numerals exercise *) (** Convert an integer value to its Roman Numeral representation up to 3000 inclusive *) val to_roman : int -> string