dykepath nfc

diff --git a/generate-board b/generate-board
index 0f54fe67a9848c6eb0dddc86caf9b5edaf5b7602..c74392da9feeaeb3b86047a23f58d467e43953bd 100755 (executable)
--- a/generate-board
+++ b/generate-board
@@ -588,11 +588,14 @@ sub dykes(){
   my $lw = $edge_lw * 0.50;
   my $l2 = $l/2;
   my $w2 = $w/2;
-  o("  /dyke {\n");
-  o("    newpath -$l2 -$w2 moveto\n");
+  o("  /dykepath {\n");
+  o("            -$l2 -$w2 moveto\n");
   o("             $l2 -$w2 lineto\n");
   o("             $l2  $w2 lineto\n");
   o("            -$l2  $w2 lineto closepath\n");
+  o("  } bind def\n");
+  o("  /dyke {\n");
+  o("    newpath dykepath\n");
   o("    gsave 0.50 setgray fill grestore\n");
   o("    gsave 0.00 setgray $lw setlinewidth stroke grestore\n");
   o("  } bind def\n");