sig   type button =       Button1     | Button2     | Button3     | Button4     | Button5     | Button6     | Button7     | Button8     | Button9   type t = {     control : bool;     meta : bool;     shift : bool;     button : LTerm_mouse.button;     row : int;     col : int;   }   val compare : LTerm_mouse.t -> LTerm_mouse.t -> int   val control : LTerm_mouse.t -> bool   val meta : LTerm_mouse.t -> bool   val button : LTerm_mouse.t -> LTerm_mouse.button   val row : LTerm_mouse.t -> int   val col : LTerm_mouse.t -> int   val to_string : LTerm_mouse.t -> string end