sig
  type t = Src_pos.Relative.t = { row : int; col : int; }
  val sexp_of_t : t -> Type.t
  val zero : t
  val add : t -> t -> t
  val sub : t -> t -> t
end