?? xdemo
字號(hào):
#! /bin/sh# Investigate data with sugabor to ascertain a time-varying filter# for sutvbandWIDTH=600HEIGHT=450WIDTHOFF1=0WIDTHOFF2=640HEIGHTOFF1=50HEIGHTOFF2=530# Spectrum of raw datasuspecfx <data.su |suxmovie \ title="FX spectrum" \ windowtitle="FX"\ label1="Freq (Hz)" label2="Offset (km)" \ -geometry ${WIDTH}x${HEIGHT}+${WIDTHOFF1}+${HEIGHTOFF1} &perc=90suspecfx <data.su |suxmovie perc=$perc\ title="FX spectrum: perc=$perc" \ windowtitle="FX perc=$perc" \ label1="Freq (Hz)" label2="Offset (km)" \ -geometry ${WIDTH}x${HEIGHT}+${WIDTHOFF2}+${HEIGHTOFF1} &suxmovie <data.su perc=$perc \ title="Data perc=$perc" \ windowtitle="Data: perc=$perc" \ label1="Freq (Hz)" label2="Offset (km)" \ -geometry ${WIDTH}x${HEIGHT}+${WIDTHOFF1}+${HEIGHTOFF2} &# do trial and error to ascertain band and fmax and let sugabor tell n2sugabor <data.su band=3 fmax=100 |suxmovie n1=2000 n2=33 n3=97 perc=99 loop=1 \ title="Gabor Transform of Trace %g" \ windowtitle="Gabor Movie" \ label1="Time (sec)" label2="Freq (Hz)" \ -geometry ${WIDTH}x${HEIGHT}+${WIDTHOFF2}+${HEIGHTOFF2} &exit 0perc=90 # accept value in booktpow=3.2 # accept value in oz25.Hf=0,15,25,30amps=0.,0.,1.,1.sufilter <data.su f=$f amps=$amps |sugain tpow=$tpow |suxmovie perc=$perc \ title="f=$f + gain"\ label1="Time (sec)" label2="Offset (km)" \ -geometry ${WIDTH}x${HEIGHT}+${WIDTHOFF2}+${HEIGHTOFF2} &exit?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -