1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
|
@echo off
REM GMT EXAMPLE 17
REM
REM $Id: example_17.bat 16792 2016-07-13 21:12:21Z pwessel $
REM
REM Purpose: Illustrates clipping of images using coastlines
REM GMT progs: grd2cpt, grdgradient, grdimage, pscoast, pstext
REM DOS calls: del, echo
REM
echo GMT EXAMPLE 17
set ps=example_17.ps
REM First generate geoid image w/ shading
gmt grd2cpt india_geoid.nc -Crainbow > geoid.cpt
gmt grdgradient india_geoid.nc -Nt1 -A45 -Gindia_geoid_i.nc
gmt grdimage india_geoid.nc -Iindia_geoid_i.nc -JM6.5i -Cgeoid.cpt -P -K > %ps%
REM Then use gmt pscoast to initiate clip path for land
gmt pscoast -Rindia_geoid.nc -J -O -K -Dl -Gc >> %ps%
REM Now generate topography image w/shading
gmt makecpt -C150 -T-10000,10000 -N > shade.cpt
gmt grdgradient india_topo.nc -Nt1 -A45 -Gindia_topo_i.nc
gmt grdimage india_topo.nc -Iindia_topo_i.nc -J -Cshade.cpt -O -K >> %ps%
REM Finally undo clipping and overlay basemap
gmt pscoast -R -J -O -K -Q -B10f5 -B+t"Clipping of Images" >> %ps%
REM Put a color legend on top of the land mask
gmt psscale -DjTR+o0.3i/0.1i+w4i/0.2i+h -R -J -Cgeoid.cpt -Bx5f1 -By+lm -I -O -K >> %ps%
REM Add a text paragraph (Note double %% to get a single % in DOS)
echo 62 | gawk "{printf \"%%c 90 -10 12p 3i j\n\", $1}" > tmp
echo @_@%%5%%Example 17.@%%%%@_ We first plot the color geoid image >> tmp
echo for the entire region, followed by a gray-shaded @#etopo5@# >> tmp
echo image that is clipped so it is only visible inside the coastlines. >> tmp
gmt pstext -R -J -O -M -Gwhite -Wthinner -TO -D-0.1i/0.1i tmp -F+f12,Times-Roman+jRB >> %ps%
REM Clean up
del *.cpt
del *_i.nc
del tmp
del .gmt*
|
