ch1lg 发表于 2014-11-24 20:57:43

Do 循环中含有goto的理解问题

       DO 12 J12 = J11+1,M-1
      if(j14.eq.j12)goto 12
      DO 13 J13 = J12+1,M
      if(j14.eq.j13)goto 13

      CALL WINDUP (F,C,M,IER)
      IF (IER .EQ. 14) GO TO 13
      IF (IER .EQ. 13) GO TO 12

    13CONTINUE
    12CONTINUE
以上是遇到的一段代码，在理解上有困难，望指教。
我的理解，‘DO 12 J12 = J11+1,M-1’与‘ 12CONTINUE’对应，形成一个循环体，现在的问题是，代码中的’IF (IER .EQ. 13) GO TO 12‘到底是要转到最后的continue 还是转到最上面的Do ？

珊瑚虫 发表于 2014-11-24 21:20:43

本帖最后由 珊瑚虫 于 2014-11-24 21:23 编辑

举个例子比如J12=5若IER .EQ. 13 成立
则直接跳过到 下一个J12 的循环， 当然如果你的循环增量是1 则 执行J12=6
页: [1]
查看完整版本: Do 循环中含有goto的理解问题