ChaChing 发表于 2010-3-4 09:21

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

丑小鸭爱奋斗 发表于 2012-10-14 13:13

欧阳中华 发表于 2007-1-30 11:40 static/image/common/back.gif
.
   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?
页: 1 [2]
查看完整版本: 求出的自振频率的平方是负数,非常郁闷特向大家请教