Formatting Fortran程序的格式输出

我继承了一些代码，用于化学模拟。我的代码正常工作，但输出函数WRITE和FORMAT给我带来了困难。我正在阅读gfortran在线手册，发现gfortran不支持格式，说明它是非标准的，并且不像WRITE那样可配置。这很好，我很乐意替换它，但我在弄清楚如何格式化FORTRAN输出时遇到了麻烦

我想要的是在变量前面有文本。例如： 泽塔=12.34 其中ZETA是文本，12.34是某个变量的内容。 或者在C++中， CUT

一些例子：

   PROGRAM MAIN
       REAL ZETA1, ZETA2
       ZETA1 = 2.173171
       ZETA2 = 1.18530
       write (*, '( "Zeta1:", F7.4 / "Zeta2:", F7.4 )' )  ZETA1, ZETA2
       write (*, '( 2 (A, F7.4 / ) )' )  "Zeta1", ZETA1,"Zeta2", ZETA2
       write (*, 1010) ZETA1, ZETA2
       1010 format ( "Zeta1=", F7.4 / "Zeta2=", F7.4 )
    END program main

---

谢谢你，结束了我的痛苦。我对源代码的其余部分应用了类似的更改，现在我完成了！呜！我表示衷心的感谢！实际上，您的

c++

没有指定格式，可以说等效的fortran是一个简单的列表定向写，

write（*，*）'ZETA1'，zeta

不是在这里争论，只是在这里解决问题。

   PROGRAM MAIN
       REAL ZETA1, ZETA2
       ZETA1 = 2.173171
       ZETA2 = 1.18530
       write (*, '( "Zeta1:", F7.4 / "Zeta2:", F7.4 )' )  ZETA1, ZETA2
       write (*, '( 2 (A, F7.4 / ) )' )  "Zeta1", ZETA1,"Zeta2", ZETA2
       write (*, 1010) ZETA1, ZETA2
       1010 format ( "Zeta1=", F7.4 / "Zeta2=", F7.4 )
    END program main