Detect Core Paths in Scotland

which only have "Core Path..." set in the `ref`.

Author: Andy Townsend

changelog.md

@@ -11,6 +11,7 @@ This page describes changes made in these projects: [SomeoneElse-style](https://
 (raster, vector) Handle more semicolon values.  Apart from some special cases, shops with semicolon values just use the first part.
 (raster) Show access=no and access=destination on roads shown as unpaved (no change needed to vector - that was already OK)
 (raster, vector) Change squiggly brackets at the start of appended bridge refs to round brackets.
+(raster, vector) Detect Core Paths in Scotland which only have "Core Path..." set in the `ref`.
 
 ## 03/07/2025
 (raster, vector) Show `wheelchair` flash on `amenity=fast_food` with `cuisine=kebab`, `cuisine=mexican` and synonyms.

shared_lua.lua

@@ -504,6 +504,30 @@ function consolidate_lua_01_t( passedt )
       passedt.trail_visibility = "intermediate"
    end
 
+-- ----------------------------------------------------------------------------
+-- Core path numbers in Scotland are often stored in "ref" as "Core Path XXX"
+-- rather than as prow_ref as elsewhere.
+--
+-- For a highway with a ref, if designation and prow_ref are unset, and
+-- if the ref starts with "Core Path", then set the designation to "core_path"
+-- and set prow_ref.
+-- 
+-- This lifts the path out of e.g. the low visibility check below.
+-- ----------------------------------------------------------------------------
+    if ((  passedt.ref         ~= nil                      ) and
+        (  passedt.highway     ~= nil                      ) and
+        (  passedt.highway     ~= ""                       ) and
+        (( passedt.designation == nil                     )  or
+         ( passedt.designation == ""                      )  or
+         ( passedt.designation == "core_path"             )) and
+        (( passedt.prow_ref    == nil                     )  or
+         ( passedt.prow_ref    == ""                      )) and
+        (  string.find( passedt.ref, "Core Path", 1, true ))) then
+        passedt.designation = "core_path"
+        passedt.prow_ref = passedt.ref
+        passedt.ref = nil
+    end
+
 -- ----------------------------------------------------------------------------
 -- Suppress non-designated very low-visibility paths
 -- Various low-visibility trail_visibility values have been set to "bad" above