#! /bin/sh

# "dip" = below head
# "swell" = edge of head
# "notch" = break in swell
# "tip" = rounded end
# "dimple" = concavity at end of tip

# count, triangles per ring
nring=15

# count, rings in main shaft
shaftrings=15

# count, rings in dip
diprings=3

# count, rings in swell
swellrings=4

# count, rings in tip
tiprings=5

# count, rings in dimple
dimplerings=3

# distance
radius=1

# distance
length=10

# degrees above horizontal
upslant=15

# 0=straight, 1=limp
limpness=.3

# degrees, 0=straight across
headslant=60

# percent of radius
dip=95

# distance, swell edge to min radius
diplen1=.2

# distance, min radius to main shaft
diplen2=.3

# percent of radius
swell=115

# distance, radius of curvature of swell edge
swellround=.1

# distance, notch to tip
tiplen=.2

# radius of curvature of tip
tipround=.3

# circumferential degrees, middle to edge
notchwidth=5

# distance, offset from centreline towards notch
dimpleoffset=0

# distance, length of dimple (long dimension, towards notch)
dimplelen=.3

# distance, width of dimple (short dimension, perpendicular to notch direction)
dimplewidth=.1

# distance, depth of dimple's concavity
dimpledepth=.1


gen-m \
	$nring			\
	$shaftrings		\
	$diprings		\
	$swellrings		\
	$tiprings		\
	$dimplerings		\
	$radius			\
	$length			\
	$upslant		\
	$limpness		\
	$headslant		\
	$dip			\
	$diplen1		\
	$diplen2		\
	$swell			\
	$swellround		\
	$tiplen			\
	$tipround		\
	$notchwidth		\
	$dimpleoffset		\
	$dimplelen		\
	$dimplewidth		\
	$dimpledepth