sig
  type t =
      (PrintSlice.PrintProject.node * PrintSlice.PrintProject.node) *
      Cil_types.stmt option
  val src : ('a * 'b) * '-> 'a
  val dst : ('a * 'b) * '-> 'b
end