fortran write格式

advance="no"，就是输出不换行。

write(*,"(f10.1)",advance="no")A

格式化输出的控制字符非常的丰富，但常用的并不多，一般说来:" I 、F、E、A、X "是最常使用的几个格式，最好把它们都记下来。

Iw[.m] 以w个字符的宽度来输出整数，至少输出m个数字。 如：write(*,"(I5)") 100 输出：_ _100 ; 前面两空格

Fw.d 以w个字符文本框来输出浮点数，小数部分占d个字符宽，输出文本框的设置不中会出现*号。如：write(*,"(F9.3)") 123.45 输出：_ _123.450 ; 前面两空格，后补0

Ew.d[Ee] 用科学计数法，以w个字符宽来输出浮点数，小数部分占d个字符宽，指数部分最少输出e个数字。如：write(*,"(E15.7)" 123.45 输出：_ _0.1234500E+03 ; 输出不中15个字符的部分补上空白，小数部分不足7位的会补0

Dw.d 使用方法同Ew.d，差别在于输出时用来代表指数的字母由E换成D。

Aw 以w个字符宽来输出字符串。 write（*,"(A10)") "Hello" 固定用是为10我个字符段来输出字符串，不足的前面补空格

nX 输出位置向右移动n位。write(*,"(5X,I3)") 100 ; 将先填5个空格，再输出整数。

Lw 以w个字符宽来输出T或F的真假值。write(*,"(L4)") .true. ;程序会输出3个空格和一个T

/ 换行输出。write(*,"(I3//3)") 10,10 程序会得出4行，中间两行空格是从除号"/"得到的。

Tc 把输出的位置移动到本行的第c个字节。

TLn 输出位置向左相对移动n个字节。

TRn 输出位置向左相对移动n个字节。

SP、SS 加了SP后，输出数字时如数值为正则加上"+"，SS则是用来取消SP的功能。 如 write(*,"(SP , I5 , I5 , SS , I5)") 5 , 5 , 5 输出：+5 +5 5

BN、BZ BN定义在输入时没有数据的字节代表没有东西。BZ定义在没有数据的字节代表0

另有kP 、Bw[.m] 、Ow[.m] 、Zw[.m]用的较少，在需要时可以查询。

原文地址：http://blog.sina.com.cn/s/blog_81fcea16010141nb.html