formatting - 取决于变量的输出格式字符串

Question

我希望将 Fortran 写入语句格式化为依赖于某个变量。例如，我可以这样写:

write(*,'(3f15.3,3f9.2)') x,y,z,(var(i),i=1,nvari)

其中 nvari = 3。但是，如果在某些情况下，我实际上有 4 个变量(即 nvari = 4)。我想写这样的东西:

write(*,'(3f15.3,nvari(f9.2))') x,y,z,(var(i),i=1,nvari)

现在，nvari 可以是任何东西，并且输出将按我喜欢的方式工作。我怎样才能做出这样的事情？

Answer 1

如果您使用的是 Intel fortran，它有一个专有的扩展——您可以在尖括号中包含一个现有变量作为说明符:

  write(*,'(3f15.3,<nvari>f9.2)') x,y,z,(var(i),i=1,nvari)