如何消除Fortran文本字段开始中的空白空间

Question

我想使用fortran代码在文本文件中写入一些数据。我能够做到这一点。但是，我在每条线的开头方面都有空白，这对于我的应用程序不合适。我给出了以下代码的代码和输出：

PROGRAM MAIN
IMPLICIT NONE
REAL        ::   PHI
PHI = 0.3000;
OPEN(UNIT=222,FILE='settings.txt',STATUS='NEW',ACTION='READWRITE')
WRITE(222,*) "What is the number?"
WRITE(222,*) PHI
END PROGRAM

代码的输出为

  What is the number?
  0.3000

我所需的输出将在开始时没有空白空间，

what is the number?
0.3000

那么，如何在文本字段开始时消除空白空间？

Answer 1

空白空间始终在列表定向输出（ *格式）中。您必须使用明确的格式才能从第1列开始。

WRITE(222,'(g0)') "What is the number?"
WRITE(222,'(g0)') PHI

我使用了Fortran 2008中最通用的描述符G0，因为您对详细控制不感兴趣。