let get_pos_of_precise i =
    let j = i/3 in
    let c = i-3*j in
    let (x,y,z) = pos.(j) in
      match c with
        | 0 -> x
        | 1 -> y
        | 2 -> z
        | _ -> failwith "get_pos_of_precise"