Fortran Coder

查看: 7472|回复: 3
打印 上一主题 下一主题

[数值问题] Fortran中维数为1×1的二维数组赋值问题

[复制链接]

3

帖子

2

主题

0

精华

入门

F 币
122 元
贡献
59 点

规矩勋章

跳转到指定楼层
楼主
发表于 2015-10-31 09:30:52 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
Fortran中1×n的矩阵A与n×1的矩阵B相乘,得到的1×1的矩阵C,无法直接赋值给实数 x?
比较麻烦的方法是再添加1句语句:令实数 x = C(1,1)
不知有没有更简便的方法?
分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

835

帖子

2

主题

0

精华

大宗师

F 币
3926 元
贡献
2334 点
沙发
发表于 2015-10-31 10:35:34 | 只看该作者
矩阵相乘,结果还是矩阵,即使只有一个元素。如果结果只有一个元素,可以变通一下 x = sum( matmul(a,b) )

评分

参与人数 1贡献 +2 收起 理由
fcode + 2 牛逼

查看全部评分

490

帖子

4

主题

0

精华

大宗师

F 币
3298 元
贡献
1948 点

水王勋章元老勋章热心勋章

板凳
发表于 2015-10-31 16:26:24 | 只看该作者
这样操作不就是点乘吗?!
本站应该有点乘与叉乘的相关代码可以参考

59

帖子

2

主题

0

精华

大师

F 币
810 元
贡献
476 点
地板
发表于 2015-11-9 23:50:01 | 只看该作者
1Xn或者nX1的矩阵不就是一维数组吗?real(8)::A(10),B(10),C
C=dot_product(A,B)
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

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

GMT+8, 2024-12-24 02:22

Powered by Tencent X3.4

© 2013-2024 Tencent

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