我的主要代码中有一个OpenMP CRITICAL区域，例如：
!$OMP CRITICAL
call one_subroutine
!$OMP END CRITICAL
然后在子程序中，我有一个包含exit的if条件，如：
if (x<a) exit
我想知道这种情况是否有效，因为在大多数OMP区域中不允许使用exit语句，如果它不起作用，如何更改它？
答案 0 :(得分：0)
子程序可以包含您想要的任何内容。它可能是由其他人编写的子程序，您甚至可能没有源代码。这没关系。
也许有一些很好的打印例外，但是exit甚至return语句在被调用的子例程中肯定是完全正常的。