write(EXT,'(i5)') it
fname = trim(NAME)
name = trim(FNAME) // '.' // adjustl(ext)
print *, 'name = ', name
fname = trim(NAME)
name = trim(FNAME) // '.' // adjustl(ext)
print *, 'name = ', name
Fortran产生批量文件名
最新推荐文章于 2023-12-05 23:06:18 发布
本文展示了一个简单的Fortran代码片段，演示了如何使用WRITE函数将整数输出到外部文件，并通过调整文件名来创建新的文件。此外，还展示了如何打印变量到标准输出。
扫一扫
771
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
