sig
  val cast : 'a Gobject.obj -> Gtk.gamma_curve Gtk.obj
  val create : Gtk.gamma_curve Gobject.param list -> Gtk.gamma_curve Gtk.obj
  external get_gamma : [> `gammacurve ] Gtk.obj -> float
    = "ml_gtk_gamma_curve_get_gamma"
end