温馨提示×

Ubuntu下Fortran文件读写如何操作

小樊
35
2025-12-26 04:47:40
栏目: 智能运维

在Ubuntu下进行Fortran文件的读写操作,你需要使用Fortran编译器(如gfortran)来编译你的Fortran代码,并确保你的代码中包含了正确的文件读写语句。以下是一个简单的例子,展示了如何在Fortran中进行文件的读写操作。

首先,创建一个名为read_write_example.f90的Fortran源文件,内容如下:

program read_write_example
    implicit none
    integer :: iounit, iostat, ios
    real, dimension(10) :: data

    ! 打开文件用于写入
    open(unit=iounit, file='data.txt', status='replace', action='write', iostat=ios)
    if (ios /= 0) then
        print *, 'Error opening file for writing'
        stop
    end if

    ! 写入数据到文件
    data = [(i, i=1, 10)]
    write(iounit, *) data

    ! 关闭文件
    close(iounit)

    ! 打开文件用于读取
    open(unit=iounit, file='data.txt', status='old', action='read', iostat=ios)
    if (ios /= 0) then
        print *, 'Error opening file for reading'
        stop
    end if

    ! 从文件读取数据
    read(iounit, *) data

    ! 关闭文件
    close(iounit)

    ! 打印读取的数据
    print *, 'Data read from file:'
    print *, data
end program read_write_example

这个程序首先定义了一个整数变量iounit用于文件单元号,一个整数数组data用于存储数据,以及一些用于错误检查的变量。然后,它尝试打开一个名为data.txt的文件用于写入,如果成功,它会将数组data中的数据写入文件。之后,它关闭文件,重新打开同一个文件用于读取,并从文件中读取数据到数组data中。最后,它关闭文件并打印出读取的数据。

要编译这个Fortran程序,你可以在终端中使用以下命令:

gfortran -o read_write_example read_write_example.f90

这将生成一个名为read_write_example的可执行文件。运行这个程序,它将创建一个data.txt文件,写入数据,然后读取并打印这些数据。

请注意,这个例子使用了Fortran 90标准。如果你使用的是不同的Fortran标准,可能需要进行相应的调整。此外,错误处理在这个例子中非常基础,实际应用中可能需要更复杂的错误处理逻辑。

0