Fortran之前的冒号是什么东西:if(some_condition)then`？

Question

我正在处理其他人编写的一些代码,并发现了一段我尚未见过的Fortran语法,并且不完全理解也无法在网上找到任何内容(可能是因为我不知道它是什么所谓的).

代码如下所示:

bisection_or_ordering:if(ordering /= 'bisection') then
  ...
  do stuff
  ...
end if bisection_or_ordering

bisection_or_ordering 不是变量,也没有在代码中的任何地方声明.

这是做什么的？它是为了什么？它叫什么？

Answer 1

冒号前面的部分是构造名称.

可执行结构积木- ,if,block,associate,,critical 当然-可以任选具有这些结构的名字.select caseselect typedo

它们既可用于标识(为了清晰使用嵌套或长结构),也可用于exit语句下的控制(除了转义关键或并发块).

构造名称可能出现在块的结束语句中,如问题示例中所示,但它是可选的,必须匹配(如果存在).