| 查看: 1395 | 回复: 6 | ||||
| 当前主题已经存档。 | ||||
ymyang008捐助贵宾 (小有名气)
|
[交流]
【求助】linux集群，如何自编FORTRAN 程序实现并行
|
|||
|
在fortran 程序中如何编程实现并行运算 [ Last edited by zzgyb on 2008-5-7 at 00:01 ] |
回复此楼» 收录本帖的淘帖专辑推荐
 第一性原理 |
» 猜你喜欢
【修正版】单环用磁约束低速电子实验方案（简化版）
已经有0人回复
-
桂林理工大学物理学专业招收调剂，还有三个名额！！！
已经有22人回复
-
物理学I论文润色/翻译怎么收费?
已经有293人回复
-
考博自荐
已经有4人回复
-
山东大学第二批博士研究生招生
已经有0人回复
-
中国科学院东莞材料科学与技术研究所-2026年博士招生-吴昊研究员-磁学与自旋电子学
已经有0人回复
-
《电磁学》教材推荐
已经有1人回复
-
【急招】合肥工大核聚变材料计算方向2026级工程博士生
已经有4人回复
-
大豆异黄酮分离
已经有0人回复
-
湖南大学材料学院急招2026年博士生，临时增加一名博士联培指标
已经有10人回复
-
天津理工大学晶体材料全国重点实验室刘红军教授课题组招收博士生1-2名
已经有1人回复
小欢
金虫 (正式写手)
- 应助: 1 (幼儿园)
- 金币: 1062.9
- 散金: 2060
- 红花: 8
- 帖子: 497
- 在线: 391.5小时
- 虫号: 301247
- 注册: 2006-11-26
- 专业: 有机分子功能材料化学
2楼2008-05-09 20:46:14
wxjbuilder
木虫 (知名作家)
- 计算强帖: 4
- 应助: 1 (幼儿园)
- 贵宾: 0.05
- 金币: 2986.4
- 散金: 1761
- 红花: 2
- 沙发: 1
- 帖子: 5392
- 在线: 273.2小时
- 虫号: 442356
- 注册: 2007-10-27
- 性别: GG
- 专业: 理论和计算化学
3楼2008-05-09 21:03:33
abinitio
版主 (著名写手)
- 应助: 221 (大学生)
- 贵宾: 0.093
- 金币: 7365.2
- 散金: 3917
- 红花: 57
- 帖子: 1317
- 在线: 485.2小时
- 虫号: 368545
- 注册: 2007-05-11
- 性别: GG
- 专业: 凝聚态物性I:结构、力学和
- 管辖: 分子模拟
4楼2008-05-09 21:40:49
jove1782
木虫 (正式写手)
小木虫风雅协会代理秘书长
- 应助: 3 (幼儿园)
- 贵宾: 0.006
- 金币: 5540.8
- 散金: 27
- 红花: 3
- 帖子: 982
- 在线: 134.9小时
- 虫号: 570051
- 注册: 2008-06-06
- 性别: GG
- 专业: 电化学
5楼2008-06-21 21:51:56
wudai
木虫 (初入文坛)
- 应助: 0 (幼儿园)
- 金币: 2245.8
- 散金: 250
- 红花: 1
- 帖子: 44
- 在线: 231.6小时
- 虫号: 344845
- 注册: 2007-04-14
- 性别: GG
- 专业: 凝聚态物理
★ ★ ★ ★
spur(金币+4,VIP+0):many thanks!
lei0736(金币+0,VIP+0):十大“耐思”版主评选欢迎参与投票 http://emuch.net/bbs/viewthread.php?tid=845527&fpage=1
spur(金币+4,VIP+0):many thanks!
lei0736(金币+0,VIP+0):十大“耐思”版主评选欢迎参与投票 http://emuch.net/bbs/viewthread.php?tid=845527&fpage=1
|
要实现并行计算，需要安装并行工具的，如 MPICH， HP-MPI 等，他们都是MPI的具体实现，关于什么是MPI，及MPICH 请自己百度一下吧。 MPICH是免费的，可以到官方下载http://www.mcs.anl.gov/research/projects/mpich2/ ，现在已经发展到MPICH2了，在MPICH2中实现了对 C/C++,fortran77,fortran90的支持。 怎么在linux和windows下安装MPICH，以及如何配置你的编译器的并行环境，百度里多的是，我的博客里也有，写的都很详细了。 下面就是一个最简单的 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 ================================================== 编译连接后，用命令行执行： mpirun -np 6 ./a.out 这样就启动了6个进程执行你的程序。至于在集群环境下，一般要写一个mpd.hosts文件，里面写上要起动的节点，然后最好在主节点上提交任务。 就写这么多吧，楼主发帖已经一月有余，不知楼主还能否看到我的回复了，呵呵 [ Last edited by wudai on 2008-6-22 at 10:55 ] |
6楼2008-06-22 10:50:16
madonion
金虫 (正式写手)
- 应助: 0 (幼儿园)
- 金币: 589.4
- 帖子: 307
- 在线: 26.3小时
- 虫号: 251164
- 注册: 2006-05-14
- 性别: GG
- 专业: 化学反应工程
7楼2008-06-22 16:12:09
5