·阻塞式标准消息接收函数 MPI_Recv (buf,count,datatype,dest,tag,comm,status,ierr) Real*8(integer,)buf:消息接收缓存区起始地址 (Fortran,用户用于接受的第一个数据) integer count ：buf起始的数据单元个数 integer datatype :数据类型（基本或用户定义的） integer dest ：发送进程序号 integer tag :消息的标号 integer comm :通信器 integer status(MPI_STATUS_SIZE):接收状态数组： integer ierr :函数调用返回错误码 real*8a(100,100) integer b(60,60) c--从2号进程接收50个双精度数到“a(5,20):a(54,20)” call MPI Recv(a(5,20),50,MPI DOUBLE PRECISION,2, & 99999,MPI COMM WORLD,status,ierr c--从5号进程接收20个整型数到“b(20,40):b(39,40) call MPI Recv(b(20.40).20.MPI DOUBLE PRECISION.5. & 99999,MPI COMM_WORLD,status,ierr ·其他点对点通信函数：参考手册： 21 21 ⚫ 阻塞式标准消息接收函数 MPI_Recv（buf，count，datatype，dest，tag，comm，status, ierr） Real*8（integer，…）buf : 消息接收缓存区起始地址 (Fortran, 用户用于接受的第一个数据) integer count ：buf 起始的数据单元个数 integer datatype ：数据类型（基本或用户定义的） integer dest : 发送进程序号 integer tag : 消息的标号 integer comm : 通信器 integer status(MPI_STATUS_SIZE): 接收状态数组; integer ierr : 函数调用返回错误码 real *8 a(100,100) integer b(60,60) c-----从 2 号进程接收 50 个双精度数到“a(5,20) : a(54,20)” call MPI_Recv( a (5,20),50,MPI_DOUBLE_PRECISION,2, & 99999,MPI_COMM_WORLD,status,ierr ) c-----从 5 号进程接收 20 个整型数到“b(20,40) : b(39,40)” call MPI_Recv( b (20,40),20,MPI_DOUBLE_PRECISION,5, & 99999,MPI_COMM_WORLD,status,ierr ) ⚫ 其他点对点通信函数：参考手册；