main.ml: List Printf