Simwe仿真论坛(forum.simwe.com),CAE/CAD/CAM/,FEA/FEM/有限元分析论坛---(手机验证注册)'s Archiver
论坛
›
K08:编程语言
› 请问在fortran77里,这样求子矩阵(分解矩阵)有没问题?
littletop
发表于 2011-2-28 12:56:56
请问在fortran77里,这样求子矩阵(分解矩阵)有没问题?
S为80*20的矩阵,S2为20*20的S的第二个子矩阵,程序如下:
DO 490 I=1,20
DO 500 J=1,20
K2=I+20
L2=J
S2(I,J)=S(K2,L2)
S2(J,I)=S2(I,J)
500 CONTINUE
490 CONTINUE
不知道这样求S2有没问题?另外,用“S2(J,I)=S2(I,J)
”求转置有没问题?请高手们不吝赐教,不甚感激。
页:
[1]
查看完整版本:
请问在fortran77里,这样求子矩阵(分解矩阵)有没问题?