Fortran程序的格式输出

Question

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

我想要的是在变量之前有文本。如：泽塔 = 12.34 其中 ZETA 是文本，12.34 是某个变量的内容。或者在 C++ 中，cout << "ZETA = " << ZETA ;

我一直在阅读旧网页，并尝试了各种方法，但我一无所获。考虑这个示例代码：

      PROGRAM MAIN
      REAL ZETA1, ZETA2
      ZETA1 = 2.173171
      ZETA2 = 1.18530
      WRITE(*,"(A6)" Zeta1:,ZETA1, "(2F7.4)")
C 10   FORMAT *( ZETA 1, ZETA 2*,2F7.4)
      END

C 注释行是原始格式行，会引发错误。如何格式化输出以显示

ZETA1 2.1731

ZETA2 1.1853

任何帮助或见解将不胜感激。

Answer 1

一些示例：

   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

Fortran程序的格式输出

Format output of Fortran program

formatting

fortran

gfortran

output