#!/bin/tcsh

#-------------------------------------------------------
# GMT .conf
#-------------------------------------------------------
gmt gmtset PS_MEDIA A3
gmt gmtset FORMAT_DATE_MAP dd/mm/yyyy
gmt gmtset FONT_TITLE 18p,Helvetica-Bold,black
gmt gmtset FONT_LABEL 18p,Helvetica,black
gmt gmtset FONT_ANNOT_PRIMARY 18p,Helvetica,black
gmt gmtset FORMAT_GEO_MAP ddd:mmF
gmt gmtset PS_PAGE_ORIENTATION portrait
gmt gmtset MAP_FRAME_TYPE plain
gmt gmtset MAP_FRAME_PEN 0.9p


# Open bounds file and read in variables
#
set bds=`cat bound-18kmgrid.gmt`     # look here! have to use correct bound-file!
#
set bounds = "-R${bds[1]}/${bds[2]}/${bds[3]}/${bds[4]}"
set proj = "-JM13"   #${bds[1]}/${bds[2]}/${bds[3]}/${bds[4]}/2.3"
set psfile = "plotgmt.ps"
 gmt makecpt -Chaxby -T0.5/5/0.125 -I > test.cpt  # -I for inverse colorscale; -Z for continuous
# possible color scales: humidity, haxby, batlow

@ counter = 0

find outxyz -type f -name "*-vs.xyz" | sort -n > infiles.tmp    # look here!
foreach xyzfile (  `cat infiles.tmp  `)
	@ counter ++
	set outbn = `echo $xyzfile | awk -F\- '{print $1}'`
	echo $outbn
	gmt xyz2grd $xyzfile -G$outbn.grd -I${bds[5]}/${bds[6]} $bounds
	gmt grd2xyz $outbn.grd > $outbn-new.xyz
	cat $outbn-new.xyz | awk '$3<2.79 || $3>2.81 {print $1,$2,$3 }' > test1
	gmt xyz2grd test1 -Gtest1.grd -I${bds[5]}/${bds[6]} $bounds
	gmt nearneighbor test1 -G$outbn-nn.grd -I5m -N4/1 -S4m $bounds
	
	gmt pscoast $bounds $proj -I1 -W -G230/230/230 -A2 -Dh -K > $psfile
	gmt grdimage $outbn-nn.grd $bounds $proj -Ctest.cpt -K -O -Q -nl>> $psfile  #  -Cvelgradabs1-tele.cpt
#	gmt psscale -Ctest.cpt -Bxa1f0.5 -By+l"Vs [km/s]" -Dx1c/-1.1c+w10.00c/0.25c+ef+h -O -K  >> $psfile
	
	# get layer annotation from txt-file (layer-depth.txt or *-thinl.txt)
	cat layer-depth-final.txt | awk -v "var=$counter" '{if (NR == var){print "3.2 46.3" , $0}}' | gmt pstext $bounds $proj -D0.0/0.0 -G255/255/255 -F+f18p,Helvetica+jML -W -O -K  >> $psfile
#	
	#gmt psxy rays.dat $bounds $proj -W0.25 -O -K -P >> $psfile
	gmt psxy /home/felixw/Programme/FMST/Tomo_LiguSea/receivers-gmt.dat $bounds $proj -: -St0.3 -G50/50/200 -W0.5 -O -K  >> $psfile
	gmt pscoast $bounds $proj -W  -Dh -O -K >> $psfile
	gmt psbasemap $proj $bounds -Ba2f1/a2f1 -O >> $psfile
	
	set outname = "$outbn-vs"   # look here!
	gmt psconvert $psfile -Tf -A2p/7p/2p/8p -F$outname   # -Dpath   #WESN
	rm -f $psfile
	rm -f $outbn-new.xyz $outbn.grd $outbn-nn.grd

end
