`loop` 和 `if(test) next` 在 Mortran 中如何工作？

Question

我这里有一个 Mortran 代码。

loop<(do something)   
<k=1,n; if(test) next; 
(do another thing 1); (do another thing 2);
(do another thing 3);
>
>

如果测试语句为真会怎样？ 我想代码执行做另一件事 2 跳过做另一件事 1.

以上代码片段是 R 中 glmnet 包的一部分。 包裹里有.Fortran("lognet",~~)

Answer 1

如果 test 的计算结果为 .true.，则程序将进入此循环的下一次迭代。有关详细信息，请参阅此 Mortran User's Guide。