老师发了个FORTRAN程序给我，可是看不懂。

_______Ζero

shishuilingshan 发表于 2015-5-5 10:40
学渣真的也是看哭。。。。

终于遇到一个好朋友。。。大家都说好简单让我好自卑。。

梦纯

_______Ζero 发表于 2015-5-5 20:39
大神问件事儿噢。。。我写出来的so2.txt等等一系列，显示的数字都是1.2834267E-22等等特别小或者特别大的 ...

byteswap的原因吧。

给你个子程序，调用一下CALL SWAP4（你的变量），试试
!
!**********************************************************************
! Swaps the byte order of a 4-byte integer (big endian<->little endian).
! This seems to be necessary only for some data.           
!**********************************************************************
!
subroutine swap4(in)
real in,out
byte bout(4),b
equivalence(out,bout)
out=in
b=bout(1)
bout(1)=bout(4)
bout(4)=b
b=bout(2)
bout(2)=bout(3)
bout(3)=b
in=out
end subroutine swap4
                           

nbkiss4y

哈哈虽然我也不懂，但是还是支持一下哈

dreamgirl

学渣真的不懂fortran