如何消除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，因为您对详细控件不感兴趣。