From c152777e6c21c8bde6fa116d85ba69050294e32a Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Fri, 1 Mar 2019 14:01:44 +0000
Subject: [PATCH] bodge NZ north coast

---
 generate-board | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/generate-board b/generate-board
index dc5fcd8..12575bd 100755
--- a/generate-board
+++ b/generate-board
@@ -252,6 +252,10 @@ sub adjust_nz() {
       my $dout = $$posk - $$posj;
       print STDERR " nz adj j=$ej ",prvec($$posj)," $poly->[$ej]{VxName}\n";
       print STDERR " nz adj k=$ek ",prvec($$posk)," $poly->[$ek]{VxName}\n";
+      if ($poly->[$ej]{VxName} =~ /Noorderzijlvest/) {
+	print STDERR " nz adj extra\n";
+	$$posk = $$posj + 10 * mkvec(100,-50);
+      }
       $$posj = $$posj + $dleft + $dout*10;
       $$posk = $$posk          + $dout*10;
     }
-- 
2.30.2