From df7c69b16ce45ae842981eb2ed02be08bc6f1135 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 3 Mar 2019 16:23:09 +0000
Subject: [PATCH] multiple triangles

---
 generate-board | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/generate-board b/generate-board
index 8a4abfd..2f08a84 100755
--- a/generate-board
+++ b/generate-board
@@ -683,14 +683,17 @@ sub dykes(){
 	  o("    gsave 0 ", $y * $w, " translate dyke ");
 	  o(" grestore\n");
 	}
-	my $nsymbols = !!$initial + !!$adj->{Deltawerk};
+	my $nsymbols = $initial + !!$adj->{Deltawerk};
 	o("   ", -0.5 * $symbol_sz * ($nsymbols-1)," 0 translate\n");
 	my $trans = "  $symbol_sz 0 translate";
 	if ($adj->{Deltawerk}) {
 	  one_hs('red', mkvec(0,0), $symbol_sz * 0.8, $lw);
 	  o($trans);
 	}
-	o(" gsave $angle neg rotate dtriangle grestore\n");
+	foreach my $i (1..$initial) {
+	  o(" gsave $angle neg rotate dtriangle grestore\n");
+	  o($trans);
+	}
       }
       o("  grestore\n");
     }
-- 
2.30.2