'写; 声明没有很多空格

Vit*_*.us 1 fortran

write函数确实打印了columms之间有很多空格的参数,这最终给了我一个非常庞大的文件.那么我如何修剪输出,以便像一个空格.

open(unit=1,file='gfortran.txt')
write(1,ERR=1001)1,2,3 
Run Code Online (Sandbox Code Playgroud)

Hig*_*ark 5

您需要使用Fortran的编辑描述符控制输出格式.如果你只想在一行上写3个整数,那么你可以使用

write(1,fmt='(3i2)',err=1001) 1, 2, 3
Run Code Online (Sandbox Code Playgroud)

它会将整数写入输出文件中的2个字符的宽字段.您应该熟悉的编辑描述符有很多变体.几个例子:

fmt='(i4.2)'  ! 1 integer is written into a 4-character wide field, with at least 2 digits so a leading 0 is written if necessary
fmt='(6f9.4)' ! 6 reals are written into 9-character fields, with 4 digits after the decimal point
Run Code Online (Sandbox Code Playgroud)

除此之外还有很多,您的编译器文档将解释所有内容.

  • 如果您不知道整数有多大并且想要使用最小位数,则可以使用I0格式.所以:3(1X,I0)或*(1X,I0) (3认同)