equal
deleted
inserted
replaced
1 #====================================================================== |
1 #====================================================================== |
2 # L I B G M T . P L |
2 # L I B G M T . P L |
3 # doc: Sun Jun 14 13:45:47 2015 |
3 # doc: Sun Jun 14 13:45:47 2015 |
4 # dlm: Sat Apr 10 07:36:13 2021 |
4 # dlm: Sun Apr 11 09:55:22 2021 |
5 # (c) 2015 A.M. Thurnherr |
5 # (c) 2015 A.M. Thurnherr |
6 # uE-Info: 206 33 NIL 0 0 72 2 2 4 NIL ofnI |
6 # uE-Info: 47 34 NIL 0 0 72 2 2 4 NIL ofnI |
7 #====================================================================== |
7 #====================================================================== |
8 |
8 |
9 # perl implementation of /Data/Makefiles/Makefile.GMT |
9 # perl implementation of /Data/Makefiles/Makefile.GMT |
10 |
10 |
11 #---------------------------------------------------------------------- |
11 #---------------------------------------------------------------------- |
42 # - simplified GMT_unitcoords() |
42 # - simplified GMT_unitcoords() |
43 # Jul 28, 2015: - added GMT_setAnnotFontSize(), GMT_psscale() |
43 # Jul 28, 2015: - added GMT_setAnnotFontSize(), GMT_psscale() |
44 # Mar 16, 2016: - adapted to GMT5 |
44 # Mar 16, 2016: - adapted to GMT5 |
45 # Mar 17, 2016: - added check for gmt5 on load |
45 # Mar 17, 2016: - added check for gmt5 on load |
46 # Apr 10, 2021: - adapted to GMT6 (suppress warnings) |
46 # Apr 10, 2021: - adapted to GMT6 (suppress warnings) |
|
47 # Apr 11, 2021: - added gmt set GMT_AUTO_DOWNLOAD off |
47 |
48 |
48 $DEBUG = 0; |
49 $DEBUG = 0; |
49 |
50 |
50 #---------------------------------------------------------------------- |
51 #---------------------------------------------------------------------- |
51 # Make sure gmt6 is installed |
52 # Make sure gmt6 is installed |
110 croak("/tmp/antsGMT.$$: $!\n"); |
111 croak("/tmp/antsGMT.$$: $!\n"); |
111 system("rm -f .gmt* |
112 system("rm -f .gmt* |
112 gmt set PROJ_LENGTH_UNIT cm PS_MEDIA letter \\ |
113 gmt set PROJ_LENGTH_UNIT cm PS_MEDIA letter \\ |
113 FONT_LABEL ${LABEL_FONT_SIZE} \\ |
114 FONT_LABEL ${LABEL_FONT_SIZE} \\ |
114 FONT_ANNOT_PRIMARY ${ANNOT_FONT_SIZE} \\ |
115 FONT_ANNOT_PRIMARY ${ANNOT_FONT_SIZE} \\ |
|
116 GMT_AUTO_DOWNLOAD off \\ |
115 FORMAT_GEO_MAP ddd:mm:ssF") && |
117 FORMAT_GEO_MAP ddd:mm:ssF") && |
116 croak("gmt set failed\n"); |
118 croak("gmt set failed\n"); |
117 $GMT_plotfile = "$ENV{PWD}/$pfn"; |
119 $GMT_plotfile = "$ENV{PWD}/$pfn"; |
118 GMT_setJ($J); GMT_setR($R); |
120 GMT_setJ($J); GMT_setR($R); |
119 GMT_spawn("| gmt psxy -Ve -K $J $R $extra > $GMT_plotfile"); |
121 GMT_spawn("| gmt psxy -Ve -K $J $R $extra > $GMT_plotfile"); |