Wednesday, August 10, 2005

Baca unformatted dgn Matlab


Misalkan kita memiliki program dalam fortran untuk menyimpan file dalam format unformatted sebagai berikut:

integer n,m,i,j
parameter (n=5,m=10)
real a(n,m),c,d

c... proses perhitungan anda...
c... (terserah seperti apa)...

c... misalnya hasil disimpan dalam format seperti di bawah ini...
open(11,file='tes.bin',form='unformatted',status='unknown')
write(11) c,d
write(11) a
close(11)

stop
end

Dan kita ingin mengolahnya lebih lanjut dengan menggunakan Matlab (misalnya untuk menampilkan gambarnya). Maka kita dapat membaca hasil keluaran dari fortran tersebut dengan perintah sebagai berikut:

fid=fopen('tes.bin','rb');
fseek(fid,4,'bof');
c=fread(fid,4,'float')
d=fread(fid,4,'float');
fseek(fid,8,'cof');
a=fread(fid,[5,10],'float');

0 Comments:

Post a Comment

<< Home