求出的自振频率的平方是负数，非常郁闷特向大家请教

ChaChing

楼主现在有结论了吗? 如何解决!?

丑小鸭爱奋斗

欧阳中华 发表于 2007-1-30 11:40

                               
登录/注册后可看大图

.
   JACOBI方法是通过矩阵转换方法得到特征值的，前提是矩阵为实对称矩阵，书上都写的呀。

大侠，我是fortran初学者，想问您两个简单的fortran语言问题：
1）
   DO 110 I=1,L
        IF(I.EQ.J) GO TO 110
        IF(A(J,I).NE.0.0) GO TO 120
110   CONTINUE
像这么一段语句，if i==j goto 110是相当于重新开始这个循环还是跳出循环啊？
2）
在子程序的开始有这样的语句：
dreal(zdumr) = zdumr
      dimag(zdumi) = (0.0d0,-1.0d0)*zdumi
      cabs1(zdum) = dabs(dreal(zdum)) + dabs(dimag(zdum))
      csign1(zdum1,zdum2) = cabs1(zdum1)*(zdum2/cabs1(zdum2))
这是相当于每句定义一个函数吗？还是什么意思啊。。。
3） wkm = (1.0d0,0.0d0)
     与dcmplx(da,0.0d0)
       这两种表示方法都是表示复数吧？两种表示说法有什么区别吗？第一个也就是wkm=1?