Version_i : sig ... end
val rpc : (Version_i.query, Version_i.response, Version_i.error) Rpc.Pipe_rpc.t