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

	
21

	
            # Macro for geologic strike/dip takes strike (azimuth) and dip (angle) from input file
N:	2	ao
# First rotate so strike is horizontal
$1	R
90	R
# Draw the strike line
-0.5	0	M
0.5	0	D
S
# Draw the dip line
0	0	M
0	0.25	D
S
# Fill the dip vector head
0	0.25	M
-0.025	0.20	D
0	0.22	D
0.025	0.20	D
# Annotate the dip in blue, embedding the coordinates of the point
T	-Gblue -W-
0	0.3	0.1	[%Y,\040%X]:\040dip\040=\040$2\312	l+jBC