Question

大神。怎么用fortran将10进制.dat文件转化成二进制.grd文件？

Answer 1

program grads
implicit none
integer,parameter::m=20,n=16
integer i,j
real h(m,n)
open(1,file='D:\grads\hi.dat')
open(12,file='trans.grd',form='unformatted')
rewind(1)
read(1,*)((h(i,j),i=1,m),j=1,n)
rewind(12)
write(12,*)((h(i,j),i=1,m),j=1,n)
close(1)
close(12)
end

Answer 2

只要你知道txt文件中数据的格式和grd文件中数据的格式，是可以转换的。

read(2) h(it) 是读无格式文件，也就是所谓的读取二进制的时候用的。

open(2,file='xifeng.txt',form='formatted')这一句中文件2是文本文件，相互冲突，自然不行。

同理，write(1,*) h(it)是有格式输出，而文件1是二进制文件，一样会报错。