此程序用fortran2003实现了对地震数据SEG-Y格式的读取。使用了fortran2003的一个新特性，流访问模式。

值得一提的是，在输出文件时，实现了自动化生成格式控制符。

程序存在的不足是，文件的字节大小得提前确定，不管用什么方式获取文件的大小都行，我用的方法是直接在windows下面通过查看sgy文件属性获得的。-



This program read the Seismic SEG-Y data with Fortran 90 modified from C, see the URL



http://wenku.baidu.com/link?url=jnBNLV1A0K1N_tZ_AOFfWKG1f5hHAedi0PJbbTkbjSLRLigQUhgT0aWyLy2ILi-F1AKxIyVL0eEy0HXfh-i7Cc4L7tEYtaRx-QpiU2WEUUi



The format document of SEG-Y data is included.



With the new feature of Fortran03, reading data with "stream" is used.



A self-defining function of Checking the digits of a number( integer or real) is used to impliment the automation of output format



However, the byte-size of a SEG-Y data must be specified, by anyway, before you run this program.