[Thread Prev][Thread Next][Index]
Fortran Binary File Read
Hello,
I'd like to read a set of fortran binary files into ferret. I've tried it
a couple of different ways according to the documentation (User guide v4.4
p24) but ferret quits with a core dump.
The size of each binary file is 59435348 bytes and they are written with
a fortran subroutine which looks like:
!
! generate file name from time t
!
s = t
if(s.ge.10**6) s = 10**6-1
do i=5,0,-1
p = s/10**i
s = s - p*10**i
num((6-i):(6-i)) = digit(p)
enddo
fil = 'out'//num
if(sda) then
ff = 'physical'
else
ff = 'unformatted'
endif
!
! open file and write it
!
open(unit=10,status='unknown',file=fil,form=ff)
write(10) nx,ny,nk
write(10) eta
write(10) ub
write(10) vb
write(10) up
write(10) vp
write(10) us
write(10) vs
write(10) dp
write(10) q
write(10) qx
write(10) qy
close(10)
The variables are arrays of dimension (nx,ny) or (nx,ny,nk) and they
are written unformatted. Any help would be appreciated.
thanks,
David.
*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
David Oxilia Tel: (541) 737-2368
COAS-Oregon State University Fax: (541) 737-2064
Ocean Admin. Bldg. 104
Corvallis, OR 97331-5503 Email: oxilia@hejira.oce.orst.edu
*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
[Thread Prev][Thread Next][Index]
Dept of Commerce /
NOAA /
OAR /
PMEL /
TMAP
Contact Us | Privacy Policy | Disclaimer | Accessibility Statement