--[==[ To inspect the content of this data module, use [[Special:ExpandTemplates]]and enter the following input text:
To inspect the content of this data module when editing, enter the followinginto the Debug console: local util = require("Module:Road data/util") print(util.arrayToString(p))To inspect a particular route type, change `p` above to include the route type e.g., `p.I` and `p["US-Hist"]`.]
-- Pennsylvanialocal PA =
local format = mw.ustring.formatlocal util = require("Module:Road data/util")util.addAll(PA, require("Module:Road data/strings/USA"))
local suffix = " ([dab||%dab%, |]Pennsylvania)"local maint = "PennDOT"
PA.I.link = "Interstate %route% (Pennsylvania)"
for k, v in pairs(PA) do if k:find ("^I") then v.link = PA.I.link endend
PA.BL.link = "Interstate %route% Business ([dab||%dab%, |]Pennsylvania)"
for k, v in pairs(PA) do if k:find ("^BL") then v.link = PA.BL.link endend
PA.US.link =
for k, v in pairs(PA) do if k:find ("^US %d") then v.name = PA.US.name v.link = PA.US.link endend
for _,auxType in ipairs do local spec = PA[" aux "][auxType] for k, v in pairs(PA) do if k:find (auxType) then if k:find ("^US") then v.name = PA.US.name .. " " .. spec.name v.link = PA.US.base .. " " .. spec.name .. " ([dab||%dab%, |]Pennsylvania)" end end endendPA["US 1948"].bannersuffix = "1948"PA["US 1961"].shield = "US %route% (1961 cutout).svg"PA["US 1961"].bannersuffix = "1961" PA["US-Truck-Alt"] = PA["US-Alt-Truck"] = PA["US-Truck-Alt"] PA["US-Bus-Alt-Truck"] = PA["US-Bus-Truck-Alt"] = PA["US-Bus-Alt-Truck"]
for _,year in ipairs do for _,auxType in ipairs do local type = "US " .. year local spec = PA[" aux "][auxType] PA[type .. "-" .. auxType] = endend
PA.SR = PA.PA = PA.SR
for _,type in ipairs do for _,year in ipairs do PA[type .. " " .. year] = endend
for _,type in ipairs do for _,auxType in ipairs do local spec = PA[" aux "][auxType] PA[type .. "-" .. auxType] = endend
for _,type in ipairs do for _,year in ipairs do for _,auxType in ipairs do local type = type .. " " .. year local spec = PA[" aux "][auxType] PA[type .. "-" .. auxType] = end endend
for _,type in ipairs do for _,year in ipairs do for _,auxType in ipairs do local type = type .. " " .. year local spec = PA[" aux "][auxType] PA[type .. "-" .. auxType] = end endend
for _,type in ipairs do for _,year in ipairs do for _,auxType in ipairs do local type = type .. " " .. year local spec = PA[" aux "][auxType] PA[type .. "-" .. auxType] = end endend
PA["SR-Truck-Alt"] =
PA["PA-Truck-Alt"] = PA["SR-Truck-Alt"]PA["SR-Alt-Truck"] = PA["SR-Truck-Alt"]PA["PA-Alt-Truck"] = PA["SR-Truck-Alt"]
PA.SBR =
PA.QR =
-- add new types above this line if you want it to have the state highway browse and maintfor k, v in pairs(PA) do if k:find ("^%a") then v.maint = "PennDOT" endend
for k, v in pairs(PA) do if k:find ("^%a+ %d") then v.maint = "Pennsylvania Department of Highways" endend
PA.PATP = PA.Turnpike = PA.PATP
PA.PANE =
PA.Toll =
PA["Toll2"] =
PA["PA-Toll"] =
PA.Belt =
PA.DE = PA.MD = PA.NJ = PA.NJTP = PA["I-NJ"] =
return PA