sig
  type t = [ `MOTION_NOTIFY ] Gdk.event
  val cast : GdkEvent.any -> GdkEvent.Motion.t
  val time : [< GdkEvent.timed ] Gdk.event -> int32
  external x : GdkEvent.Motion.t -> float = "ml_GdkEventMotion_x"
  external y : GdkEvent.Motion.t -> float = "ml_GdkEventMotion_y"
  external axes : GdkEvent.Motion.t -> (float * float) option
    = "ml_GdkEventMotion_axes"
  external state : GdkEvent.Motion.t -> int = "ml_GdkEventMotion_state"
  external is_hint : GdkEvent.Motion.t -> bool = "ml_GdkEventMotion_is_hint"
  external device : GdkEvent.Motion.t -> Gdk.device
    = "ml_GdkEventMotion_device"
  external x_root : GdkEvent.Motion.t -> float = "ml_GdkEventMotion_x_root"
  external y_root : GdkEvent.Motion.t -> float = "ml_GdkEventMotion_y_root"
end