# $Id$
# Macro for geologic strike/dip takes strike (geoangle) and dip (angle) from input file
N:	2	ao
# First rotate so strike is horizontal
$1	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