张姓男士英文名:用FORTRAN读二进制文件

来源:百度文库 编辑:高校问答 时间:2024/05/05 04:21:44
求教各位高手:
请问如何用FORTRAN编写一个程序,读取二进制文件呢?

给你一个例子:
Program main
Implicit None
Integer*4 :: iVar1 , iVar2
Real*4 :: rVar1 , rVar2
Character(Len=16) :: cStr
Open( 12 , File = 'TestBin.Bin' , Access = 'Direct' , Form = 'Unformatted' , RecL = 4 )
Read( 12 , Rec = 2 ) cStr
Read( 12 , Rec = 1 ) iVar1 , iVar2 , rVar1 , rVar2
Write( * , * ) cStr
Write( * , * ) iVar1 , iVar2 , rVar1 , rVar2
Close( 12 )
End Program main

二进制文件为Test.Bin