sig
  type ('a, 'b) t
  val create : 'a -> 'b -> ('a, 'b) Space_safe_tuple.T2.t
  external get1 : ('a, 'b) Space_safe_tuple.T2.t -> 'a = "%field0"
  external get2 : ('b, 'a) Space_safe_tuple.T2.t -> 'a = "%field1"
end