【正文】 ）基礎上，用戶根據(jù)需求，自己定義的數(shù)據(jù)類型； real a(1000) 發(fā)送 : a(5:9) call MPI_Send(a(5), 5, MPI_ REAL,…..) OK 發(fā)送 : a(5),a(7),a(9),a(11),a(13),a(15) do i=5, 15, 2 call MPI_Send(a(i),1,MPI_REAL,….) OK enddo 缺點: 多次發(fā)送，效率低，程序設計繁瑣 改進： 用戶定義新的數(shù)據(jù)類型 call MPI_Type_vector(5,1,2,MPI_REAL,newtype,ierr) call MPI_Type_mit(newtype , ierr) 提交 call MPI_Send(a(5), 1, newtype,….) call MPI_Type_free(newtype,ierr) 釋放l 在用戶已定義好的數(shù)據(jù)類型基礎上，還可以進一步定義新的數(shù)據(jù)類型；l 用戶定義的數(shù)據(jù)類型，必須由函數(shù)MPI_Type_Commit()提交給MPI系統(tǒng)；此后，就可以象基本數(shù)據(jù)類型一樣，在消息傳遞函數(shù)中重復使用；并由函數(shù)MPI_Type_free()釋放；l 具體自定義數(shù)據(jù)類型函數(shù)，請參考手冊；2．進程拓撲結構l 定義：根據(jù)應用程序的特征，在進程間建立的一種虛擬拓撲連接方式，以方便并行程序設計和提高并行計算性能；l 例：二維規(guī)則區(qū)域，3*3 區(qū)域分解，9個進程，建立Cartesion坐標，進程（i,j）的相鄰進程為 (i1,j), (i+1,j), (i,j1), (i,j+1)；2（0,2）1（0,1）0（0,0）2105（1,2）4（1,1）3（1,0）4358762（2,2）0（2,0）1（2,1）3．并行I/Ol 各進程可以類似于串行程序獨立地讀/寫不同的文件；l MPICH ；七、MPI并行程序示例21． 一維Dirichlet問題： D u (x) = f(x) x 206。 并行前綴計算：MPI_Scan()五、作業(yè)一 P個進程，第i個進程將其包含100個雙精度數(shù)據(jù)的數(shù)組A（100）傳送給第（i +1）mod P個進程，同時從第（i 1）mod P個進程接受100個雙精度數(shù)據(jù)到另一個數(shù)組B（100）中，令數(shù)組C（1：100）=A（1：100）+B（1：100），然后求數(shù)組C（1：100）各元素的類加和，最后在將該和全部累加到0號進程，打印并輸出該和。170。 m,ierr)170。規(guī)約操作類型op : MPI_SUM, MPI_MIN, MPI_MAX, MPI_PROD等12種。 全局規(guī)約(global reduction)函數(shù):170。 全交換: MPI_Alltoall() All 發(fā)送大小一致數(shù)據(jù)塊到各進程 All接受大小一致數(shù)據(jù)塊并按序號連續(xù)存放170。 分散:MPI_Scatter(bufs,bufr,count,dtype,root,m,ierr)root 發(fā)送連續(xù)的大小一致數(shù)據(jù)塊 All 接受170。 索引全收集:MPI_Allgatherv() all 發(fā)送大小不等的數(shù)據(jù)塊 All接受并按索引間斷存放170。 全收集：MPI_Allgather()all 發(fā)送 all接受 170。 廣播: MPI_Bcast(buf,count,dtype,root,m,ierr)root 發(fā)送 other 接受170。 同步通信函數(shù)：所有進程在某個程序點上同步； MPI_Barrier ( m , ierr )216。 99999,MPI_COMM_WORLD,status,ierr )c從5號進程接收20個整型數(shù)到“b(20,40) : b(39,40)”call MPI_Recv( b (20,40),20,MPI_DOUBLE_PRECISION,5, amp。 99999,MPI_COMM_WORLD,ierr )l 阻塞式標準消息接收函數(shù)MPI_Recv（buf，count，datatype，dest，tag，m，status, ierr） Real*8（integer，…）buf : 消息接收緩存區(qū)起始地址 (Fortran, 用戶用于接受的第一個數(shù)據(jù)) integer count ：buf起始的數(shù)據(jù)單元個數(shù) integer datatype ：數(shù)據(jù)類型（基本或用戶定義的） integer dest : 發(fā)送進程序號 integer tag : 消息的標號 integer m : 通信器 integer status(MPI_STATUS_SIZE) : 接收狀態(tài)數(shù)組。l 7. 一般的MPI程序設計流程圖程序參數(shù)說明Call MPI_Init ( ) 進入MPI系統(tǒng),通信器 MPI_COMM_WORLD形成Call MPI_Comm_rank ( )Call MPI_Comm_size ( )建立新的通信器、定義新的數(shù)據(jù)類型和進程拓撲結構應用程序實體：1． 計算控制程序體；2． 進程間通信； 退出MPI系統(tǒng)Call MPI_Finalize ( )End四、初步的MPI消息傳遞函數(shù)1．點對點通信（pointtopoint）l 定義：給定屬于同一通信器內的兩個進程，其中一個發(fā)送消息，一個接收消息；l MPI系統(tǒng)定義的所有通信方式均建立在點對點通信之上；l 四種模式：標準模式、緩存區(qū)模式、同步模式、就緒模式；2．標準模式點對點通信l 進程可以隨意地發(fā)送（接收）消息，與是否存在匹配的消息接收（發(fā)送）進程無關；進程0進程1 發(fā)收匹配： 進程2進程1進程0 發(fā)收不匹配：l 兩類：n 阻塞式：消息發(fā)送函數(shù)返回，用戶可以對消息緩存區(qū)進行處理，不會影響已發(fā)送的消息數(shù)據(jù)；接受函數(shù)返回，用戶可以使用接受到的消息數(shù)據(jù)；n 非阻塞式：發(fā)送和接受函數(shù)返回后，必須調用另一類函數(shù)來確保它們的正確完成； 阻塞式 非阻塞式 INTEGER A INTEGER AA=100 A=100MPI_Send(A,1,….) MPI_Isend(A,1,…)A=200 A=200 消息數(shù)據(jù): A=100 A=100 或 A=200