求助

7852123

TXT文件里有三列LAT,LON,VALUE，一共N行
转换成二进制下面这个程序运行出来的GRD在GRADS里面能读吗？
program main
implicit none
integer,parameter::all=（N行的数）
integer i
real lat(all),lon(all),lev(all)
open(41,file='e:\value1.txt',status='old')
do i=1,all
read(41,*) lat(i),lon(i),lev(i)
enddo
close(41)
open(11,file='e:\value1.grd',form='binary')
do i=1,all
  write(11) lat(i),lon(i),lev(i)
enddo
close(11)
end

7852123

这真是一个傻逼的问题。。。。。。。。。。。。。