Fortran Coder

查看: 2256|回复: 0
打印 上一主题 下一主题

[线性代数] Fortran利用linpack包求解实系数线性方程组

[复制链接]

6

帖子

5

主题

0

精华

入门

F 币
87 元
贡献
36 点
跳转到指定楼层
楼主
发表于 2022-11-12 09:08:20 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
本帖最后由 tianshui1001 于 2022-12-11 19:25 编辑

首先在如下网址下载需要的源代码


https://people.math.sc.edu/Burka ... ck_d/linpack_d.html



测试双精度浮点数 linpack_d 程序包
------------------------------
主程序为:linpack_d_test.f90


将如下5个文件添加到当前工程


blas0.f90
blas1_d.f90
blas2_d.f90
blas3_d.f90
linpack_d.f90





附件是利用 lapack 包求解实系数线性方程组的例子

linpack_d_test.jpg (284.75 KB, 下载次数: 162)

linpack_d_test.jpg

Real-lapack.rar

30.75 KB, 下载次数: 3

分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-12-25 16:42

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表