From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 10 Mar 2019 19:43:46 +0000 (+0000)
Subject: move into misc-data.pl: OuterCoastDelta rename
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ian/git?a=commitdiff_plain;h=6867d04c0b37e26207137452370f2a4fa557b492;p=pandemic-rising-tide.git

move into misc-data.pl: OuterCoastDelta rename

NFC
---

diff --git a/generate-board b/generate-board
index b48f8bc..03d5ae7 100755
--- a/generate-board
+++ b/generate-board
@@ -272,7 +272,7 @@ sub adjust_sea() {
     next unless $occurs_m->($ei);
     #print STDERR " sea occurs_m $ei $poly->[$ei]{VxName}\n";
     next unless $occurs_m->($ei-1);
-    my $dleft = &mkvec(@{ $c{PA}{OuterCoastDelta} });
+    my $delta = &mkvec(@{ $c{PA}{OuterCoastDelta} });
     foreach my $which (0,-1) {
       my $ej = ($ei +        $which + @$poly) % @$poly;
       my $ek = ($ei + +1 + 3*$which + @$poly) % @$poly;
@@ -287,7 +287,7 @@ sub adjust_sea() {
 	  $$posk = $$posj + 10 * &mkvec(@{ $paocv->{PA} });
 	}
       }
-      $$posj = $$posj + $dleft + $dout*10;
+      $$posj = $$posj + $delta + $dout*10;
       $$posk = $$posk          + $dout*10;
     }
   }