关于求协方差矩阵特征值的问题

努力的大笨笨 · 发表于 2018-5-21 17:31:32

本帖最后由努力的大笨笨于 2018-5-23 09:58 编辑

已解决，谢谢

li913 · 发表于 2018-5-21 17:37:01

你这个程序中，从逻辑上讲，这句话没用，是废话。

渡箭 · 发表于 2018-5-21 18:59:57

楼上说的对

吉大渣渣-固体 · 发表于 2018-5-21 21:50:01

确实写和不写没啥分别。等价于：
IF(MATZ.NE.0)CALL ELTRAN(3,3,1,3,MC,IV1,XL)
或者
IF(MATZ.NE.0)then
CALL ELTRAN(3,3,1,3,MC,IV1,XL)
end if

胡文刚 · 发表于 2018-5-22 07:56:41

不满足也会执行 ELTRAN 的，所以这个判断相当于没写。
估计是原先的代码里，if 和 call eltran 中间有一些内容来处理什么，后来被删掉了。

努力的大笨笨 · 发表于 2018-5-22 09:27:21

胡文刚发表于 2018-5-22 07:56
不满足也会执行 ELTRAN 的，所以这个判断相当于没写。
估计是原先的代码里，if 和 call eltran 中间有一些 ...

感谢，我再好好看看

[线性代数] 关于求协方差矩阵特征值的问题