type t = private { x: int ; y : int ; z : int ; tot : int }
val of_int_tuple : int * int * int -> t
val to_int_tuple : t -> int * int * int 
val get  : Coordinate.axis -> t -> int
val incr : Coordinate.axis -> t -> t 
val decr : Coordinate.axis -> t -> t