奇怪的Fortran指令

Question

学习旧的Fortran77代码＆＃34; goto-spagetti＆＃34;，我遇到了以下指令：

if(condition) label1, label2, label3

其中标签只有三个数字。有什么想法意味着什么？

Answer 1

算术如果。它转到

• label1如果表达式为负
• label2如果表达式为0
如果表达式为正，则
• label3。

警告：如果将其与浮点表达式一起使用，请注意，由于舍入错误，应该为0的结果可能是“接近0的小数”。这限制了算术的有用性。