Originally posted by snoopyzhao at 2011-04-27 10:41:03:
我一般都是这样的：

gfortran -Wall wavercar.f90 -o wavercar.exe

Originally posted by 贺仪 at 2011-04-27 10:45:50:
恩 我编译好了 但是运行是出这样的错
At line 15 of file wavercar.f90
Fortran runtime error: Format present for UNFORMATTED data transfer
下面是完整的程序
你帮我看一下哪里有问题好吗？谢谢咯

Originally posted by snoopyzhao at 2011-04-27 11:02:31:
输入数据文件也传上来吧。

Originally posted by 贺仪 at 2011-04-27 11:44:03:
里面有几个变量没定义， nbandmin.and.iband.le.nbandmax 你随便改一下

program example
   real :: a,a1,b,b1,c(4),c1(4)
   integer :: n,n1,m,m1
   n=6
   m=8
   a=1.1
   b=2.2
   c(1)=3.3
   c(2)=4.4
   c(3)=5.5
   c(4)=6.6
   open(1,file='test',form='unformatted')
   write(1)a,b,n
   write(1)c,m
   close(1)
   open(1,file='test',form='unformatted', status = 'old')
   read(1) a1,b1,n1
   read(1) c1, m1
   write(*,*) a1, b1, n1, c1, m1
   close(1)
end

Originally posted by snoopyzhao at 2011-04-27 14:50:50:
哦，才注意到你的输入文件是一个二进制文件……，在这种情况下，你的 read 函数中就不能有那个表示 fmt 的 *，直接 read(12).... 就可以了

不过，对于这种情况，你一定要知道二进制文件是如何写入的，这样才 ...

Originally posted by snoopyzhao at 2011-04-27 14:50:50:
哦，才注意到你的输入文件是一个二进制文件……，在这种情况下，你的 read 函数中就不能有那个表示 fmt 的 *，直接 read(12).... 就可以了

不过，对于这种情况，你一定要知道二进制文件是如何写入的，这样才 ...

Originally posted by 贺仪 at 2011-04-27 22:53:39:
要是不知道二进制文件是如何写入的可不可以读取出来？

Originally posted by snoopyzhao at 2011-04-27 23:05:02:
这个一般很困难，相当于进行确解数据格式了……

所以，最好还是找一下那个文件是如何写入的……