maxrjones
/
gmt-fork
mirror of https://github.com/meghanrjones/gmt.git


  
1

	
2

	
3

	
4

	
5

	
6

	
7

	
8

	
9

	
10

	
11

	
12

	
13

	
14

	
15

	
16

	
17

	
18

	
19

	
20

	
            #!/bin/bash
#	$Id$
# Testing gmt grdfft

ps=gfilter.ps
gmt set GMT_FFT kiss

topo="${src:-.}"/../../doc/examples/ex38/topo.nc

# Do a 100 km Gaussian filter on some topography
gmt grdfft ${topo} -fg -F-/100000 -Glow.nc -N+l
gmt makecpt -Crainbow -T0/1700 > t.cpt
gmt grdgradient ${topo} -Nt1 -fg -A45 -Gitopo.nc
gmt grdgradient low.nc -Nt1 -fg -A45 -Gilow.nc
gmt grdimage ${topo} -Iitopo.nc -Ct.cpt -JM6i -Y6i -Xc -K -P -B5 -BWSne > $ps
echo "315 -10 Original" | gmt pstext -R${topo} -J -O -K -F+jTR+f14p -T -Gwhite -W1p -Dj0.1i >> $ps
gmt grdimage low.nc -Iilow.nc -Ct.cpt -J -Y-4.6i -K -O -B5 -BWSne >> $ps
echo "315 -10 100 km Gaussian" | gmt pstext -R -J -O -K -F+jTR+f14p -T -Gwhite -W1p -Dj0.1i >> $ps
gmt psscale -D3i/-0.4i+w5i/0.15i+h+jTC+e+n -O -Ct.cpt -B500 >> $ps