Displaying 1 result from an estimated 1 matches for "byteswapio".
Did you mean:
byteswap
2005 Apr 23
0
reading fortran binary file
...name and unit description
if(cname.eq.'LATITCRS ')then
read(11)out2d
else
read(11)
endif
goto 10
elseif(iflag.eq.2)then
goto 20
endif
20 close(11)
end
2.compile the subroutine as share object file with -byteswapio optin
3."dyn.load" the subroutine in R
4.call the subroutine.
.Fortran("freadmm5", filename = as.character("mmout"),
array(as.single(0), c(157,109))
This gives a array which is nearly half empty when the subroutine can
read the full array. I though it is because of R...