sig val create : x:int -> y:int -> Tsdl.Sdl.point val x : Tsdl.Sdl.point -> int val y : Tsdl.Sdl.point -> int val set_x : Tsdl.Sdl.point -> int -> unit val set_y : Tsdl.Sdl.point -> int -> unit end