博文
Fortran可变输出格式
||
# Language: fortraninteger i, nireal*8x(1000)character*80 OUTFMTx=0.d0ni=30! 方法一: 用足够大的值write(*,100)(x(i), i=1,ni)100format(1000(1x,F18.6))! 方法二: Ifort的扩展格式write(*,200)(x(i), i=1,ni)200format((1x,F18.6))! 方法三: format中使用字符串OUTFMT='(30f11.3)'write(*,trim(OUTFMT))(x(i),i=1,ni)end
◆图片/表格/公式/代码完整版请参看：Fortran可变输出格式◆
https://wap.sciencenet.cn/blog-548663-820731.html
上一篇：markdown在计算化学领域的扩展应用
下一篇：基于Three的JS动画
https://wap.sciencenet.cn/blog-548663-820731.html
上一篇：markdown在计算化学领域的扩展应用
下一篇：基于Three的JS动画
