`sig
external new_canvas : unit -> GnomeCanvas.canvas Gobject.obj
= "ml_gnome_canvas_new"
external new_canvas_aa : unit -> GnomeCanvas.canvas Gobject.obj
= "ml_gnome_canvas_new_aa"
external root :
[> GnomeCanvas.canvas ] Gobject.obj -> GnomeCanvas.group Gobject.obj
= "ml_gnome_canvas_root"
external set_scroll_region :
[> GnomeCanvas.canvas ] Gobject.obj ->
x1:float -> y1:float -> x2:float -> y2:float -> unit
= "ml_gnome_canvas_set_scroll_region"
external get_scroll_region :
[> GnomeCanvas.canvas ] Gobject.obj -> float array
= "ml_gnome_canvas_get_scroll_region"
external set_center_scroll_region :
[> GnomeCanvas.canvas ] Gobject.obj -> bool -> unit
= "ml_gnome_canvas_set_center_scroll_region"
external get_center_scroll_region :
[> GnomeCanvas.canvas ] Gobject.obj -> bool
= "ml_gnome_canvas_get_center_scroll_region"
external set_pixels_per_unit :
[> GnomeCanvas.canvas ] Gobject.obj -> float -> unit
= "ml_gnome_canvas_set_pixels_per_unit"
external scroll_to :
[> GnomeCanvas.canvas ] Gobject.obj -> x:int -> y:int -> unit
= "ml_gnome_canvas_scroll_to"
external get_scroll_offsets :
[> GnomeCanvas.canvas ] Gobject.obj -> int * int
= "ml_gnome_canvas_get_scroll_offsets"
external update_now : [> GnomeCanvas.canvas ] Gobject.obj -> unit
= "ml_gnome_canvas_update_now"
external get_item_at :
[> GnomeCanvas.canvas ] Gobject.obj ->
x:float -> y:float -> GnomeCanvas.item Gobject.obj
= "ml_gnome_canvas_get_item_at"
external w2c_affine : [> GnomeCanvas.canvas ] Gobject.obj -> float array
= "ml_gnome_canvas_w2c_affine"
external w2c :
[> GnomeCanvas.canvas ] Gobject.obj -> wx:float -> wy:float -> int * int
= "ml_gnome_canvas_w2c"
external w2c_d :
[> GnomeCanvas.canvas ] Gobject.obj ->
wx:float -> wy:float -> float * float = "ml_gnome_canvas_w2c_d"
external c2w :
[> GnomeCanvas.canvas ] Gobject.obj -> cx:int -> cy:int -> float * float
= "ml_gnome_canvas_c2w"
external window_to_world :
[> GnomeCanvas.canvas ] Gobject.obj ->
winx:float -> winy:float -> float * float
= "ml_gnome_canvas_window_to_world"
external world_to_window :
[> GnomeCanvas.canvas ] Gobject.obj ->
wox:float -> woy:float -> float * float
= "ml_gnome_canvas_world_to_window"
end`