努力的大笨笨 发表于 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
{:4_110:}{:4_110:}{:4_110:}

胡文刚 发表于 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 中间有一些 ...

感谢，我再好好看看
页: [1]
查看完整版本: 关于求协方差矩阵特征值的问题