首页 > 解决方案 > (1) 处的标签与 (2) 处的 goto 语句不在同一个块中

问题描述

我是 Fortran 的初学者,我尝试使用 Fortran 运行一些东西。这是我的编程中显示的错误消息:

(1)处的标签与(2)处的 goto 语句不在同一个块中。

位置(1)是“66 CALL PRINT”行,位置(2)是“GO TO 66”行。你能帮我解决这个问题吗?或者你能推荐一些关于学习fortran的材料给我吗?非常感谢。

这是我的代码的一部分:

      WRITE(6,600) ITR                                                  
  600 FORMAT(' RATIONAL EXPECTATIONS VARIABLES CONVERGED IN ',I4,       
     1' ITERATIONS')                                                    

   66 CALL PRINT    

   ......                                                   

   65 IF(ITR.LT.MAXITR) GOTO 62                                         

      WRITE(6,601) MAXITR                                               

  601 FORMAT(' RATIONAL EXPECTATIONS VARIABLES FAILED TO CONVERGE IN ', 

     1I4,' ITERATIONS')                                                 

      GO TO 66

错误信息

标签: fortranlabelgoto

解决方案


这是一个警告,而不是错误。但是,它会警告您跳入不同的代码块是危险的。例如,如果你跳到循环或另一个 if 块中的语句会发生什么?


推荐阅读