6 lines
91 B
Text
6 lines
91 B
Text
open Graphics
|
|
|
|
let () =
|
|
open_graph " 800x600";
|
|
let _ = read_line() in
|
|
close_graph ()
|