24小时热门版块排行榜    

查看: 1952  |  回复: 11

csyky2007

木虫 (正式写手)

[交流] 【求助】用fortran求解大型线性方程组时出现的错误【已解决】已有6人参与

我用fortran进行有限元分析,其中要涉及求解F=KU这个线性方程组。其中K为100万阶稀疏对称正定矩阵,所以我用IMSL函数库中的LSLXD进行求解。当程序进行到LSLXD函数时就出现图中所示的错误。我用这个程序实验了一个7000阶的系数矩阵时就没有问题,所以说程序应该没有错。

按照图中的提示,其中提到workspace不足,我试着将stack按本站中的帖子调到了最大0xffffffff,基本没有作用。
后我又指定itwksp=2000000000,可系统提示说:the required storage cannot be allocated. the workspace is based on n=1000000(矩阵的阶数) and nz(下三角矩阵中非零元素的个数)
图中的提示说是L2FXD出错,这个函数在IMSL帮助里有说明,就是利用矩阵的阶数和非零元素的个数精确指定worksapce。这个函数没有提供例子,我还真不会使用,其中有几个参数我实在搞不懂怎么定义。
最后值得一提是,当我用7000阶矩阵计算时,最后的命令提示我应该设置itwksp=13636849(具体数值),而这次给的是itwksp=********,好无奈的。
见这个论坛上牛人蛮多的,我真希望你们能帮我解决这个困扰我一个多月的问题!



[ Last edited by csyky2007 on 2010-7-5 at 22:32 ]
回复此楼

» 猜你喜欢

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

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

csyky2007

木虫 (正式写手)

呵呵,估计很少人涉足此类问题吧,那我想先请教下个具体问题吧:为解线性方程组分配空间的L2...此类的函数是怎么使用呢?希望有用过的热心人能给予指教,不胜感激!!!
求放心!
2楼2010-06-26 17:58:36
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zxczxc0417

木虫 (正式写手)


小木虫(金币+0.5):给个红包,谢谢回帖交流
fortran
很久以前的故事了
3楼2010-06-27 03:40:49
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

csyky2007

木虫 (正式写手)

引用回帖:
Originally posted by zxczxc0417 at 2010-06-27 03:40:49:
fortran
很久以前的故事了

那求解一个大型线性方程组,一般推荐用什么方法或语言呢?
求放心!
4楼2010-06-27 10:55:29
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zxczxc0417

木虫 (正式写手)


小木虫(金币+0.5):给个红包,谢谢回帖交流
引用回帖:
Originally posted by csyky2007 at 2010-06-27 10:55:29:


那求解一个大型线性方程组,一般推荐用什么方法或语言呢?

matlab
5楼2010-06-27 11:30:47
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

csyky2007

木虫 (正式写手)

引用回帖:
Originally posted by zxczxc0417 at 2010-06-27 11:30:47:

matlab

我最开始就是使用matlab的,正因为求解不了100万阶的我才转向fortran

[ Last edited by csyky2007 on 2010-6-27 at 13:17 ]
求放心!
6楼2010-06-27 13:13:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zzxin111

铜虫 (初入文坛)

★ ★
小木虫(金币+0.5):给个红包,谢谢回帖交流
余泽成(金币+1):谢谢参与应助! 2010-07-02 22:55:19
求解稀疏对称方程组,一般采用ICCG法
7楼2010-07-02 19:53:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hxz

木虫 (正式写手)


小木虫(金币+0.5):给个红包,谢谢回帖交流
64位环境么?
8楼2010-07-03 12:46:34
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

csyky2007

木虫 (正式写手)

引用回帖:
Originally posted by zzxin111 at 2010-07-02 19:53:57:
求解稀疏对称方程组,一般采用ICCG法

这是迭代方法吧,谢谢你的建议。
我现在找到了一个HSL库把问题解决了,呵呵
它有专门解决线性方程组的fortran程序
http://www.hsl.rl.ac.uk/catalog.html
求放心!
9楼2010-07-05 22:26:31
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

csyky2007

木虫 (正式写手)

引用回帖:
Originally posted by hxz at 2010-07-03 12:46:34:
64位环境么?

是32位,我问题已经解决了,谢谢大家的参与,谢谢!
求放心!
10楼2010-07-05 22:27:15
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 csyky2007 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 2024国社科通讯评审 +14 qsd10086 2024-06-13 28/1400 2024-06-18 10:13 by 求易
[精细化工] 试剂价格 +3 旭必上岸 2024-06-17 3/150 2024-06-18 09:13 by kzx_33
[硕博家园] 博士毕业高校和就业的相关问题 +7 SCITOPPP 2024-06-14 11/550 2024-06-18 07:51 by yinxing1995
[基金申请] F口信息学部拿面上,大概需要什么样的成果 +7 _奋黎_ 2024-06-16 12/600 2024-06-18 07:41 by ld_cauchy
[找工作] 初始合伙人来啦!(生物试剂耗材标准品) +12 欢快的小科研人 2024-06-15 22/1100 2024-06-18 06:50 by swq120
[考博] 2025考博 +7 自强不息a?a 2024-06-15 12/600 2024-06-17 22:51 by 自强不息a?a
[找工作] 杭电、天津科技、青农和宁波工程学院如何选? +12 味道很好啊 2024-06-13 23/1150 2024-06-17 22:16 by 半简体
[论文投稿] 论文已接收,但发现修改稿传的是旧版该怎么办? +3 zsq54321 2024-06-15 6/300 2024-06-17 19:45 by wjykycg
[基金申请] 有人中过人文社科类的博后特助吗? +3 outsider1986 2024-06-16 4/200 2024-06-17 19:35 by outsider1986
[基金申请] 博后面上今天有bug可以看到是否资助? +22 lyfbangong 2024-06-12 33/1650 2024-06-17 16:17 by carolloo
[有机交流] 苯酚和炔醇反应,mitsunobu反应 5+3 TONGMEIMEI 2024-06-12 9/450 2024-06-17 15:00 by dschong
[论文投稿] 投了一篇4区的SCI,审稿人一个拒稿,一个小修,编辑给了大修。 +9 安稳22123 2024-06-13 10/500 2024-06-14 23:45 by jurkat.1640
[考研] 物理化学一对一辅导 +3 林大diao 2024-06-12 5/250 2024-06-14 20:57 by 林大diao
[有机交流] ππ堆积会发生在有机溶剂中吗 5+3 zibuyu0420 2024-06-13 4/200 2024-06-14 14:17 by 小肉干
[基金申请] 国自然基金公布的时候基金号有吗 +8 潇洒怡惜 2024-06-13 11/550 2024-06-14 11:24 by JRfei
[基金申请] 工材E10口函评结束了吗 10+3 我1的飞翔 2024-06-13 5/250 2024-06-14 06:35 by nono2009
[硕博家园] 机械研究生如何拿到年薪40+w +13 阿巴阿巴哦哦 2024-06-11 15/750 2024-06-13 15:40 by 113745685
[考博] 博导选择 +3 bing85977 2024-06-12 3/150 2024-06-13 15:34 by 我是邱尧
[硕博家园] 考博应该从哪里开始准备 +6 亮姐2019 2024-06-11 8/400 2024-06-13 12:53 by 帕秋莉GO
[论文投稿] 摩擦磨损论文投稿 +3 jmysan 2024-06-12 3/150 2024-06-13 08:36 by 莱茵润色
信息提示
请填处理意见