`sig
type t
val create :
Rtypes.uint4 ->
Rtypes.uint4 ->
Xdr.xdr_type_system ->
(string * (Rtypes.uint4 * Xdr.xdr_type_term * Xdr.xdr_type_term)) list ->
Rpc_program.t
val update :
?program_number:Rtypes.uint4 ->
?version_number:Rtypes.uint4 -> Rpc_program.t -> Rpc_program.t
val program_number : Rpc_program.t -> Rtypes.uint4
val version_number : Rpc_program.t -> Rtypes.uint4
val signature :
Rpc_program.t -> string -> Rtypes.uint4 * Xdr.xdr_type * Xdr.xdr_type
val procedure_number : Rpc_program.t -> string -> Rtypes.uint4
end`