sconstruct

来自「国外免费地震资料处理软件包」· 代码 · 共 22 行

#########################
#      Pluto Data       #
#########################
from rsfproj import *

#------- Define Variables and Filenames ------#
data = 'data.H'

#------------- Import Data -------------------#
#-- Uses ftp program Fetch
Fetch(data ,'pluto')

#----------  Convert Data --------------------#
Flow('shot',data,
     '''
     dd form=native
     ''')

#---------------- Plot Data ---------------#
Result('shot','window j3=20 | grey gainpanel=a')
End()