#rm sunfil.ras
sioseis << eof
procs diskin weight agc plot end
diskin
fno 9001 lno 9001
ipath day203-1413zRen.segy end
fno 9301 lno 9301
ipath day203-1440zRen.segy end
fno 9601 lno 9601
ipath day203-1505zRen.segy end
end
weight
fno 1 lno 999999 ! note this must be given
! gmk weights
twp 19 0 20 0 24 0 31 0 32 0 33 0 34 0 48 0 end
! pch weights
! twp 19 0 20 0 29 0 31 0 32 0 33 0 34 0 end
end
agc
winlen 1 end
end
plot
ann2 GMT ann sh&tr
trpin 20 nspace 2 fspace 48 spacei 48
nibs 2858 srpath sunfil.ras taginc 2
! change def from .02 to .01
def .01 clip .1 nsecs 2.5 vscale 1.25
end
end
end
eof
convert -rotate 90 sunfil.ras gmk_weighted.png
display gmk_weighted.png &