From ecce03e3b21894da6a79b3111614884acc1e1211 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 2 Mar 2019 18:05:06 +0000
Subject: [PATCH] dwdyke wip

---
 Parse.pm    |  3 ++-
 input-graph | 10 +++++-----
 2 files changed, 7 insertions(+), 6 deletions(-)

diff --git a/Parse.pm b/Parse.pm
index 30648ba..205a0d3 100644
--- a/Parse.pm
+++ b/Parse.pm
@@ -59,7 +59,8 @@ sub read_in () {
       $cregion = $name;
       next;
     }
-    if (my ($aref, $adykes) = m{^\t\t(\S.*[A-Za-z.]|L2?)(?: (\+\+?))?$}) {
+    if (my ($aref, $adykes, $dwdyke) =
+	m{^\t\t(\S.*[A-Za-z.]|L2?)(?: (\+\+?)(\@?))?$}) {
       my $adj = { Dykes => (length $adykes // 0), L => $. };
       if ($aref =~ m{\.}) {
 	$adj->{Pattern} = $aref;
diff --git a/input-graph b/input-graph
index 80e3e43..7627a07 100644
--- a/input-graph
+++ b/input-graph
@@ -195,18 +195,18 @@ red
 		H.W.
 		Voorne-Putten +
 	Voorne-Putten
-		NZ +
+		NZ +@
 		D. +
 		H.W. +
 		Goeree-Overflakkee +
 	Goeree-Overflakkee
-		NZ +
+		NZ +@
 		V.-P. +
 		H.W.
 		W-B. +
 		Schouwen-Duiveland +
 	Schouwen-Duiveland
-		NZ +
+		NZ +@
 		G-O. +
 		W-B. +
 		De Zoom
@@ -219,12 +219,12 @@ red
 		Zeeuws-Vlaanderen +
 		Walcheren +
 	Zeeuws-Vlaanderen
-		Z-B. +
+		Z-B. +@
 		L
 		NZ +
 		Walcheren +
 	Walcheren
-		NZ +
+		NZ +@
 		S-D.
 		Z-B. +
 		Z-V. +
-- 
2.30.2