2713阅读
0回复

[讨论]g77 及gfrotran 中二进制文件的问题

离线febi

UID ：2537

注册：2007-05-11
登录：2016-05-05
发帖：123
等级：退休版主

0楼发表于: 2008-03-30 10:14:00

A question about g77's OPEN & WRITE

--------------------------------------------------------------------------------

Zhong Wang wrote:

> I am using g77 for programing now. But I found that
> g77 is somewhat
> different to Visual Fortran in I/O.
>
> In visual fortran, the following code is legal:
>
> REAL a(10)
> OPEN(10,file='aaa.dat',form='binary')
> WRITE(10)a
> CLOSE(10)
> <<<<<
> You can see that in file aaa.dat there's not
> anything between the integer
> and real numbers.
> But in g77, if I use:
>
> REAL a(10)
> OPEN(10,file='aaa.dat',form='unformatted')
> WRITE(10)a
> CLOSE(10)
> <<<<<
> With "hexedit aaa.dat", you can find there's a
> length value before and after
> each record. You know, sometimes we have to make more
> efforts to deal with
> those length values when we use other softwares to
> open these data files. For
> example, when I use matlab to open the file, I have to
> read off those length
> values. It's very convinient.
>
> Can you recommend me a possible method with g77 to
> generate data file which
> contains no extra bytes in it? Or can the developers
> add some new features
> like form='direct' to g77?

No, there's no method to get rid of the record lenghts in an unformatted
file when using g77. However, if all the records in your file are the
same length, you could write a "direct access" file, by doing the writes
thusly:

REAL A(10)
OPEN(...,ACCESS='DIRECT',RECL=....)
DO I = 1, N
... fill A
..

未注册仅能浏览部分内容，查看全部内容及附件请先登录或注册

磁砖

发帖回复