45、Fortran 函数与过程使用详解

Fortran 函数与过程使用详解

1. 函数结果相关规则

• 结果后缀使用 ：若存在结果后缀，在指定结果属性的任何规范语句中，必须使用结果名称而非函数名称。
• 结果值定义 ：
  • 若函数结果不是指针，函数执行完成时其值必须被定义。
  • 若结果是指针，函数执行完成时其关联状态必须被定义。
• 直接递归情况 ：在直接递归的情况下，必须同时指定 RECURSIVE 关键字和 RESULT 后缀，这是唯一需要 RESULT 后缀的情况。

2. 结果变量

每个函数都有一个结果变量。默认情况下，结果变量与函数同名。 RESULT 后缀用于为结果变量指定不同的名称。结果变量可以像普通变量一样被声明、定义和引用。函数的值就是函数执行完成时结果变量的值。

有时候需要区分函数名和结果名，例如当函数结果是数组且函数是直接递归时，对函数的递归引用可能与对数组结果的引用难以区分。通过为结果值提供一个名称，为递归引用提供另一个名称，可以解决这种歧义。

以下是一个递归函数 REVERSE 的简单示例，它可以反转给定短语中的单词：

PROGRAM TEST_FLIPPED