在Fortran中将整数转换为字符串

我有一个程序在Fortran保存的结果到一个文件。目前我打开文件使用

OPEN (1, FILE = 'Output.TXT')

但是,现在我想运行一个循环,并将每次迭代的结果保存到文件的Output1.TXT,Output2.TXT,Output3.txt,…。

有没有一个简单的方法在Fortran的建筑文件名从循环计数器我?

你可以写一个单位,但你也可以写一个字符串

program foo
    character(len=1024) :: filename

    write (filename, "(A5,I2)") "hello", 10

    print *, trim(filename)
end program

请注意(这是我说的第二个伎俩),你也可以编程格式字符串。

program foo

    character(len=1024) :: filename
    character(len=1024) :: format_string
    integer :: i

    do i=1, 10
        if (i < 10) then
            format_string = "(A5,I1)"
        else
            format_string = "(A5,I2)"
        endif

        write (filename,format_string) "hello", i
        print *, trim(filename)
    enddo

end program
http://stackoverflow.com/questions/1262695/converting-integers-to-strings-in-fortran

本站文章除注明转载外,均为本站原创或编译
转载请明显位置注明出处:在Fortran中将整数转换为字符串