24小时热门版块排行榜    

查看: 1958  |  回复: 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 的主题更新
普通表情 高级回复(可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考博] 论文被硕导卡 +3 自强不息a?a 2024-06-26 5/250 2024-06-26 23:28 by 渣男2019
[有机交流] 做什么表征可以检测塑料中碳氢氧的含量 5+3 pzr的sci之路 2024-06-25 7/350 2024-06-26 19:32 by wrgeng
[基金申请] 国基在研影响申请结果吗 +10 WOWO159357 2024-06-26 10/500 2024-06-26 18:19 by 德尚中行
[考研] 刚当完兵回来想考研 +7 五官在线 2024-06-23 18/900 2024-06-26 17:05 by 1158057902
[找工作] 老博士选高校 5+5 woodhead8386 2024-06-24 8/400 2024-06-26 16:35 by 大大熊呀
[论文投稿] 我在写关于多维空间的论文,希望能与大家交流,准备在science上发表 +8 lgf519 2024-06-24 10/500 2024-06-26 16:25 by 梦渺岚烟
[基金申请] 博后面上今天下午会公布吗?大家有无消息? +9 地理学1995 2024-06-24 13/650 2024-06-26 16:02 by kyukitu
[硕博家园] 难道我真的要放弃吗? +42 133456 2024-06-20 44/2200 2024-06-26 12:32 by lyfbangong
[教师之家] 神奇的中医 +8 水冰月月野兔 2024-06-24 10/500 2024-06-26 12:10 by lyfbangong
[基金申请] 今天能不能出来名单 +8 地理学1995 2024-06-25 10/500 2024-06-26 09:46 by msjy
[有机交流] 过柱子,产品,杂质在是 pe:ea=100:1 也一起出来? +5 w256 2024-06-25 5/250 2024-06-26 09:31 by 小木木cc
[基金申请] 厅级项目出校却没中 +13 Iwould 2024-06-23 20/1000 2024-06-26 06:14 by foolishmani
[基金申请] 基金申请书名称有变化 +5 xuel2011 2024-06-25 7/350 2024-06-26 00:07 by 老虎当猫养
[考博] 没读上博,好焦虑! +6 wangzhe_bs 2024-06-24 8/400 2024-06-25 21:15 by wangzhe_bs
[基金申请] 2024安徽省哲社立项名单公示 +3 robin_work 2024-06-24 6/300 2024-06-25 14:37 by Pickfoot
[金属] EBSD的解析率只有10% +3 wallace6666 2024-06-20 7/350 2024-06-24 16:52 by wallace6666
[基金申请] 说博后基金7月出的真打电话了吗? +12 antonysole 2024-06-24 14/700 2024-06-24 13:39 by sizhouyi
[有机交流] 生成亚胺的反应怎么能进行完全 +3 1369836 2024-06-23 3/150 2024-06-23 18:44 by hwqMSE
[基金申请] 请问三个字的中文名字,在文中到底怎么表示? 5+3 zhongyuan764 2024-06-22 6/300 2024-06-23 17:42 by 鱼翔浅底1
[基金申请] 教育部基金 +5 m1393 2024-06-21 5/250 2024-06-21 21:13 by odes
信息提示
请填处理意见