Module Event.Gesture

Gestures (e.g. pinch-to-zoom on a touchpad).

type ty = [
  1. | `Gesture_swipe_begin of [ `Gesture_swipe_begin ] t
  2. | `Gesture_swipe_update of [ `Gesture_swipe_update ] t
  3. | `Gesture_swipe_end of [ `Gesture_swipe_end ] t
  4. | `Gesture_pinch_begin of [ `Gesture_pinch_begin ] t
  5. | `Gesture_pinch_update of [ `Gesture_pinch_update ] t
  6. | `Gesture_pinch_end of [ `Gesture_pinch_end ] t
  7. | `Gesture_hold_begin of [ `Gesture_hold_begin ] t
  8. | `Gesture_hold_end of [ `Gesture_hold_end ] t
]
type any = [
  1. | `Gesture_swipe_begin
  2. | `Gesture_swipe_update
  3. | `Gesture_swipe_end
  4. | `Gesture_pinch_begin
  5. | `Gesture_pinch_update
  6. | `Gesture_pinch_end
  7. | `Gesture_hold_begin
  8. | `Gesture_hold_end
]
val get_time : [< any ] t -> Timestamp.t
val get_finger_count : [< any ] t -> int
val get_cancelled : [< `Gesture_swipe_end | `Gesture_pinch_end ] t -> bool
val get_dx : [< `Gesture_swipe_update | `Gesture_pinch_update ] t -> float
val get_dy : [< `Gesture_swipe_update | `Gesture_pinch_update ] t -> float
val get_dx_unaccelerated : [< `Gesture_swipe_update | `Gesture_pinch_update ] t -> float
val get_dy_unaccelerated : [< `Gesture_swipe_update | `Gesture_pinch_update ] t -> float
val get_scale : [< `Gesture_pinch_begin | `Gesture_pinch_update | `Gesture_pinch_end ] t -> float
val get_angle_delta : [ `Gesture_pinch_update ] t -> float