如何使用 f2py 无错误地结束 Fortran 函数

How to end fortran function without error with f2py

我正在用 f2py 为 python 编写一个 fortran 函数。在某种情况下,我想终止程序并 return 我的输出没有错误。不幸的是,停止程序会因错误而停止,因此,当我在 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

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

怎么样:

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

我没有找到重复的,所以:

您使用 RETURN 语句从函数或子例程 return:

if (condition)  return

EXIT 终止循环或其他结构

STOP 终止整个程序