如何使用 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
终止整个程序
我正在用 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
终止整个程序