在CentOS上进行Fortran文件操作,需结合系统命令与Fortran语法,核心操作如下:
打开/关闭文件
OPEN(UNIT=编号, FILE='文件名', STATUS='状态', ACTION='操作类型')
STATUS
:'old'
(已存在)、'new'
(新建)、'replace'
(覆盖)、'scratch'
(临时文件)。ACTION
:'read'
(读)、'write'
(写)、'readwrite'
(读写)。CLOSE(编号)
。读写文件
READ(编号, 格式说明符) 变量
,如READ(10, '(I5)') n
(读取整数)。WRITE(编号, 格式说明符) 数据
,如WRITE(20, '(F8.2)') x
(写入浮点数)。OPEN(..., FORM='unformatted', ACCESS='stream')
,然后WRITE(编号) 数据
。OPEN(..., FORM='unformatted', ACCESS='stream')
,然后READ(编号) 数据
。文件查询与状态管理
INQUIRE(FILE='文件名', EXIST=变量)
。INQUIRE(FILE='文件名', SIZE=变量)
。REWIND(编号)
(回到开头)、BACKSPACE(编号)
(回退一行)。STATUS='old'
和POSITION='append'
,再使用WRITE
写入。OPEN
、READ
、WRITE
后检查IOSTAT
(错误码)和IOMSG
(错误信息)。'(A, I5, F10.3)'
(字符串+整数+浮点数)。ls
查看文件、cp
复制文件、rm
删除文件,与Fortran操作结合使用。chmod
修改文件权限,确保Fortran程序可读写文件。文本文件读写:
! 写入文本文件
OPEN(10, FILE='data.txt', STATUS='replace', ACTION='write')
WRITE(10, '(A)') 'Hello, CentOS!'
CLOSE(10)
! 读取文本文件
OPEN(10, FILE='data.txt', STATUS='old', ACTION='read')
READ(10, '(A)') line
PRINT *, line
CLOSE(10)
二进制文件读写:
! 写入二进制文件
REAL :: data(3) = [1.0, 2.0, 3.0]
OPEN(20, FILE='data.bin', FORM='unformatted', ACTION='write')
WRITE(20) data
CLOSE(20)
! 读取二进制文件
OPEN(20, FILE='data.bin', FORM='unformatted', ACTION='read')
READ(20) data
PRINT *, data
CLOSE(20)
sudo yum install gcc-gfortran # 安装GCC的Fortran编译器
echo 'export PATH=/usr/local/bin:$PATH' >> ~/.bashrc
echo 'export LD_LIBRARY_PATH=/usr/local/lib:$LD_LIBRARY_PATH' >> ~/.bashrc
source ~/.bashrc
通过以上方法,可在CentOS上高效完成Fortran文件的读写、查询及管理操作。