如何使用 f2py 无错误地结束 fortran 函数答案

【问题标题】：How to end fortran function without error with f2py如何使用 f2py 无错误地结束 fortran 函数
【发布时间】：2017-05-24 11:28:25
【问题描述】：

我正在用 f2py 为 python 编写一个 fortran 函数。在某种情况下，我想终止程序并返回我的输出而不会出错。不幸的是，停止程序会因错误而停止，因此，当我在 python 中调用该函数时，整个脚本都会停止。

我现在的做法是在我的函数的主循环中放置一个条件退出，如下所示：

SUBROUTINE func(x)
...
do j1=1,N_steps

if (condition) then
 exit
end if

end do
end subroutine

然而，缺点是如果条件不满足，它会在每次迭代时检查它。条件在循环中不会改变。我更喜欢这样的东西

SUBROUTINE func(x)
...

if (condition) then
 stop
end if

do j1=1,N_steps
   ...
end do
end subroutine

但随后函数确实因错误而停止。

【问题讨论】：

【解决方案1】：

我没有找到重复的，所以：

您使用RETURN 语句从函数或子例程返回：

if (condition)  return

EXIT 终止循环或其他构造

STOP 终止整个程序

【讨论】：

【解决方案2】：

怎么样：

SUBROUTINE func(x)
...
if (.not. condition) then    
    do j1=1,N_steps
       ...
    end do
end if
end subroutine

【讨论】：