| 查看: 913 | 回复: 10 | ||
ddli123456铁虫 (初入文坛)
|
[求助]
内存泄漏
|
| 有没有哪位编写过并行程序的?额用fortran,调用MKL库不断求解7200*7200矩阵的本征值,可是循环几次,内存就被消耗完了,额没有使用过动态数组,可能是内存泄漏。不知道有木有碰到过类是问题的?有木有知道该怎么解决的?谢谢啦! |
» 猜你喜欢
如何从铁电相到顺电相。
已经有1人回复
各位大佬,求一份最新Wien2k版本作为学习用途
已经有0人回复
物理学I论文润色/翻译怎么收费?
已经有293人回复
南科大活性流体和软物质课题组诚招2027级博士、硕士研究生和博后
已经有42人回复
瑞典林雪平大学博士后招聘|PEC Water Splitting 方向
已经有24人回复
PRB投稿,Acknowledgment sent to author状态十天了
已经有3人回复
PVA溶解
已经有2人回复
基金申请
已经有44人回复
CSC与新西兰维多利亚大学PhD奖学金项目
已经有0人回复
新西兰Robinson研究所 招聘CSC公派访问人员
已经有0人回复
帮我的英语口语老师找学生
已经有0人回复
锐利的碎片
木虫 (正式写手)
star watcher
- 应助: 136 (高中生)
- 金币: 3637.1
- 散金: 252
- 红花: 22
- 帖子: 988
- 在线: 1224.9小时
- 虫号: 961933
- 注册: 2010-03-05
- 专业: 凝聚态物性 II :电子结构
2楼2012-02-11 17:26:20
锐利的碎片
木虫 (正式写手)
star watcher
- 应助: 136 (高中生)
- 金币: 3637.1
- 散金: 252
- 红花: 22
- 帖子: 988
- 在线: 1224.9小时
- 虫号: 961933
- 注册: 2010-03-05
- 专业: 凝聚态物性 II :电子结构
3楼2012-02-11 17:27:32
ddli123456
铁虫 (初入文坛)
- 应助: 0 (幼儿园)
- 金币: 20.5
- 帖子: 16
- 在线: 14.5小时
- 虫号: 1461652
- 注册: 2011-10-26
- 专业: 凝聚态物性 II :电子结构
4楼2012-02-11 18:25:13
锐利的碎片
木虫 (正式写手)
star watcher
- 应助: 136 (高中生)
- 金币: 3637.1
- 散金: 252
- 红花: 22
- 帖子: 988
- 在线: 1224.9小时
- 虫号: 961933
- 注册: 2010-03-05
- 专业: 凝聚态物性 II :电子结构
5楼2012-02-11 18:37:16
ddli123456
铁虫 (初入文坛)
- 应助: 0 (幼儿园)
- 金币: 20.5
- 帖子: 16
- 在线: 14.5小时
- 虫号: 1461652
- 注册: 2011-10-26
- 专业: 凝聚态物性 II :电子结构
6楼2012-02-11 18:42:49
锐利的碎片
木虫 (正式写手)
star watcher
- 应助: 136 (高中生)
- 金币: 3637.1
- 散金: 252
- 红花: 22
- 帖子: 988
- 在线: 1224.9小时
- 虫号: 961933
- 注册: 2010-03-05
- 专业: 凝聚态物性 II :电子结构
7楼2012-02-11 18:44:39
ddli123456
铁虫 (初入文坛)
- 应助: 0 (幼儿园)
- 金币: 20.5
- 帖子: 16
- 在线: 14.5小时
- 虫号: 1461652
- 注册: 2011-10-26
- 专业: 凝聚态物性 II :电子结构
|
代码有一千多行,下面是求解本征值的部分: call BLACS_BARRIER(0,'All') call DESCINIT(DESCA,N,N,NB_,NB_,0,0,CONTEXT,LDA,INFO) call DESCINIT(DESCZ,N,N,NB_,NB_,0,0,CONTEXT,LDA,INFO) call PDLACP3(N,1,hmatr,DESCA,vect,N,0,0,1) print*,'After first PDLACP3' call PDSYEVD('V','U',N,hmatr,1,1,DESCA,eigen,BB,1,1, $ DESCZ,WORK,LWORK,IWORK,LIWORK,INFO) print*,'After PDSYEVD','INFO',INFO call BLACS_BARRIER(0,'All') print*,'BB',size(BB,1),size(BB,2) print*,'vect',size(vect,1),size(vect,2) !---- call PDLACP3(N,1,BB,DESCZ,vect,N,-1,-1,0) !---- print*,'After second PDLACP3' 程序就是在---- 和 ---- 之间出错的,当时是内存用完了,后的PDLACP3没有执行就卡死了 |
8楼2012-02-11 19:07:17
锐利的碎片
木虫 (正式写手)
star watcher
- 应助: 136 (高中生)
- 金币: 3637.1
- 散金: 252
- 红花: 22
- 帖子: 988
- 在线: 1224.9小时
- 虫号: 961933
- 注册: 2010-03-05
- 专业: 凝聚态物性 II :电子结构
9楼2012-02-11 19:29:46
ddli123456
铁虫 (初入文坛)
- 应助: 0 (幼儿园)
- 金币: 20.5
- 帖子: 16
- 在线: 14.5小时
- 虫号: 1461652
- 注册: 2011-10-26
- 专业: 凝聚态物性 II :电子结构
10楼2012-02-11 21:31:49










回复此楼