Question

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

我想要的是在变量之前有文本。如： ZETA = 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程序的格式输出

1 个答案: