type t = {
    mutable x : int ;
    mutable y : int ;
}

let zero = { 
    x = 0 ;
    y = 0 ;
}