Direct Access:
読み出し data = fbindirread(path,rec,dim,type)
書き出し fbindirwrite; 追加(append)で書き出されるので,あらかじめ出力するべきファイルを消去する操作をしておくほうが安全.
例
; 書き出し
x1=new((/5,10/),float)
x2=x1
do j=0,4
do i=0,9
x1(j,i)=j*10+i
x2(j,i)=x1(j,i)+100
end do
end do
wrfl="./test.bin"
system("rm -f "+wrfl); あらかじめ消去しておく
fbindirwrite(wrfl,x1)
fbindirwrite(wrfl,x2)
; 読み出し
rdfl="./test.bin"
rec=0
dim=(/5,10/)
x1=fbindirread(rdfl,rec,dim,"float")
rdfl="./test.bin"
rec=0; 読み出しレコード開始位置,配列のサイズが単位,ゼロ始り
dim=(/5,10/)
x1=fbindirread(rdfl,rec,dim,"float")
rec=1
x2=fbindirread(rdfl,rec,dim,"float")