| 7 | 1/1 | 返回列表 |
| 查看: 1255 | 回復(fù): 6 | ||||
| 當(dāng)前主題已經(jīng)存檔。 | ||||
ymyang008捐助貴賓 (小有名氣)
|
[交流]
【求助】linux集群,如何自編FORTRAN 程序?qū)崿F(xiàn)并行
|
|||
|
在fortran 程序中如何編程實(shí)現(xiàn)并行運(yùn)算 [ Last edited by zzgyb on 2008-5-7 at 00:01 ] |
第一性原理 |
金蟲 (正式寫手)
木蟲 (知名作家)

版主 (著名寫手)
木蟲 (正式寫手)
小木蟲風(fēng)雅協(xié)會(huì)代理秘書長(zhǎng)

木蟲 (初入文壇)
|
要實(shí)現(xiàn)并行計(jì)算,需要安裝并行工具的,如 MPICH, HP-MPI 等,他們都是MPI的具體實(shí)現(xiàn),關(guān)于什么是MPI,及MPICH 請(qǐng)自己百度一下吧。 MPICH是免費(fèi)的,可以到官方下載http://www.mcs.anl.gov/research/projects/mpich2/ ,現(xiàn)在已經(jīng)發(fā)展到MPICH2了,在MPICH2中實(shí)現(xiàn)了對(duì) C/C++,fortran77,fortran90的支持。 怎么在linux和windows下安裝MPICH,以及如何配置你的編譯器的并行環(huán)境,百度里多的是,我的博客里也有,寫的都很詳細(xì)了。 下面就是一個(gè)最簡(jiǎn)單的 helloworld 并行程序,fortran77版本的 ================================================== program main include 'mpif.h' implicit none integer i,ierr,rc,namelen,num,l,m character(MPI_MAX_PROCESSOR_NAME) name call MPI_INIT(ierr) call MPI_COMM_RANK(MPI_COMM_WORLD,i,ierr) call MPI_COMM_SIZE(MPI_COMM_WORLD,num,ierr) call MPI_GET_PROCESSOR_NAME(name,namelen,ierr) write(*,"('hello world ! processor',I2,' of ',I1,' on ',20A)" i,num,namecall MPI_FINALIZE(rc) end program main ================================================== 編譯連接后,用命令行執(zhí)行: mpirun -np 6 ./a.out 這樣就啟動(dòng)了6個(gè)進(jìn)程執(zhí)行你的程序。至于在集群環(huán)境下,一般要寫一個(gè)mpd.hosts文件,里面寫上要起動(dòng)的節(jié)點(diǎn),然后最好在主節(jié)點(diǎn)上提交任務(wù)。 就寫這么多吧,樓主發(fā)帖已經(jīng)一月有余,不知樓主還能否看到我的回復(fù)了,呵呵 [ Last edited by wudai on 2008-6-22 at 10:55 ] |
金蟲 (正式寫手)
| 7 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 一志愿華中科技大學(xué),080502,354分求調(diào)劑 +3 | 守候夕陽(yáng)CF 2026-03-18 | 3/150 |
|
|---|---|---|---|---|
|
[考研] 能源材料化學(xué)課題組招收碩士研究生8-10名 +4 | 脫穎而出 2026-03-16 | 9/450 |
|
|
[考研]
|
胡辣湯放糖 2026-03-15 | 6/300 |
|
|
[考研] 085600材料與化工求調(diào)劑 +5 | 緒幸與子 2026-03-17 | 5/250 |
|
|
[考研] 一志愿,福州大學(xué)材料專碩339分求調(diào)劑 +3 | 木子momo青爭(zhēng) 2026-03-15 | 3/150 |
|
|
[考研] 機(jī)械專碩325,尋找調(diào)劑院校 +3 | y9999 2026-03-15 | 5/250 |
|
|
[考研] 0703化學(xué)調(diào)劑,求各位老師收留 +8 | 秋有木北 2026-03-14 | 8/400 |
|
|
[考研] 求老師收留調(diào)劑 +4 | jiang姜66 2026-03-14 | 5/250 |
|
|
[考研] 070305求調(diào)劑 +3 | mlpqaz03 2026-03-14 | 4/200 |
|
|
[考研] 294求調(diào)劑 +3 | Zys010410@ 2026-03-13 | 4/200 |
|
|
[考研] 中科大材料與化工319求調(diào)劑 +3 | 孟鑫材料 2026-03-14 | 3/150 |
|
|
[考研] 中科大材料專碩319求調(diào)劑 +3 | 孟鑫材料 2026-03-13 | 3/150 |
|
|
[考研] 復(fù)試調(diào)劑 +3 | 呼呼?~+123456 2026-03-14 | 3/150 |
|
|
[考研] 復(fù)試調(diào)劑 +4 | z1z2z3879 2026-03-14 | 5/250 |
|
|
[考研] 材料與化工(0856)304求B區(qū)調(diào)劑 +6 | 邱gl 2026-03-12 | 7/350 |
|
|
[考研] 求調(diào)劑 +7 | 18880831720 2026-03-11 | 7/350 |
|
|
[考研] 考研調(diào)劑 +4 | 芬達(dá)46 2026-03-12 | 4/200 |
|
|
[考研] 工科278分求調(diào)劑 +5 | 周慢熱啊 2026-03-12 | 7/350 |
|
|
[考研] 328化工專碩求調(diào)劑 +4 | 。,。,。,。i 2026-03-12 | 4/200 |
|
|
[考研] 283求調(diào)劑,材料、化工皆可 +8 | 蘇打水7777 2026-03-11 | 10/500 |
|