Clean main.ml