应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

CyRhmU.jpeg
小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » Fortran » 【求助】fortran求解矩阵
81/1返回列表
查看: 1817  |  回复: 7
只看楼主@他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

liuyusuc

禁虫 (正式写手)
本帖内容被屏蔽

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
1楼2011-04-15 16:47:58
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

sudo

木虫 (正式写手)
★ ★ ★
小木虫(金币+0.5):给个红包，谢谢回帖交流
微尘、梦想(金币+2): 谢谢，呵呵…… 2011-04-15 20:15:27
搜LAPACK，大名鼎鼎的库...
赞一下(2人) 回复此楼
2楼2011-04-15 17:13:10
 已阅   关注TA 给TA发消息 送TA红花 TA的回帖

huycwork

金虫 (著名写手)
★ ★ ★
小木虫(金币+0.5):给个红包，谢谢回帖交流
微尘、梦想(金币+2): 谢谢回复，欢迎常来程序语言版…… 2011-04-15 20:16:00
这个明显是现成的…
octave里面直接这么解：
A = [1,2,3;2,3,4;4,5,6];
B = [1,2,3]'
X = A\B
如此而已
赞一下(2人) 回复此楼
漩涡的中心有一块空地，空空的。
3楼2011-04-15 19:12:59
 已阅   关注TA 给TA发消息 送TA红花 TA的回帖

liuyusuc

禁虫 (正式写手)
本帖内容被屏蔽
4楼2011-04-16 13:17:28
 已阅   关注TA 给TA发消息 送TA红花 TA的回帖

scatcj

木虫 (小有名气)
★
微尘、梦想(金币+1): 谢谢参与！ 2011-04-18 16:56:56
lapack有现成的
回复此楼
Troubleisafriend!
5楼2011-04-17 22:24:00
 已阅   关注TA 给TA发消息 送TA红花 TA的回帖

whl2dxl

木虫 (小有名气)
★ ★ ★
小木虫(金币+0.5):给个红包，谢谢回帖
微尘、梦想(金币+2): 谢谢回复，欢迎常来程序语言版！ 2011-04-23 17:29:55
你的这个问题可以用lapack中的dgesv.f这个子程序来解决，具体的就是用程序将矩阵A和B读入 然后调用dgesv就可以求出X    关于dgesv的使用说明请参考以下网站，上面介绍的很清楚
http://www.mathkeisan.com/UsersGuide/man/dgesv.html
http://www.nag.co.uk/lapack-ex/node5.html
赞一下(2人) 回复此楼
6楼2011-04-22 21:49:08
 已阅   关注TA 给TA发消息 送TA红花 TA的回帖

liuyusuc

禁虫 (正式写手)
本帖内容被屏蔽
7楼2011-04-23 12:58:54
 已阅   关注TA 给TA发消息 送TA红花 TA的回帖

lingzhicao

金虫 (小有名气)
★
小木虫(金币+0.5):给个红包，谢谢回帖
引用回帖:
Originally posted by liuyusuc at 2011-04-15 16:47:58:
请问fortran程序中是如何求解矩阵的？例如对于AX=B，其中A,B,X均为多维矩阵，想求出其中的X矩阵都有什么方法呀？

楼主好，想知道您用的fortran是哪个版本，我想用visual fortran6.0可一直没有下载到，有的话能帮忙传一下吗？邮箱：lingzhicaot@163.com谢谢！
赞一下(1人) 回复此楼
Yesterdayisahistory,tomorrowisamystery.buttodayisagift.
8楼2011-04-25 09:25:22
 已阅   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 liuyusuc 的主题更新
81/1返回列表
信息提示
关闭
请填处理意见
关闭