Fortran Coder

标题: 如何在fortran中输出带有变量的文件名 [打印本页]

作者: xiaojiang    时间: 2021-1-5 10:43
标题: 如何在fortran中输出带有变量的文件名
在网页查找过程中我找到了下面的方法


但是我在使用的过程中,程序报错

请问这种方法有效嘛
或者大大们有什么好的方法嘛
我只是想用这个方便处理一下数据,不然数据处理太麻烦了
输出的文件名最好可以按照某一个时间变量来输出

如果不行也可以按照0,1,2,3 。。。这种顺序
各位大大帮帮孩子


作者: li913    时间: 2021-1-5 11:25
给出你的代码
作者: xiaojiang    时间: 2021-1-5 13:54
[Fortran] 纯文本查看 复制代码
ENTRY OUTPUT
      a0=float(iter)/10000.
      C0=float(iter)/1000000.
      b0=int(a0)
      if(abs(a0-b0).le.1.D-08) then
        WRITE(*,*)'          ITER=',ITER
        write( cFilename , '(i05.5,a4)' ) c0, '.txt'
        Open ( 13 , File = trim( cFilename ) )
        do 420 k=1,Nz
            write(13,*)Z(k),H(k),c0
420     continue
        Close( 13 )
        write(12,*)'ITER=',ITER
        CALL PRINT
      endif

这是代码其中的一部分,求助大大帮帮忙
还有一句,character(9) :: cFilename 在整个程序最初的地方

作者: fcode    时间: 2021-1-5 15:27
新手建议每个程序单元(包括子程序)写上 implicit none

字符串需要定义。
character(len=12) :: cFilename

定义需要写在使用它的程序单元里。不同程序单元之间,变量命名是独立的。




欢迎光临 Fortran Coder (http://bbs.fcode.cn/) Powered by Discuz! X3.2