formatting - 输出格式 : too much whitespace in gfortran

Question

使用 gfortran 4.6。这段代码:

PROGRAM f1
IMPLICIT NONE

INTEGER :: i=1, j=3

WRITE(*,*) "integer i is ", i, ", and j is ", j, "."
END PROGRAM f1

产生这个控制台输出，其中有太多的空格:

 integer i is            1 , and j is            3 .

是否有一些我可以设置的设置，以便在第一个标记(“整数”)之前没有空格，因此标记之间的空白只是一个空格？我知道一个解决方法是

WRITE(*,'(A,I1,A,I1,A)') "integer i is ", i, ", and j is ", j, "."

但这似乎非常麻烦，每次我有一个打印语句时都必须这样做 - 宁愿它更像 C++，在输出中显式写入任何空格。

Answer 1

List-directed IO，即 write (*, *) 是为了方便。没有更改其行为的设置。不同的编译器会产生不同的输出。相反，正如您所确定的，您可以使用格式化的 IO。在这种情况下，您可以使用 I0 作为格式，这将生成所需的位数，而 I1 将仅输出一位整数。如果这些是将要输出的最大值，这没问题。

WRITE(*,  '( "integer i is ", I0, ", and j is ", I0, "." )' )  i, j