Fortran Coder

标题: Fortran中维数为1×1的二维数组赋值问题 [打印本页]

作者: MatrixVector 时间: 2015-10-31 09:30
标题: Fortran中维数为1×1的二维数组赋值问题
Fortran中1×n的矩阵A与n×1的矩阵B相乘，得到的1×1的矩阵C，无法直接赋值给实数 x？
比较麻烦的方法是再添加1句语句：令实数 x = C(1,1)
不知有没有更简便的方法？

作者: li913 时间: 2015-10-31 10:35
矩阵相乘，结果还是矩阵，即使只有一个元素。如果结果只有一个元素，可以变通一下 x = sum( matmul(a,b) )

作者: pasuka 时间: 2015-10-31 16:26
这样操作不就是点乘吗？！
本站应该有点乘与叉乘的相关代码可以参考

作者: kerb 时间: 2015-11-9 23:50
1Xn或者nX1的矩阵不就是一维数组吗？real(8)::A(10),B(10),C
C=dot_product(A,B)

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)