fortran - 这个 Fortran 代码有什么作用？

Question

我得到了一些 Fortran 代码（我相信是 90），我正试图弄清楚它的作用。我不知道 Fortran，但知道 Perl。

这是我无法弄清楚的片段：

  fmly='I:\CEX\Fmly'
  fmlyfile=fmly(1:23)//yearqtr(qtrcnt)
  open(unit=13,file=fmlyfile)

我知道这//是一个连接运算符，但我对这fmly(1:23)部分的作用感到困惑。

Answer 1

fmly(1:23)正在将字符串fmly从一个位置切到另一个1位置23。请注意，在 Fortran 中，字符串索引从 开始，1而不是从0. fmly(1:23)相当于fmly(:23)。

Answer 2

string(A:B)是一个子字符串，选择字符串 A 到 B 的字符string。 fmly用少于 23 个字符进行初始化，因此尾随字符将为空白。之后，它将与字符串数组的元素yearqtr（或者可能是字符串值函数 yearqtr）连接。