这个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)是一个子字符串，选择字符串string的字符A到B. fmly初始化少于23个字符，因此尾随字符将为空白。之后，它将与字符串数组yearqtr的元素（或可能是字符串值函数yearqtr）连接在一起。