PPT Slide
random access
direct accessing
open (unit=1,file=“wr”,access=“direct”, &
recl=100, status=“replace”, action=“readwrite”)
do Irec=1,10
write (unit=3,fmt=“(3i5)”,rec=Irec) I1,I2,I3
end do
do Irec=10,1,-1
read (unit=3,fmt=“(3i5)”,rec=Irec) I1,I2,I3
end do
Previous slide
Next slide
Back to first slide
View graphic version