24小时热门版块排行榜    

Znn3bq.jpeg
汕头大学海洋科学接受调剂
查看: 2164  |  回复: 6
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

spursspurs

新虫 (小有名气)

[求助] abaqus调用fortran时,让fortran并行运算 已有1人参与

各位专家帮忙啊,在使用abaqus调用intel fortran时,怎样才能让fortran程序openmp模块调用实现程序的并行?程序中已加入了openmp语句!!!
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

fish.yfyh

铜虫 (小有名气)

引用回帖:
3楼: Originally posted by spursspurs at 2013-12-29 08:38:58
非常感谢你的回答!我是用abaqus调用程序,也就是说直接调用子程序.for文件,fortran没有编译,所以不知怎么开启OPENMP啊?,代码里已经有并行语句了,求指导...

在源代码部分的循环部分用:
!$omp parallel
!$omp do
....
!$omp end do
!$omp end parallel

然后在外面编译的时候, 加上-openmp的选项即可.

» 本帖已获得的红花(最新10朵)

5楼2013-12-29 17:19:08
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 7 个回答

fish.yfyh

铜虫 (小有名气)

【答案】应助回帖

★ ★
感谢参与,应助指数 +1
spursspurs: 金币+2 2013-12-29 08:39:17
OpenMP很简单,用Intel Fortran的话,在编译选项中添加-openmp.
然后在代码里面通过set_omp_num_threads(nprocs)指定并行的线程数即可。
2楼2013-12-28 20:20:53
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

spursspurs

新虫 (小有名气)

引用回帖:
2楼: Originally posted by fish.yfyh at 2013-12-28 20:20:53
OpenMP很简单,用Intel Fortran的话,在编译选项中添加-openmp.
然后在代码里面通过set_omp_num_threads(nprocs)指定并行的线程数即可。

非常感谢你的回答!我是用abaqus调用程序,也就是说直接调用子程序.for文件,fortran没有编译,所以不知怎么开启OPENMP啊?,代码里已经有并行语句了,求指导
3楼2013-12-29 08:38:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

spursspurs

新虫 (小有名气)

引用回帖:
2楼: Originally posted by fish.yfyh at 2013-12-28 20:20:53
OpenMP很简单,用Intel Fortran的话,在编译选项中添加-openmp.
然后在代码里面通过set_omp_num_threads(nprocs)指定并行的线程数即可。

我感觉是不是在fortran或者abaqus的什么文件中设置下呢?可是不知道怎么弄?
4楼2013-12-29 08:41:53
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 求调剂 +15 雪逢冬 2026-04-10 15/750 2026-04-14 08:47 by 木木mumu~
[考研] 调剂 +11 月@163.com 2026-04-11 11/550 2026-04-13 22:52 by pies112
[考研] 一志愿2110,化学学硕310分,本科重点双非求调剂 +20 努力奋斗112 2026-04-08 20/1000 2026-04-13 14:24 by 张zhihao
[考研] 266调剂 +10 daya sun 2026-04-07 11/550 2026-04-13 10:12 by fenglj492
[考研] 277 数一104,学硕,求调剂 +21 瓶子PZ 2026-04-09 23/1150 2026-04-11 23:12 by labixiaoqiao
[考研] 331求调剂 +5 王国帅 2026-04-11 5/250 2026-04-11 22:56 by 溪涧流水
[考研] 343求调剂 +9 王国帅 2026-04-10 9/450 2026-04-11 20:31 by dongdian1
[考研] 求调剂 +6 电气300求调剂不 2026-04-08 6/300 2026-04-11 20:14 by 逆水乘风
[考研] 11408。358求调剂 +3 TMYzds 2026-04-07 3/150 2026-04-11 17:10 by 氮气气气
[考研] 283求调剂,工科! +12 苏打水7777 2026-04-08 12/600 2026-04-11 10:28 by 逆水乘风
[考研] 282,求调剂 +12 jggshjkkm 2026-04-09 14/700 2026-04-11 09:39 by 猪会飞
[考研] 调剂 +12 卷卷卷心菜_ 2026-04-09 13/650 2026-04-10 22:36 by Ftglcn90
[考研] 调剂 +19 小张ZA 2026-04-10 20/1000 2026-04-10 22:08 by 猪会飞
[考研] 263能源动力专硕求调剂 +4 加大号饭盒袋 2026-04-10 4/200 2026-04-10 20:52 by gong120082
[考研] 265求调剂 +12 风说她早忘了 2026-04-10 13/650 2026-04-10 18:56 by chemisry
[考研] 296求调剂 +6 汪!?! 2026-04-08 6/300 2026-04-10 11:02 by mattzhming
[考研] 已调剂 +18 柴郡猫_ 2026-04-09 19/950 2026-04-09 22:10 by 柴郡猫_
[考研] 调剂 +19 2261744733 2026-04-08 19/950 2026-04-09 19:11 by vgtyfty
[考研] 263分B区求调剂 +6 李nihao 2026-04-08 6/300 2026-04-08 09:38 by 南开小綦
[考研] 316求调剂 +4 15318418673 2026-04-07 4/200 2026-04-07 22:12 by hemengdong
信息提示
请填处理意见