Random.self_init () ;;

let ptr = open_out "answer.txt" in
Printf.fprintf ptr "%d %d" (Random.int 360) (60 + Random.int 40);

close_out ptr