let
window =
GWindow
.window
~width: 600
~height: 600
~title:
"ocamlcvs"
()