第一次在fcode发帖,初学fortran,如有不足请指教。
现有两个文件内容都是一样的,一个是有格式文件(*.FGRID)一个是无格式二进制文件(*.GRID),其中有格式文件我用Editplus打开,内容如下:
'DIMENS ' 3 'INTE'
10 10 25
无格式二进制文件,我想用Fortran的stream流打开,但是未能得到跟上边同样的结果,运行后我得到结果是:
DIMENS 50331648 INTE
268435456 201326592 167772160
主要是我要的整数 3 10 10 25 这几个数怎么一下变得那么大了呢? 不明白,怎么解决呢?!
请大牛指教啊》》》》》》》》》》》》》》》》
百思不得其解,我的fortran代码如下:
[Fortran] 纯文本查看 复制代码 Program www_fcode_cn
Use, Intrinsic :: ISO_C_BINDING !// 使用内部模块,保持与 C 语言变量类型一致
Implicit None
character(len=4) :: flag0 !// 4字节
character(len=8) :: flag1 !// 8字节
character(len=4) :: dtype !// 数据类型
integer*4 :: i,j,k
integer*4 :: ii,jj,kk
Open( 12 , File = "INJECTWATER_FORWUNAN.GRID" , access="stream" , form = "unformatted" )
Read( 12 ) flag0,flag1,i,dtype
Write( * , * ) flag1,i,dtype
Read( 12 ) ii,jj,kk
Write( * , * ) ii,jj,kk
! Inquire( 12 , Pos = i )
! Write( * , * ) i
Close( 12 )
End Program www_fcode_cn
以上为我的代码,是哪个地方出问题了呢?! 望求解,谢谢。
|