使用MPI传递用户定义的变量

Question

如何使用MPI跨处理器发送用户定义类型的变量？

对于预定义的，我使用

call mpi_recv(A,1,mpi_real8,root_process,mpi_any_tag,mpi_comm_world,status,ierr)

但是应该为用户定义的类型做些什么 例如，

integer,parameter::type=selected_int_kind (16)  
integer(kind=type)::i

请提出您的建议/意见。