Diff: Module:Wd

-- Original module located at [[:en:Module:Wd]] and [[:en:Module:Wd/i18n]].

-- Original module located at [[:en:Module:Wd]] and [[:en:Module:Wd/i18n]].

require("strict")

require("strict")

local p = {}

local p = {}

local arg = ...

local arg = ...

local i18n

local i18n

local function loadI18n(aliasesP, frame)

local function loadI18n(aliasesP, frame)

	local title

	local title

	if frame then

	if frame then

		-- current module invoked by page/template, get its title from frame

		-- current module invoked by page/template, get its title from frame

		title = frame:getTitle()

		title = frame:getTitle()

	else

	else

		-- current module included by other module, get its title from ...

		-- current module included by other module, get its title from ...

		title = arg

		title = arg

	end

	end

	if not i18n then

	if not i18n then

		i18n = require(title .. "/i18n").init(aliasesP)

		i18n = require(title .. "/i18n").init(aliasesP)

	end

	end

end

end

p.claimCommands = {

p.claimCommands = {

	property   = "property",

	property   = "property",

	properties = "properties",

	properties = "properties",

	qualifier  = "qualifier",

	qualifier  = "qualifier",

	qualifiers = "qualifiers",

	qualifiers = "qualifiers",

	reference  = "reference",

	reference  = "reference",

	references = "references"

	references = "references"

}

}

p.generalCommands = {

p.generalCommands = {

	label       = "label",

	label       = "label",

	title       = "title",

	title       = "title",

	description = "description",

	description = "description",

	alias       = "alias",

	alias       = "alias",

	aliases     = "aliases",

	aliases     = "aliases",

	badge       = "badge",

	badge       = "badge",

	badges      = "badges"

	badges      = "badges"

}

}

p.flags = {

p.flags = {

	linked        = "linked",

	linked        = "linked",

	short         = "short",

	short         = "short",

	raw           = "raw",

	raw           = "raw",

	multilanguage = "multilanguage",

	multilanguage = "multilanguage",

	unit          = "unit",

	unit          = "unit",

	-------------

	-------------

	preferred     = "preferred",

	preferred     = "preferred",

	normal        = "normal",

	normal        = "normal",

	deprecated    = "deprecated",

	deprecated    = "deprecated",

	best          = "best",

	best          = "best",

	future        = "future",

	future        = "future",

	current       = "current",

	current       = "current",

	former        = "former",

	former        = "former",

	edit          = "edit",

	edit          = "edit",

	editAtEnd     = "edit@end",

	editAtEnd     = "edit@end",

	mdy           = "mdy",

	mdy           = "mdy",

	single        = "single",

	single        = "single",

	sourced       = "sourced"

	sourced       = "sourced"

}

}

p.args = {

p.args = {

	eid  = "eid",

	eid  = "eid",

	page = "page",

	page = "page",

	date = "date",

	date = "date",

	globalSiteId = "globalSiteId"

	globalSiteId = "globalSiteId"

}

}

local aliasesP = {

local aliasesP = {

	coord                   = "P625",

	coord                   = "P625",

	-----------------------

	-----------------------

	image                   = "P18",

	image                   = "P18",

	author                  = "P50",

	author                  = "P50",

	authorNameString        = "P2093",

	authorNameString        = "P2093",

	publisher               = "P123",

	publisher               = "P123",

	importedFrom            = "P143",

	importedFrom            = "P143",

	wikimediaImportURL      = "P4656",

	wikimediaImportURL      = "P4656",

	statedIn                = "P248",

	statedIn                = "P248",

	pages                   = "P304",

	pages                   = "P304",

	language                = "P407",

	language                = "P407",

	hasPart                 = "P527",

	hasPart                 = "P527",

	publicationDate         = "P577",

	publicationDate         = "P577",

	startTime               = "P580",

	startTime               = "P580",

	endTime                 = "P582",

	endTime                 = "P582",

	chapter                 = "P792",

	chapter                 = "P792",

	retrieved               = "P813",

	retrieved               = "P813",

	referenceURL            = "P854",

	referenceURL            = "P854",

	sectionVerseOrParagraph = "P958",

	sectionVerseOrParagraph = "P958",

	archiveURL              = "P1065",

	archiveURL              = "P1065",

	title                   = "P1476",

	title                   = "P1476",

	formatterURL            = "P1630",

	formatterURL            = "P1630",

	quote                   = "P1683",

	quote                   = "P1683",

	shortName               = "P1813",

	shortName               = "P1813",

	definingFormula         = "P2534",

	definingFormula         = "P2534",

	archiveDate             = "P2960",

	archiveDate             = "P2960",

	inferredFrom            = "P3452",

	inferredFrom            = "P3452",

	typeOfReference         = "P3865",

	typeOfReference         = "P3865",

	column                  = "P3903",

	column                  = "P3903",

	subjectNamedAs          = "P1810",

	subjectNamedAs          = "P1810",

	wikidataProperty        = "P1687",

	wikidataProperty        = "P1687",

	publishedIn             = "P1433"

	publishedIn             = "P1433"

}

}

local aliasesQ = {

local aliasesQ = {

	percentage              = "Q11229",

	percentage              = "Q11229",

	prolepticJulianCalendar = "Q1985786",

	prolepticJulianCalendar = "Q1985786",

	citeWeb                 = "Q5637226",

	citeWeb                 = "Q5637226",

	citeQ                   = "Q22321052"

	citeQ                   = "Q22321052"

}

}

local parameters = {

local parameters = {

	property  = "%p",

	property  = "%p",

	qualifier = "%q",

	qualifier = "%q",

	reference = "%r",

	reference = "%r",

	alias     = "%a",

	alias     = "%a",

	badge     = "%b",

	badge     = "%b",

	separator = "%s",

	separator = "%s",

	general   = "%x"

	general   = "%x"

}

}

local formats = {

local formats = {

	property              = "%p[%s][%r]",

	property              = "%p[%s][%r]",

	qualifier             = "%q[%s][%r]",

	qualifier             = "%q[%s][%r]",

	reference             = "%r",

	reference             = "%r",

	propertyWithQualifier = "%p[ <span style=\"font-size:85\\%\">(%q)</span>][%s][%r]",

	propertyWithQualifier = "%p[ <span style=\"font-size:85\\%\">(%q)</span>][%s][%r]",

	alias                 = "%a[%s]",

	alias                 = "%a[%s]",

	badge                 = "%b[%s]"

	badge                 = "%b[%s]"

}

}

local hookNames = {              -- {level_1, level_2}

local hookNames = {              -- {level_1, level_2}

	[parameters.property]         = {"getProperty"},

	[parameters.property]         = {"getProperty"},

	[parameters.reference]        = {"getReferences", "getReference"},

	[parameters.reference]        = {"getReferences", "getReference"},

	[parameters.qualifier]        = {"getAllQualifiers"},

	[parameters.qualifier]        = {"getAllQualifiers"},

	[parameters.qualifier.."\\d"] = {"getQualifiers", "getQualifier"},

	[parameters.qualifier.."\\d"] = {"getQualifiers", "getQualifier"},

	[parameters.alias]            = {"getAlias"},

	[parameters.alias]            = {"getAlias"},

	[parameters.badge]            = {"getBadge"}

	[parameters.badge]            = {"getBadge"}

}

}

-- default value objects, should NOT be mutated but instead copied

-- default value objects, should NOT be mutated but instead copied

local defaultSeparators = {

local defaultSeparators = {

	["sep"]      = {" "},

	["sep"]      = {" "},

	["sep%s"]    = {","},

	["sep%s"]    = {","},

	["sep%q"]    = {"; "},

	["sep%q"]    = {"; "},

	["sep%q\\d"] = {", "},

	["sep%q\\d"] = {", "},

	["sep%r"]    = nil,  -- none

	["sep%r"]    = nil,  -- none

	["punc"]     = nil   -- none

	["punc"]     = nil   -- none

}

}

local rankTable = {

local rankTable = {

	["preferred"]  = 1,

	["preferred"]  = 1,

	["normal"]     = 2,

	["normal"]     = 2,

	["deprecated"] = 3

	["deprecated"] = 3

}

}

local function replaceAlias(id)

local function replaceAlias(id)

	if aliasesP[id] then

	if aliasesP[id] then

		id = aliasesP[id]

		id = aliasesP[id]

	end

	end

	return id

	return id

end

end

local function errorText(code, param)

local function errorText(code, param)

	local text = i18n["errors"][code]

	local text = i18n["errors"][code]

	if param then text = mw.ustring.gsub(text, "$1", param) end

	if param then text = mw.ustring.gsub(text, "$1", param) end

	return text

	return text

end

end

local function throwError(errorMessage, param)

local function throwError(errorMessage, param)

	error(errorText(errorMessage, param))

	error(errorText(errorMessage, param))

end

end

local function replaceDecimalMark(num)

local function replaceDecimalMark(num)

	return mw.ustring.gsub(num, "[.]", i18n['numeric']['decimal-mark'], 1)

	return mw.ustring.gsub(num, "[.]", i18n['numeric']['decimal-mark'], 1)

end

end

local function padZeros(num, numDigits)

local function padZeros(num, numDigits)

	local numZeros

	local numZeros

	local negative = false

	local negative = false

	if num < 0 then

	if num < 0 then

		negative = true

		negative = true

		num = num * -1

		num = num * -1

	end

	end

	num = tostring(num)

	num = tostring(num)

	numZeros = numDigits - num:len()

	numZeros = numDigits - num:len()

	for _ = 1, numZeros do

	for _ = 1, numZeros do

		num = "0"..num

		num = "0"..num

	end

	end

	if negative then

	if negative then

		num = "-"..num

		num = "-"..num

	end

	end

	return num

	return num

end

end

local function replaceSpecialChar(chr)

local function replaceSpecialChar(chr)

	if chr == '_' then

	if chr == '_' then

		-- replace underscores with spaces

		-- replace underscores with spaces

		return ' '

		return ' '

	else

	else

		return chr

		return chr

	end

	end

end

end

local function replaceSpecialChars(str)

local function replaceSpecialChars(str)

	local chr

	local chr

	local esc = false

	local esc = false

	local strOut = ""

	local strOut = ""

	for i = 1, #str do

	for i = 1, #str do

		chr = str:sub(i,i)

		chr = str:sub(i,i)

		if not esc then

		if not esc then

			if chr == '\\' then

			if chr == '\\' then

				esc = true

				esc = true

			else

			else

				strOut = strOut .. replaceSpecialChar(chr)

				strOut = strOut .. replaceSpecialChar(chr)

			end

			end

		else

		else

			strOut = strOut .. chr

			strOut = strOut .. chr

			esc = false

			esc = false

		end

		end

	end

	end

	return strOut

	return strOut

end

end

local function buildWikilink(target, label)

local function buildWikilink(target, label)

	if not label or target == label then

	if not label or target == label then

		return "[[" .. target .. "]]"

		return "[[" .. target .. "]]"

	else

	else

		return "[[" .. target .. "|" .. label .. "]]"

		return "[[" .. target .. "|" .. label .. "]]"

	end

	end

end

end

-- used to make frame.args mutable, to replace #frame.args (which is always 0)

-- used to make frame.args mutable, to replace #frame.args (which is always 0)

-- with the actual amount and to simply copy tables

-- with the actual amount and to simply copy tables

local function copyTable(tIn)

local function copyTable(tIn)

	if not tIn then

	if not tIn then

		return nil

		return nil

	end

	end

	local tOut = {}

	local tOut = {}

	for i, v in pairs(tIn) do

	for i, v in pairs(tIn) do

		tOut[i] = v

		tOut[i] = v

	end

	end

	return tOut

	return tOut

end

end

-- used to merge output arrays together;

-- used to merge output arrays together;

-- note that it currently mutates the first input array

-- note that it currently mutates the first input array

local function mergeArrays(a1, a2)

local function mergeArrays(a1, a2)

	for i = 1, #a2 do

	for i = 1, #a2 do

		a1[#a1 + 1] = a2[i]

		a1[#a1 + 1] = a2[i]

	end

	end

	return a1

	return a1

end

end

local function split(str, del)

local function split(str, del)

	local out = {}

	local out = {}

	local i, j = str:find(del)

	local i, j = str:find(del)

	if i and j then

	if i and j then

		out[1] = str:sub(1, i - 1)

		out[1] = str:sub(1, i - 1)

		out[2] = str:sub(j + 1)

		out[2] = str:sub(j + 1)

	else

	else

		out[1] = str

		out[1] = str

	end

	end

	return out

	return out

end

end

local function parseWikidataURL(url)

local function parseWikidataURL(url)

	local id

	local id

	if url:match('^http[s]?://') then

	if url:match('^http[s]?://') then

		id = split(url, "Q")

		id = split(url, "Q")

		if id[2] then

		if id[2] then

			return "Q" .. id[2]

			return "Q" .. id[2]

		end

		end

	end

	end

	return nil

	return nil

end

end

local function parseDate(dateStr, precision)

local function parseDate(dateStr, precision)

	precision = precision or "d"

	precision = precision or "d"

	local i, j, index, ptr

	local i, j, index, ptr

	local parts = {nil, nil, nil}

	local parts = {nil, nil, nil}

	if dateStr == nil then

	if dateStr == nil then

		return parts[1], parts[2], parts[3]  -- year, month, day

		return parts[1], parts[2], parts[3]  -- year, month, day

	end

	end

	-- 'T' for snak values, '/' for outputs with '/Julian' attached

	-- 'T' for snak values, '/' for outputs with '/Julian' attached

	i, j = dateStr:find("[T/]")

	i, j = dateStr:find("[T/]")

	if i then

	if i then

		dateStr = dateStr:sub(1, i-1)

		dateStr = dateStr:sub(1, i-1)

	end

	end

	local from = 1

	local from = 1

	if dateStr:sub(1,1) == "-" then

	if dateStr:sub(1,1) == "-" then

		-- this is a negative number, look further ahead

		-- this is a negative number, look further ahead

		from = 2

		from = 2

	end

	end

	index = 1

	index = 1

	ptr = 1

	ptr = 1

	i, j = dateStr:find("-", from)

	i, j = dateStr:find("-", from)

	if i then

	if i then

		-- year

		-- year

		parts[index] = tonumber(dateStr:sub(ptr, i-1), 10)  -- explicitly give base 10 to prevent error

		parts[index] = tonumber(dateStr:sub(ptr, i-1), 10)  -- explicitly give base 10 to prevent error

		if parts[index] == -0 then

		if parts[index] == -0 then

			parts[index] = tonumber("0")  -- for some reason, 'parts[index] = 0' may actually store '-0', so parse from string instead

			parts[index] = tonumber("0")  -- for some reason, 'parts[index] = 0' may actually store '-0', so parse from string instead

		end

		end

		if precision == "y" then

		if precision == "y" then

			-- we're done

			-- we're done

			return parts[1], parts[2], parts[3]  -- year, month, day

			return parts[1], parts[2], parts[3]  -- year, month, day

		end

		end

		index = index + 1

		index = index + 1

		ptr = i + 1

		ptr = i + 1

		i, j = dateStr:find("-", ptr)

		i, j = dateStr:find("-", ptr)

		if i then

		if i then

			-- month

			-- month

			parts[index] = tonumber(dateStr:sub(ptr, i-1), 10)

			parts[index] = tonumber(dateStr:sub(ptr, i-1), 10)

			if precision == "m" then

			if precision == "m" then

				-- we're done

				-- we're done

				return parts[1], parts[2], parts[3]  -- year, month, day

				return parts[1], parts[2], parts[3]  -- year, month, day

			end

			end

			index = index + 1

			index = index + 1

			ptr = i + 1

			ptr = i + 1

		end

		end

	end

	end

	if dateStr:sub(ptr) ~= "" then

	if dateStr:sub(ptr) ~= "" then

		-- day if we have month, month if we have year, or year

		-- day if we have month, month if we have year, or year

		parts[index] = tonumber(dateStr:sub(ptr), 10)

		parts[index] = tonumber(dateStr:sub(ptr), 10)

	end

	end

	return parts[1], parts[2], parts[3]  -- year, month, day

	return parts[1], parts[2], parts[3]  -- year, month, day

end

end

local function datePrecedesDate(aY, aM, aD, bY, bM, bD)

local function datePrecedesDate(aY, aM, aD, bY, bM, bD)

	if aY == nil or bY == nil then

	if aY == nil or bY == nil then

		return nil

		return nil

	end

	end

	aM = aM or 1

	aM = aM or 1

	aD = aD or 1

	aD = aD or 1

	bM = bM or 1

	bM = bM or 1

	bD = bD or 1

	bD = bD or 1

	if aY < bY then

	if aY < bY then

		return true

		return true

	end

	end

	if aY > bY then

	if aY > bY then

		return false

		return false

	end

	end

	if aM < bM then

	if aM < bM then

		return true

		return true

	end

	end

	if aM > bM then

	if aM > bM then

		return false

		return false

	end

	end

	if aD < bD then

	if aD < bD then

		return true

		return true

	end

	end

	return false

	return false

end

end

local function getHookName(param, index)

local function getHookName(param, index)

	if hookNames[param] then

	if hookNames[param] then

		return hookNames[param][index]

		return hookNames[param][index]

	elseif param:len() > 2 then

	elseif param:len() > 2 then

		return hookNames[param:sub(1, 2).."\\d"][index]

		return hookNames[param:sub(1, 2).."\\d"][index]

	else

	else

		return nil

		return nil

	end

	end

end

end

local function alwaysTrue()

local function alwaysTrue()

	return true

	return true

end

end

-- The following function parses a format string.

-- The following function parses a format string.

--

--

-- The example below shows how a parsed string is structured in memory.

-- The example below shows how a parsed string is structured in memory.

-- Variables other than 'str' and 'child' are left out for clarity's sake.

-- Variables other than 'str' and 'child' are left out for clarity's sake.

--

--

-- Example:

-- Example:

-- "A %p B [%s[%q1]] C [%r] D"

-- "A %p B [%s[%q1]] C [%r] D"

--

--

-- Structure:

-- Structure:

-- [

-- [

--   {

--   {

--     str = "A "

--     str = "A "

--   },

--   },

--   {

--   {

--     str = "%p"

--     str = "%p"

--   },

--   },

--   {

--   {

--     str = " B ",

--     str = " B ",

--     child =

--     child =

--     [

--     [

--       {

--       {

--         str = "%s",

--         str = "%s",

--         child =

--         child =

--         [

--         [

--           {

--           {

--             str = "%q1"

--             str = "%q1"

--           }

--           }

--         ]

--         ]

--       }

--       }

--     ]

--     ]

--   },

--   },

--   {

--   {

--     str = " C ",

--     str = " C ",

--     child =

--     child =

--     [

--     [

--       {

--       {

--         str = "%r"

--         str = "%r"

--       }

--       }

--     ]

--     ]

--   },

--   },

--   {

--   {

--     str = " D"

--     str = " D"

--   }

--   }

-- ]

-- ]

--

--

local function parseFormat(str)

local function parseFormat(str)

	local chr, esc, param, root, cur, prev, new

	local chr, esc, param, root, cur, prev, new

	local params = {}

	local params = {}

	local function newObject(array)

	local function newObject(array)

		local obj = {}  -- new object

		local obj = {}  -- new object

		obj.str = ""

		obj.str = ""

		array[#array + 1] = obj  -- array{object}

		array[#array + 1] = obj  -- array{object}

		obj.parent = array

		obj.parent = array

		return obj

		return obj

	end

	end

	local function endParam()

	local function endParam()

		if param > 0 then

		if param > 0 then

			if cur.str ~= "" then

			if cur.str ~= "" then

				cur.str = "%"..cur.str

				cur.str = "%"..cur.str

				cur.param = true

				cur.param = true

				params[cur.str] = true

				params[cur.str] = true

				cur.parent.req[cur.str] = true

				cur.parent.req[cur.str] = true

				prev = cur

				prev = cur

				cur = newObject(cur.parent)

				cur = newObject(cur.parent)

			end

			end

			param = 0

			param = 0

		end

		end

	end

	end

	root = {}  -- array

	root = {}  -- array

	root.req = {}

	root.req = {}

	cur = newObject(root)

	cur = newObject(root)

	prev = nil

	prev = nil

	esc = false

	esc = false

	param = 0

	param = 0

	for i = 1, #str do

	for i = 1, #str do

		chr = str:sub(i,i)

		chr = str:sub(i,i)

		if not esc then

		if not esc then

			if chr == '\\' then

			if chr == '\\' then

				endParam()

				endParam()

				esc = true

				esc = true

			elseif chr == '%' then

			elseif chr == '%' then

				endParam()

				endParam()

				if cur.str ~= "" then

				if cur.str ~= "" then

					cur = newObject(cur.parent)

					cur = newObject(cur.parent)

				end

				end

				param = 2

				param = 2

			elseif chr == '[' then

			elseif chr == '[' then

				endParam()

				endParam()

				if prev and cur.str == "" then

				if prev and cur.str == "" then

					table.remove(cur.parent)

					table.remove(cur.parent)

					cur = prev

					cur = prev

				end

				end

				cur.child = {}  -- new array

				cur.child = {}  -- new array

				cur.child.req = {}

				cur.child.req = {}

				cur.child.parent = cur

				cur.child.parent = cur

				cur = newObject(cur.child)

				cur = newObject(cur.child)

			elseif chr == ']' then

			elseif chr == ']' then

				endParam()

				endParam()

				if cur.parent.parent then

				if cur.parent.parent then

					new = newObject(cur.parent.parent.parent)

					new = newObject(cur.parent.parent.parent)

					if cur.str == "" then

					if cur.str == "" then

						table.remove(cur.parent)

						table.remove(cur.parent)

					end

					end

					cur = new

					cur = new

				end

				end

			else

			else

				if param > 1 then

				if param > 1 then

					param = param - 1

					param = param - 1

				elseif param == 1 then

				elseif param == 1 then

					if not chr:match('%d') then

					if not chr:match('%d') then

						endParam()

						endParam()

					end

					end

				end

				end

				cur.str = cur.str .. replaceSpecialChar(chr)

				cur.str = cur.str .. replaceSpecialChar(chr)

			end

			end

		else

		else

			cur.str = cur.str .. chr

			cur.str = cur.str .. chr

			esc = false

			esc = false

		end

		end

		prev = nil

		prev = nil

	end

	end

	endParam()

	endParam()

	-- make sure that at least one required parameter has been defined

	-- make sure that at least one required parameter has been defined

	if not next(root.req) then

	if not next(root.req) then

		throwError("missing-required-parameter")

		throwError("missing-required-parameter")

	end

	end

	-- make sure that the separator parameter "%s" is not amongst the required parameters

	-- make sure that the separator parameter "%s" is not amongst the required parameters

	if root.req[parameters.separator] then

	if root.req[parameters.separator] then

		throwError("extra-required-parameter", parameters.separator)

		throwError("extra-required-parameter", parameters.separator)

	end

	end

	return root, params

	return root, params

end

end

local function sortOnRank(claims)

local function sortOnRank(claims)

	local rankPos

	local rankPos

	local ranks = {{}, {}, {}, {}}  -- preferred, normal, deprecated, (default)

	local ranks = {{}, {}, {}, {}}  -- preferred, normal, deprecated, (default)

	local sorted = {}

	local sorted = {}

	for _, v in ipairs(claims) do

	for _, v in ipairs(claims) do

		rankPos = rankTable[v.rank] or 4

		rankPos = rankTable[v.rank] or 4

		ranks[rankPos][#ranks[rankPos] + 1] = v

		ranks[rankPos][#ranks[rankPos] + 1] = v

	end

	end

	sorted = ranks[1]

	sorted = ranks[1]

	sorted = mergeArrays(sorted, ranks[2])

	sorted = mergeArrays(sorted, ranks[2])

	sorted = mergeArrays(sorted, ranks[3])

	sorted = mergeArrays(sorted, ranks[3])

	return sorted

	return sorted

end

end

local Config = {}

local Config = {}

-- allows for recursive calls

-- allows for recursive calls

function Config:new()

function Config:new()

	local cfg = {}

	local cfg = {}

	setmetatable(cfg, self)

	setmetatable(cfg, self)

	self.__index = self

	self.__index = self

	cfg.separators = {

	cfg.separators = {

		-- single value objects wrapped in arrays so that we can pass by reference

		-- single value objects wrapped in arrays so that we can pass by reference

		["sep"]   = {copyTable(defaultSeparators["sep"])},

		["sep"]   = {copyTable(defaultSeparators["sep"])},

		["sep%s"] = {copyTable(defaultSeparators["sep%s"])},

		["sep%s"] = {copyTable(defaultSeparators["sep%s"])},

		["sep%q"] = {copyTable(defaultSeparators["sep%q"])},

		["sep%q"] = {copyTable(defaultSeparators["sep%q"])},

		["sep%r"] = {copyTable(defaultSeparators["sep%r"])},

		["sep%r"] = {copyTable(defaultSeparators["sep%r"])},

		["punc"]  = {copyTable(defaultSeparators["punc"])}

		["punc"]  = {copyTable(defaultSeparators["punc"])}

	}

	}

	cfg.entity = nil

	cfg.entity = nil

	cfg.entityID = nil

	cfg.entityID = nil

	cfg.propertyID = nil

	cfg.propertyID = nil

	cfg.propertyValue = nil

	cfg.propertyValue = nil

	cfg.qualifierIDs = {}

	cfg.qualifierIDs = {}

	cfg.qualifierIDsAndValues = {}

	cfg.qualifierIDsAndValues = {}

	cfg.bestRank = true

	cfg.bestRank = true

	cfg.ranks = {true, true, false}  -- preferred = true, normal = true, deprecated = false

	cfg.ranks = {true, true, false}  -- preferred = true, normal = true, deprecated = false

	cfg.foundRank = #cfg.ranks

	cfg.foundRank = #cfg.ranks

	cfg.flagBest = false

	cfg.flagBest = false

	cfg.flagRank = false

	cfg.flagRank = false

	cfg.periods = {true, true, true}  -- future = true, current = true, former = true

	cfg.periods = {true, true, true}  -- future = true, current = true, former = true

	cfg.flagPeriod = false

	cfg.flagPeriod = false

	cfg.atDate = {parseDate(os.date('!%Y-%m-%d'))}  -- today as {year, month, day}

	cfg.atDate = {parseDate(os.date('!%Y-%m-%d'))}  -- today as {year, month, day}

	cfg.mdyDate = false

	cfg.mdyDate = false

	cfg.singleClaim = false

	cfg.singleClaim = false

	cfg.sourcedOnly = false

	cfg.sourcedOnly = false

	cfg.editable = false

	cfg.editable = false

	cfg.editAtEnd = false

	cfg.editAtEnd = false

	cfg.inSitelinks = false

	cfg.inSitelinks = false

	cfg.langCode = mw.language.getContentLanguage().code

	cfg.langCode = mw.language.getContentLanguage().code

	cfg.langName = mw.language.fetchLanguageName(cfg.langCode, cfg.langCode)

	cfg.langName = mw.language.fetchLanguageName(cfg.langCode, cfg.langCode)

	cfg.langObj = mw.language.new(cfg.langCode)

	cfg.langObj = mw.language.new(cfg.langCode)

	cfg.siteID = mw.wikibase.getGlobalSiteId()

	cfg.siteID = mw.wikibase.getGlobalSiteId()

	cfg.states = {}

	cfg.states = {}

	cfg.states.qualifiersCount = 0

	cfg.states.qualifiersCount = 0

	cfg.curState = nil

	cfg.curState = nil

	cfg.prefetchedRefs = nil

	cfg.prefetchedRefs = nil

	return cfg

	return cfg

end

end

local State = {}

local State = {}

function State:new(cfg, type)

function State:new(cfg, type)

	local stt = {}

	local stt = {}

	setmetatable(stt, self)

	setmetatable(stt, self)

	self.__index = self

	self.__index = self

	stt.conf = cfg

	stt.conf = cfg

	stt.type = type

	stt.type = type

	stt.results = {}

	stt.results = {}

	stt.parsedFormat = {}

	stt.parsedFormat = {}

	stt.separator = {}

	stt.separator = {}

	stt.movSeparator = {}

	stt.movSeparator = {}

	stt.puncMark = {}

	stt.puncMark = {}

	stt.linked = false

	stt.linked = false

	stt.rawValue = false

	stt.rawValue = false

	stt.shortName = false

	stt.shortName = false

	stt.anyLanguage = false

	stt.anyLanguage = false

	stt.unitOnly = false

	stt.unitOnly = false

	stt.singleValue = false

	stt.singleValue = false

	return stt

	return stt

end

end

-- if id == nil then item connected to current page is used

-- if id == nil then item connected to current page is used

function Config:getLabel(id, raw, link, short)

function Config:getLabel(id, raw, link, short)

	local label = nil

	local label = nil

	local prefix, title= "", nil

	local prefix, title= "", nil

	if not id then

	if not id then

		id = mw.wikibase.getEntityIdForCurrentPage()

		id = mw.wikibase.getEntityIdForCurrentPage()

		if not id then

		if not id then

			return ""

			return ""

		end

		end

	end

	end

	id = id:upper()  -- just to be sure

	id = id:upper()  -- just to be sure

	if raw then

	if raw then

		-- check if given id actually exists

		-- check if given id actually exists

		if mw.wikibase.isValidEntityId(id) and mw.wikibase.entityExists(id) then

		if mw.wikibase.isValidEntityId(id) and mw.wikibase.entityExists(id) then

			label = id

			label = id

		end

		end

		prefix, title = "d:Special:EntityPage/", label -- may be nil

		prefix, title = "d:Special:EntityPage/", label -- may be nil

	else

	else

		-- try short name first if requested

		-- try short name first if requested

		if short then

		if short then

			label = p._property{aliasesP.shortName, [p.args.eid] = id}  -- get short name

			label = p._property{aliasesP.shortName, [p.args.eid] = id}  -- get short name

			if label == "" then

			if label == "" then

				label = nil

				label = nil

			end

			end

		end

		end

		-- get label

		-- get label

		if not label then

		if not label then

			label = mw.wikibase.getLabelByLang(id, self.langCode) -- XXX: should use fallback labels?

			label = mw.wikibase.getLabelByLang(id, self.langCode) -- XXX: should use fallback labels?

		end

		end

	end

	end

	if not label then

	if not label then

		label = ""

		label = ""

	elseif link then

	elseif link then

		-- build a link if requested

		-- build a link if requested

		if not title then

		if not title then

			if id:sub(1,1) == "Q" then

			if id:sub(1,1) == "Q" then

				title = mw.wikibase.getSitelink(id)

				title = mw.wikibase.getSitelink(id)

			elseif id:sub(1,1) == "P" then

			elseif id:sub(1,1) == "P" then

				-- properties have no sitelink, link to Wikidata instead

				-- properties have no sitelink, link to Wikidata instead

				prefix, title = "d:Special:EntityPage/", id

				prefix, title = "d:Special:EntityPage/", id

			end

			end

		end

		end

		label = mw.text.nowiki(label) -- escape raw label text so it cannot be wikitext markup

		label = mw.text.nowiki(label) -- escape raw label text so it cannot be wikitext markup

		if title then

		if title then

			label = buildWikilink(prefix .. title, label)

			label = buildWikilink(prefix .. title, label)

		end

		end

	end

	end

	return label

	return label

end

end

function Config:getEditIcon()

function Config:getEditIcon()

	local value = ""

	local value = ""

	local prefix = ""

	local prefix = ""

	local front = " "

	local front = " "

	local back = ""

	local back = ""

	if self.entityID:sub(1,1) == "P" then

	if self.entityID:sub(1,1) == "P" then

		prefix = "Property:"

		prefix = "Property:"

	end

	end

	if self.editAtEnd then

	if self.editAtEnd then

		front = '<span style="float:'

		front = '<span style="float:'

		if self.langObj:isRTL() then

		if self.langObj:isRTL() then

			front = front .. 'left'

			front = front .. 'left'

		else

		else

			front = front .. 'right'

			front = front .. 'right'

		end

		end

		front = front .. '">'

		front = front .. '">'

		back = '</span>'

		back = '</span>'

	end

	end

	value = "[[File:OOjs UI icon edit-ltr-progressive.svg|frameless|text-top|10px|alt=" .. i18n['info']['edit-on-wikidata'] .. "|link=https://www.wikidata.org/wiki/" .. prefix .. self.entityID .. "?uselang=" .. self.langCode

	value = "[[File:OOjs UI icon edit-ltr-progressive.svg|frameless|text-top|10px|alt=" .. i18n['info']['edit-on-wikidata'] .. "|link=https://www.wikidata.org/wiki/" .. prefix .. self.entityID .. "?uselang=" .. self.langCode

	if self.propertyID then

	if self.propertyID then

		value = value .. "#" .. self.propertyID

		value = value .. "#" .. self.propertyID

	elseif self.inSitelinks then

	elseif self.inSitelinks then

		value = value .. "#sitelinks-wikipedia"

		value = value .. "#sitelinks-wikipedia"

	end

	end

	value = value .. "|" .. i18n['info']['edit-on-wikidata'] .. "]]"

	value = value .. "|" .. i18n['info']['edit-on-wikidata'] .. "]]"

	return front .. value .. back

	return front .. value .. back

end

end

-- used to create the final output string when it's all done, so that for references the

-- used to create the final output string when it's all done, so that for references the

-- function extensionTag("ref", ...) is only called when they really ended up in the final output

-- function extensionTag("ref", ...) is only called when they really ended up in the final output

function Config:concatValues(valuesArray)

function Config:concatValues(valuesArray)

	local outString = ""

	local outString = ""

	local j, skip

	local j, skip

	for i = 1, #valuesArray do

	for i = 1, #valuesArray do

		-- check if this is a reference

		-- check if this is a reference

		if valuesArray[i].refHash then

		if valuesArray[i].refHash then

			j = i - 1

			j = i - 1

			skip = false

			skip = false

			-- skip this reference if it is part of a continuous row of references that already contains the exact same reference

			-- skip this reference if it is part of a continuous row of references that already contains the exact same reference

			while valuesArray[j] and valuesArray[j].refHash do

			while valuesArray[j] and valuesArray[j].refHash do

				if valuesArray[i].refHash == valuesArray[j].refHash then

				if valuesArray[i].refHash == valuesArray[j].refHash then

					skip = true

					skip = true

					break

					break

				end

				end

				j = j - 1

				j = j - 1

			end

			end

			if not skip then

			if not skip then

				-- add <ref> tag with the reference's hash as its name (to deduplicate references)

				-- add <ref> tag with the reference's hash as its name (to deduplicate references)

				outString = outString .. mw.getCurrentFrame():extensionTag("ref", valuesArray[i][1], {name = valuesArray[i].refHash})

				outString = outString .. mw.getCurrentFrame():extensionTag("ref", valuesArray[i][1], {name = valuesArray[i].refHash})

			end

			end

		else

		else

			outString = outString .. valuesArray[i][1]

			outString = outString .. valuesArray[i][1]

		end

		end

	end

	end

	return outString

	return outString

end

end

function Config:convertUnit(unit, raw, link, short, unitOnly)

function Config:convertUnit(unit, raw, link, short, unitOnly)

	local space = " "

	local space = " "

	local label = ""

	local label = ""

	local itemID

	local itemID

	if unit == "" or unit == "1" then

	if unit == "" or unit == "1" then

		return nil

		return nil

	end

	end

	if unitOnly then

	if unitOnly then

		space = ""

		space = ""

	end

	end

	itemID = parseWikidataURL(unit)

	itemID = parseWikidataURL(unit)

	if itemID then

	if itemID then

		if itemID == aliasesQ.percentage then

		if itemID == aliasesQ.percentage then

			return "%"

			return "%"

		else

		else

			label = self:getLabel(itemID, raw, link, short)

			label = self:getLabel(itemID, raw, link, short)

			if label ~= "" then

			if label ~= "" then

				return space .. label

				return space .. label

			end

			end

		end

		end

	end

	end

	return ""

	return ""

end

end

function State:getValue(snak)

function State:getValue(snak)

	return self.conf:getValue(snak, self.rawValue, self.linked, self.shortName, self.anyLanguage, self.unitOnly, false, self.type:sub(1,2))

	return self.conf:getValue(snak, self.rawValue, self.linked, self.shortName, self.anyLanguage, self.unitOnly, false, self.type:sub(1,2))

end

end

function Config:getValue(snak, raw, link, short, anyLang, unitOnly, noSpecial, type)

function Config:getValue(snak, raw, link, short, anyLang, unitOnly, noSpecial, type)

	if snak.snaktype == 'value' then

	if snak.snaktype == 'value' then

		local datatype = snak.datavalue.type

		local datatype = snak.datavalue.type

		local subtype = snak.datatype

		local subtype = snak.datatype

		local datavalue = snak.datavalue.value

		local datavalue = snak.datavalue.value

		if datatype == 'string' then

		if datatype == 'string' then

			if subtype == 'url' and link then

			if subtype == 'url' and link then

				-- create link explicitly

				-- create link explicitly

				if raw then

				if raw then

					-- will render as a linked number like [1]

					-- will render as a linked number like [1]

					return "[" .. datavalue .. "]"

					return "[" .. datavalue .. "]"

				else

				else

					return "[" .. datavalue .. " " .. datavalue .. "]"

					return "[" .. datavalue .. " " .. datavalue .. "]"

				end

				end

			elseif subtype == 'commonsMedia' then

			elseif subtype == 'commonsMedia' then

				if link then

				if link then

					return buildWikilink("c:File:" .. datavalue, datavalue)

					return buildWikilink("c:File:" .. datavalue, datavalue)

				elseif not raw then

				elseif not raw then

					return "[[File:" .. datavalue .. "]]"

					return "[[File:" .. datavalue .. "]]"

				else

				else

					return datavalue

					return datavalue

				end

				end

			elseif subtype == 'geo-shape' and link then

			elseif subtype == 'geo-shape' and link then

				return buildWikilink("c:" .. datavalue, datavalue)

				return buildWikilink("c:" .. datavalue, datavalue)

			elseif subtype == 'math' and not raw then

			elseif subtype == 'math' and not raw then

				local attribute = nil

				local attribute = nil

				if (type == parameters.property or (type == parameters.qualifier and self.propertyID == aliasesP.hasPart)) and snak.property == aliasesP.definingFormula then

				if (type == parameters.property or (type == parameters.qualifier and self.propertyID == aliasesP.hasPart)) and snak.property == aliasesP.definingFormula then

					attribute = {qid = self.entityID}

					attribute = {qid = self.entityID}

				end

				end

				return mw.getCurrentFrame():extensionTag("math", datavalue, attribute)

				return mw.getCurrentFrame():extensionTag("math", datavalue, attribute)

			elseif subtype == 'external-id' and link then

			elseif subtype == 'external-id' and link then

				local url = p._property{aliasesP.formatterURL, [p.args.eid] = snak.property}  -- get formatter URL

				local url = p._property{aliasesP.formatterURL, [p.args.eid] = snak.property}  -- get formatter URL

				if url ~= "" then

				if url ~= "" then

					url = mw.ustring.gsub(url, "$1", datavalue)

					url = mw.ustring.gsub(url, "$1", datavalue)

					return "[" .. url .. " " .. datavalue .. "]"

					return "[" .. url .. " " .. datavalue .. "]"

				else

				else

					return datavalue

					return datavalue

				end

				end

			else

			else

				return datavalue

				return datavalue

			end

			end

		elseif datatype == 'monolingualtext' then

		elseif datatype == 'monolingualtext' then

			if anyLang or datavalue['language'] == self.langCode then

			if anyLang or datavalue['language'] == self.langCode then

				return datavalue['text']

				return datavalue['text']

			else

			else

				return nil

				return nil

			end

			end

		elseif datatype == 'quantity' then

		elseif datatype == 'quantity' then

			local value = ""

			local value = ""

			local unit

			local unit

			if not unitOnly then

			if not unitOnly then

				-- get value and strip + signs from front

				-- get value and strip + signs from front

				value = mw.ustring.gsub(datavalue['amount'], "^%+(.+)$", "%1")

				value = mw.ustring.gsub(datavalue['amount'], "^%+(.+)$", "%1")

				if raw then

				if raw then

					return value

					return value

				end

				end

				-- replace decimal mark based on locale

				-- replace decimal mark based on locale

				value = replaceDecimalMark(value)

				value = replaceDecimalMark(value)

				-- add delimiters for readability

				-- add delimiters for readability

				value = i18n.addDelimiters(value)

				value = i18n.addDelimiters(value)

			end

			end

			unit = self:convertUnit(datavalue['unit'], raw, link, short, unitOnly)

			unit = self:convertUnit(datavalue['unit'], raw, link, short, unitOnly)

			if unit then

			if unit then

				value = value .. unit

				value = value .. unit

			end

			end

			return value

			return value

		elseif datatype == 'time' then

		elseif datatype == 'time' then

			local y, m, d, p, yDiv, yRound, yFull, value, calendarID, dateStr

			local y, m, d, p, yDiv, yRound, yFull, value, calendarID, dateStr

			local yFactor = 1

			local yFactor = 1

			local sign = 1

			local sign = 1

			local prefix = ""

			local prefix = ""

			local suffix = ""

			local suffix = ""

			local mayAddCalendar = false

			local mayAddCalendar = false

			local calendar = ""

			local calendar = ""

			local precision = datavalue['precision']

			local precision = datavalue['precision']

			if precision == 11 then

			if precision == 11 then

				p = "d"

				p = "d"

			elseif precision == 10 then

			elseif precision == 10 then

				p = "m"

				p = "m"

			else

			else

				p = "y"

				p = "y"

				yFactor = 10^(9-precision)

				yFactor = 10^(9-precision)

			end

			end

			y, m, d = parseDate(datavalue['time'], p)

			y, m, d = parseDate(datavalue['time'], p)

			if y < 0 then

			if y < 0 then

				sign = -1

				sign = -1

				y = y * sign

				y = y * sign

			end

			end

			-- if precision is tens/hundreds/thousands/millions/billions of years

			-- if precision is tens/hundreds/thousands/millions/billions of years

			if precision <= 8 then

			if precision <= 8 then

				yDiv = y / yFactor

				yDiv = y / yFactor

				-- if precision is tens/hundreds/thousands of years

				-- if precision is tens/hundreds/thousands of years

				if precision >= 6 then

				if precision >= 6 then

					mayAddCalendar = true

					mayAddCalendar = true

					if precision <= 7 then

					if precision <= 7 then

						-- round centuries/millenniums up (e.g. 20th century or 3rd millennium)

						-- round centuries/millenniums up (e.g. 20th century or 3rd millennium)

						yRound = math.ceil(yDiv)

						yRound = math.ceil(yDiv)

						if not raw then

						if not raw then

							if precision == 6 then

							if precision == 6 then

								suffix = i18n['datetime']['suffixes']['millennium']

								suffix = i18n['datetime']['suffixes']['millennium']

							else

							else

								suffix = i18n['datetime']['suffixes']['century']

								suffix = i18n['datetime']['suffixes']['century']

							end

							end

							suffix = i18n.getOrdinalSuffix(yRound) .. suffix

							suffix = i18n.getOrdinalSuffix(yRound) .. suffix

						else

						else

							-- if not verbose, take the first year of the century/millennium

							-- if not verbose, take the first year of the century/millennium

							-- (e.g. 1901 for 20th century or 2001 for 3rd millennium)

							-- (e.g. 1901 for 20th century or 2001 for 3rd millennium)

							yRound = (yRound - 1) * yFactor + 1

							yRound = (yRound - 1) * yFactor + 1

						end

						end

					else

					else

						-- precision == 8

						-- precision == 8

						-- round decades down (e.g. 2010s)

						-- round decades down (e.g. 2010s)

						yRound = math.floor(yDiv) * yFactor

						yRound = math.floor(yDiv) * yFactor

						if not raw then

						if not raw then

							prefix = i18n['datetime']['prefixes']['decade-period']

							prefix = i18n['datetime']['prefixes']['decade-period']

							suffix = i18n['datetime']['suffixes']['decade-period']

							suffix = i18n['datetime']['suffixes']['decade-period']

						end

						end

					end

					end

					if raw and sign < 0 then

					if raw and sign < 0 then

						-- if BCE then compensate for "counting backwards"

						-- if BCE then compensate for "counting backwards"

						-- (e.g. -2019 for 2010s BCE, -2000 for 20th century BCE or -3000 for 3rd millennium BCE)

						-- (e.g. -2019 for 2010s BCE, -2000 for 20th century BCE or -3000 for 3rd millennium BCE)

						yRound = yRound + yFactor - 1

						yRound = yRound + yFactor - 1

					end

					end

				else

				else

					local yReFactor, yReDiv, yReRound

					local yReFactor, yReDiv, yReRound

					-- round to nearest for tens of thousands of years or more

					-- round to nearest for tens of thousands of years or more

					yRound = math.floor(yDiv + 0.5)

					yRound = math.floor(yDiv + 0.5)

					if yRound == 0 then

					if yRound == 0 then

						if precision <= 2 and y ~= 0 then

						if precision <= 2 and y ~= 0 then

							yReFactor = 1e6

							yReFactor = 1e6

							yReDiv = y / yReFactor

							yReDiv = y / yReFactor

							yReRound = math.floor(yReDiv + 0.5)

							yReRound = math.floor(yReDiv + 0.5)

							if yReDiv == yReRound then

							if yReDiv == yReRound then

								-- change precision to millions of years only if we have a whole number of them

								-- change precision to millions of years only if we have a whole number of them

								precision = 3

								precision = 3

								yFactor = yReFactor

								yFactor = yReFactor

								yRound = yReRound

								yRound = yReRound

							end

							end

						end

						end

						if yRound == 0 then

						if yRound == 0 then

							-- otherwise, take the unrounded (original) number of years

							-- otherwise, take the unrounded (original) number of years

							precision = 5

							precision = 5

							yFactor = 1

							yFactor = 1

							yRound = y

							yRound = y

							mayAddCalendar = true

							mayAddCalendar = true

						end

						end

					end

					end

					if precision >= 1 and y ~= 0 then

					if precision >= 1 and y ~= 0 then

						yFull = yRound * yFactor

						yFull = yRound * yFactor

						yReFactor = 1e9

						yReFactor = 1e9

						yReDiv = yFull / yReFactor

						yReDiv = yFull / yReFactor

						yReRound = math.floor(yReDiv + 0.5)

						yReRound = math.floor(yReDiv + 0.5)

						if yReDiv == yReRound then

						if yReDiv == yReRound then

							-- change precision to billions of years if we're in that range

							-- change precision to billions of years if we're in that range

							precision = 0

							precision = 0

							yFactor = yReFactor

							yFactor = yReFactor

							yRound = yReRound

							yRound = yReRound

						else

						else

							yReFactor = 1e6

							yReFactor = 1e6

							yReDiv = yFull / yReFactor

							yReDiv = yFull / yReFactor

							yReRound = math.floor(yReDiv + 0.5)

							yReRound = math.floor(yReDiv + 0.5)

							if yReDiv == yReRound then

							if yReDiv == yReRound then

								-- change precision to millions of years if we're in that range

								-- change precision to millions of years if we're in that range

								precision = 3

								precision = 3

								yFactor = yReFactor

								yFactor = yReFactor

								yRound = yReRound

								yRound = yReRound

							end

							end

						end

						end

					end

					end

					if not raw then

					if not raw then

						if precision == 3 then

						if precision == 3 then

							suffix = i18n['datetime']['suffixes']['million-years']

							suffix = i18n['datetime']['suffixes']['million-years']

						elseif precision == 0 then

						elseif precision == 0 then

							suffix = i18n['datetime']['suffixes']['billion-years']

							suffix = i18n['datetime']['suffixes']['billion-years']

						else

						else

							yRound = yRound * yFactor

							yRound = yRound * yFactor

							if yRound == 1 then

							if yRound == 1 then

								suffix = i18n['datetime']['suffixes']['year']

								suffix = i18n['datetime']['suffixes']['year']

							else

							else

								suffix = i18n['datetime']['suffixes']['years']

								suffix = i18n['datetime']['suffixes']['years']

							end

							end

						end

						end

					else

					else

						yRound = yRound * yFactor

						yRound = yRound * yFactor

					end

					end

				end

				end

			else

			else

				yRound = y

				yRound = y

				mayAddCalendar = true

				mayAddCalendar = true

			end

			end

			if mayAddCalendar then

			if mayAddCalendar then

				calendarID = parseWikidataURL(datavalue['calendarmodel'])

				calendarID = parseWikidataURL(datavalue['calendarmodel'])

				if calendarID and calendarID == aliasesQ.prolepticJulianCalendar then

				if calendarID and calendarID == aliasesQ.prolepticJulianCalendar then

					if not raw then

					if not raw then

						if link then

						if link then

							calendar = " ("..buildWikilink(i18n['datetime']['julian-calendar'], i18n['datetime']['julian'])..")"

							calendar = " ("..buildWikilink(i18n['datetime']['julian-calendar'], i18n['datetime']['julian'])..")"

						else

						else

							calendar = " ("..i18n['datetime']['julian']..")"

							calendar = " ("..i18n['datetime']['julian']..")"

						end

						end

					else

					else

						calendar = "/"..i18n['datetime']['julian']

						calendar = "/"..i18n['datetime']['julian']

					end

					end

				end

				end

			end

			end

			if not raw then

			if not raw then

				local ce = nil

				local ce = nil

				if sign < 0 then

				if sign < 0 then

					ce = i18n['datetime']['BCE']

					ce = i18n['datetime']['BCE']

				elseif precision <= 5 then

				elseif precision <= 5 then

					ce = i18n['datetime']['CE']

					ce = i18n['datetime']['CE']

				end

				end

				if ce then

				if ce then

					if link then

					if link then

						ce = buildWikilink(i18n['datetime']['common-era'], ce)

						ce = buildWikilink(i18n['datetime']['common-era'], ce)

					end

					end

					suffix = suffix .. " " .. ce

					suffix = suffix .. " " .. ce

				end

				end

				value = tostring(yRound)

				value = tostring(yRound)

				if m then

				if m then

					dateStr = self.langObj:formatDate("F", "1-"..m.."-1")

					dateStr = self.langObj:formatDate("F", "1-"..m.."-1")

					if d then

					if d then

						if self.mdyDate then

						if self.mdyDate then

							dateStr = dateStr .. " " .. d .. ","

							dateStr = dateStr .. " " .. d .. ","

						else

						else

							dateStr = d .. " " .. dateStr

							dateStr = d .. " " .. dateStr

						end

						end

					end

					end

					value = dateStr .. " " .. value

					value = dateStr .. " " .. value

				end

				end

				value = prefix .. value .. suffix .. calendar

				value = prefix .. value .. suffix .. calendar

			else

			else

				value = padZeros(yRound * sign, 4)

				value = padZeros(yRound * sign, 4)

				if m then

				if m then

					value = value .. "-" .. padZeros(m, 2)

					value = value .. "-" .. padZeros(m, 2)

					if d then

					if d then

						value = value .. "-" .. padZeros(d, 2)

						value = value .. "-" .. padZeros(d, 2)

					end

					end

				end

				end

				value = value .. calendar

				value = value .. calendar

			end

			end

			return value

			return value

		elseif datatype == 'globecoordinate' then

		elseif datatype == 'globecoordinate' then

			-- logic from https://github.com/DataValues/Geo (v4.0.1)

			-- logic from https://github.com/DataValues/Geo (v4.0.1)

			local precision, unitsPerDegree, numDigits, strFormat, value, globe

			local precision, unitsPerDegree, numDigits, strFormat, value, globe

			local latitude, latConv, latValue, latLink

			local latitude, latConv, latValue, latLink

			local longitude, lonConv, lonValue, lonLink

			local longitude, lonConv, lonValue, lonLink

			local latDirection, latDirectionN, latDirectionS, latDirectionEN

			local latDirection, latDirectionN, latDirectionS, latDirectionEN

			local lonDirection, lonDirectionE, lonDirectionW, lonDirectionEN

			local lonDirection, lonDirectionE, lonDirectionW, lonDirectionEN

			local degSymbol, minSymbol, secSymbol, separator

			local degSymbol, minSymbol, secSymbol, separator

			local latDegrees = nil

			local latDegrees = nil

			local latMinutes = nil

			local latMinutes = nil

			local latSeconds = nil

			local latSeconds = nil

			local lonDegrees = nil

			local lonDegrees = nil

			local lonMinutes = nil

			local lonMinutes = nil

			local lonSeconds = nil

			local lonSeconds = nil

			local latDegSym = ""

			local latDegSym = ""

			local latMinSym = ""

			local latMinSym = ""

			local latSecSym = ""

			local latSecSym = ""

			local lonDegSym = ""

			local lonDegSym = ""

			local lonMinSym = ""

			local lonMinSym = ""

			local lonSecSym = ""

			local lonSecSym = ""

			local latDirectionEN_N = "N"

			local latDirectionEN_N = "N"

			local latDirectionEN_S = "S"

			local latDirectionEN_S = "S"

			local lonDirectionEN_E = "E"

			local lonDirectionEN_E = "E"

			local lonDirectionEN_W = "W"

			local lonDirectionEN_W = "W"

			if not raw then

			if not raw then

				latDirectionN = i18n['coord']['latitude-north']

				latDirectionN = i18n['coord']['latitude-north']

				latDirectionS = i18n['coord']['latitude-south']

				latDirectionS = i18n['coord']['latitude-south']

				lonDirectionE = i18n['coord']['longitude-east']

				lonDirectionE = i18n['coord']['longitude-east']

				lonDirectionW = i18n['coord']['longitude-west']

				lonDirectionW = i18n['coord']['longitude-west']

				degSymbol = i18n['coord']['degrees']

				degSymbol = i18n['coord']['degrees']

				minSymbol = i18n['coord']['minutes']

				minSymbol = i18n['coord']['minutes']

				secSymbol = i18n['coord']['seconds']

				secSymbol = i18n['coord']['seconds']

				separator = i18n['coord']['separator']

				separator = i18n['coord']['separator']

			else

			else

				latDirectionN = latDirectionEN_N

				latDirectionN = latDirectionEN_N

				latDirectionS = latDirectionEN_S

				latDirectionS = latDirectionEN_S

				lonDirectionE = lonDirectionEN_E

				lonDirectionE = lonDirectionEN_E

				lonDirectionW = lonDirectionEN_W

				lonDirectionW = lonDirectionEN_W

				degSymbol = "/"

				degSymbol = "/"

				minSymbol = "/"

				minSymbol = "/"

				secSymbol = "/"

				secSymbol = "/"

				separator = "/"

				separator = "/"

			end

			end

			latitude = datavalue['latitude']

			latitude = datavalue['latitude']

			longitude = datavalue['longitude']

			longitude = datavalue['longitude']

			if latitude < 0 then

			if latitude < 0 then

				latDirection = latDirectionS

				latDirection = latDirectionS

				latDirectionEN = latDirectionEN_S

				latDirectionEN = latDirectionEN_S

				latitude = math.abs(latitude)

				latitude = math.abs(latitude)

			else

			else

				latDirection = latDirectionN

				latDirection = latDirectionN

				latDirectionEN = latDirectionEN_N

				latDirectionEN = latDirectionEN_N

			end

			end

			if longitude < 0 then

			if longitude < 0 then

				lonDirection = lonDirectionW

				lonDirection = lonDirectionW

				lonDirectionEN = lonDirectionEN_W

				lonDirectionEN = lonDirectionEN_W

				longitude = math.abs(longitude)

				longitude = math.abs(longitude)

			else

			else

				lonDirection = lonDirectionE

				lonDirection = lonDirectionE

				lonDirectionEN = lonDirectionEN_E

				lonDirectionEN = lonDirectionEN_E

			end

			end

			precision = datavalue['precision']

			precision = datavalue['precision']

			if not precision or precision <= 0 then

			if not precision or precision <= 0 then

				precision = 1 / 3600  -- precision not set (correctly), set to arcsecond

				precision = 1 / 3600  -- precision not set (correctly), set to arcsecond

			end

			end

			-- remove insignificant detail

			-- remove insignificant detail

			latitude = math.floor(latitude / precision + 0.5) * precision

			latitude = math.floor(latitude / precision + 0.5) * precision

			longitude = math.floor(longitude / precision + 0.5) * precision

			longitude = math.floor(longitude / precision + 0.5) * precision

			if precision >= 1 - (1 / 60) and precision < 1 then

			if precision >= 1 - (1 / 60) and precision < 1 then

				precision = 1

				precision = 1

			elseif precision >= (1 / 60) - (1 / 3600) and precision < (1 / 60) then

			elseif precision >= (1 / 60) - (1 / 3600) and precision < (1 / 60) then

				precision = 1 / 60

				precision = 1 / 60

			end

			end

			if precision >= 1 then

			if precision >= 1 then

				unitsPerDegree = 1

				unitsPerDegree = 1

			elseif precision >= (1 / 60)  then

			elseif precision >= (1 / 60)  then

				unitsPerDegree = 60

				unitsPerDegree = 60

			else

			else

				unitsPerDegree = 3600

				unitsPerDegree = 3600

			end

			end

			numDigits = math.ceil(-math.log10(unitsPerDegree * precision))

			numDigits = math.ceil(-math.log10(unitsPerDegree * precision))

			if numDigits <= 0 then

			if numDigits <= 0 then

				numDigits = tonumber("0")  -- for some reason, 'numDigits = 0' may actually store '-0', so parse from string instead

				numDigits = tonumber("0")  -- for some reason, 'numDigits = 0' may actually store '-0', so parse from string instead

			end

			end

			strFormat = "%." .. numDigits .. "f"

			strFormat = "%." .. numDigits .. "f"

			if precision >= 1 then

			if precision >= 1 then

				latDegrees = strFormat:format(latitude)

				latDegrees = strFormat:format(latitude)

				lonDegrees = strFormat:format(longitude)

				lonDegrees = strFormat:format(longitude)

				if not raw then

				if not raw then

					latDegSym = replaceDecimalMark(latDegrees) .. degSymbol

					latDegSym = replaceDecimalMark(latDegrees) .. degSymbol

					lonDegSym = replaceDecimalMark(lonDegrees) .. degSymbol

					lonDegSym = replaceDecimalMark(lonDegrees) .. degSymbol

				else

				else

					latDegSym = latDegrees .. degSymbol

					latDegSym = latDegrees .. degSymbol

					lonDegSym = lonDegrees .. degSymbol

					lonDegSym = lonDegrees .. degSymbol

				end

				end

			else

			else

				latConv = math.floor(latitude * unitsPerDegree * 10^numDigits + 0.5) / 10^numDigits

				latConv = math.floor(latitude * unitsPerDegree * 10^numDigits + 0.5) / 10^numDigits

				lonConv = math.floor(longitude * unitsPerDegree * 10^numDigits + 0.5) / 10^numDigits

				lonConv = math.floor(longitude * unitsPerDegree * 10^numDigits + 0.5) / 10^numDigits

				if precision >= (1 / 60) then

				if precision >= (1 / 60) then

					latMinutes = latConv

					latMinutes = latConv

					lonMinutes = lonConv

					lonMinutes = lonConv

				else

				else

					latSeconds = latConv

					latSeconds = latConv

					lonSeconds = lonConv

					lonSeconds = lonConv

					latMinutes = math.floor(latSeconds / 60)

					latMinutes = math.floor(latSeconds / 60)

					lonMinutes = math.floor(lonSeconds / 60)

					lonMinutes = math.floor(lonSeconds / 60)

					latSeconds = strFormat:format(latSeconds - (latMinutes * 60))

					latSeconds = strFormat:format(latSeconds - (latMinutes * 60))

					lonSeconds = strFormat:format(lonSeconds - (lonMinutes * 60))

					lonSeconds = strFormat:format(lonSeconds - (lonMinutes * 60))

					if not raw then

					if not raw then

						latSecSym = replaceDecimalMark(latSeconds) .. secSymbol

						latSecSym = replaceDecimalMark(latSeconds) .. secSymbol

						lonSecSym = replaceDecimalMark(lonSeconds) .. secSymbol

						lonSecSym = replaceDecimalMark(lonSeconds) .. secSymbol

					else

					else

						latSecSym = latSeconds .. secSymbol

						latSecSym = latSeconds .. secSymbol

						lonSecSym = lonSeconds .. secSymbol

						lonSecSym = lonSeconds .. secSymbol

					end

					end

				end

				end

				latDegrees = math.floor(latMinutes / 60)

				latDegrees = math.floor(latMinutes / 60)

				lonDegrees = math.floor(lonMinutes / 60)

				lonDegrees = math.floor(lonMinutes / 60)

				latDegSym = latDegrees .. degSymbol

				latDegSym = latDegrees .. degSymbol

				lonDegSym = lonDegrees .. degSymbol

				lonDegSym = lonDegrees .. degSymbol

				latMinutes = latMinutes - (latDegrees * 60)

				latMinutes = latMinutes - (latDegrees * 60)

				lonMinutes = lonMinutes - (lonDegrees * 60)

				lonMinutes = lonMinutes - (lonDegrees * 60)

				if precision >= (1 / 60) then

				if precision >= (1 / 60) then

					latMinutes = strFormat:format(latMinutes)

					latMinutes = strFormat:format(latMinutes)

					lonMinutes = strFormat:format(lonMinutes)

					lonMinutes = strFormat:format(lonMinutes)

					if not raw then

					if not raw then

						latMinSym = replaceDecimalMark(latMinutes) .. minSymbol

						latMinSym = replaceDecimalMark(latMinutes) .. minSymbol

						lonMinSym = replaceDecimalMark(lonMinutes) .. minSymbol

						lonMinSym = replaceDecimalMark(lonMinutes) .. minSymbol

					else

					else

						latMinSym = latMinutes .. minSymbol

						latMinSym = latMinutes .. minSymbol

						lonMinSym = lonMinutes .. minSymbol

						lonMinSym = lonMinutes .. minSymbol

					end

					end

				else

				else

					latMinSym = latMinutes .. minSymbol

					latMinSym = latMinutes .. minSymbol

					lonMinSym = lonMinutes .. minSymbol

					lonMinSym = lonMinutes .. minSymbol

				end

				end

			end

			end

			latValue = latDegSym .. latMinSym .. latSecSym .. latDirection

			latValue = latDegSym .. latMinSym .. latSecSym .. latDirection

			lonValue = lonDegSym .. lonMinSym .. lonSecSym .. lonDirection

			lonValue = lonDegSym .. lonMinSym .. lonSecSym .. lonDirection

			value = latValue .. separator .. lonValue

			value = latValue .. separator .. lonValue

			if link then

			if link then

				globe = parseWikidataURL(datavalue['globe'])

				globe = parseWikidataURL(datavalue['globe'])

				if globe then

				if globe then

					globe = mw.wikibase.getLabelByLang(globe, "en"):lower()

					globe = mw.wikibase.getLabelByLang(globe, "en"):lower()

				else

				else

					globe = "earth"

					globe = "earth"

				end

				end

				latLink = table.concat({latDegrees, latMinutes, latSeconds}, "_")

				latLink = table.concat({latDegrees, latMinutes, latSeconds}, "_")

				lonLink = table.concat({lonDegrees, lonMinutes, lonSeconds}, "_")

				lonLink = table.concat({lonDegrees, lonMinutes, lonSeconds}, "_")

				value = "[https://geohack.toolforge.org/geohack.php?language="..self.langCode.."&params="..latLink.."_"..latDirectionEN.."_"..lonLink.."_"..lonDirectionEN.."_globe:"..globe.." "..value.."]"

				value = "[https://geohack.toolforge.org/geohack.php?language="..self.langCode.."&params="..latLink.."_"..latDirectionEN.."_"..lonLink.."_"..lonDirectionEN.."_globe:"..globe.." "..value.."]"

			end

			end

			return value

			return value

		elseif datatype == 'wikibase-entityid' then

		elseif datatype == 'wikibase-entityid' then

			local label

			local label

			local itemID = datavalue['numeric-id']

			local itemID = datavalue['numeric-id']

			if subtype == 'wikibase-item' then

			if subtype == 'wikibase-item' then

				itemID = "Q" .. itemID

				itemID = "Q" .. itemID

			elseif subtype == 'wikibase-property' then

			elseif subtype == 'wikibase-property' then

				itemID = "P" .. itemID

				itemID = "P" .. itemID

			else

			else

				return '<strong class="error">' .. errorText('unknown-data-type', subtype) .. '</strong>'

				return '<strong class="error">' .. errorText('unknown-data-type', subtype) .. '</strong>'

			end

			end

			label = self:getLabel(itemID, raw, link, short)

			label = self:getLabel(itemID, raw, link, short)

			if label == "" then

			if label == "" then

				label = nil

				label = nil

			end

			end

			return label

			return label

		else

		else

			return '<strong class="error">' .. errorText('unknown-data-type', datatype) .. '</strong>'

			return '<strong class="error">' .. errorText('unknown-data-type', datatype) .. '</strong>'

		end

		end

	elseif snak.snaktype == 'somevalue' and not noSpecial then

	elseif snak.snaktype == 'somevalue' and not noSpecial then

		if raw then

		if raw then

			return " "  -- single space represents 'somevalue'

			return " "  -- single space represents 'somevalue'

		else

		else

			return i18n['values']['unknown']

			return i18n['values']['unknown']

		end

		end

	elseif snak.snaktype == 'novalue' and not noSpecial then

	elseif snak.snaktype == 'novalue' and not noSpecial then

		if raw then

		if raw then

			return ""  -- empty string represents 'novalue'

			return ""  -- empty string represents 'novalue'

		else

		else

			return i18n['values']['none']

			return i18n['values']['none']

		end

		end

	else

	else

		return nil

		return nil

	end

	end

end

end

function Config:getSingleRawQualifier(claim, qualifierID)

function Config:getSingleRawQualifier(claim, qualifierID)

	local qualifiers

	local qualifiers

	if claim.qualifiers then qualifiers = claim.qualifiers[qualifierID] end

	if claim.qualifiers then qualifiers = claim.qualifiers[qualifierID] end

	if qualifiers and qualifiers[1] then

	if qualifiers and qualifiers[1] then

		return self:getValue(qualifiers[1], true)  -- raw = true

		return self:getValue(qualifiers[1], true)  -- raw = true

	else

	else

		return nil

		return nil

	end

	end

end

end

function Config:snakEqualsValue(snak, value)

function Config:snakEqualsValue(snak, value)

	local snakValue = self:getValue(snak, true)  -- raw = true

	local snakValue = self:getValue(snak, true)  -- raw = true

	if snakValue and snak.snaktype == 'value' and snak.datavalue.type == 'wikibase-entityid' then value = value:upper() end

	if snakValue and snak.snaktype == 'value' and snak.datavalue.type == 'wikibase-entityid' then value = value:upper() end

	return snakValue == value

	return snakValue == value

end

end

function Config:setRank(rank)

function Config:setRank(rank)

	local rankPos

	local rankPos

	if rank == p.flags.best then

	if rank == p.flags.best then

		self.bestRank = true

		self.bestRank = true

		self.flagBest = true  -- mark that 'best' flag was given

		self.flagBest = true  -- mark that 'best' flag was given

		return

		return

	end

	end

	if rank:sub(1,9) == p.flags.preferred then

	if rank:sub(1,9) == p.flags.preferred then

		rankPos = 1

		rankPos = 1

	elseif rank:sub(1,6) == p.flags.normal then

	elseif rank:sub(1,6) == p.flags.normal then

		rankPos = 2

		rankPos = 2

	elseif rank:sub(1,10) == p.flags.deprecated then

	elseif rank:sub(1,10) == p.flags.deprecated then

		rankPos = 3

		rankPos = 3

	else

	else

		return

		return

	end

	end

	-- one of the rank flags was given, check if another one was given before

	-- one of the rank flags was given, check if another one was given before

	if not self.flagRank then

	if not self.flagRank then

		self.ranks = {false, false, false}  -- no other rank flag given before, so unset ranks

		self.ranks = {false, false, false}  -- no other rank flag given before, so unset ranks

		self.bestRank = self.flagBest       -- unsets bestRank only if 'best' flag was not given before

		self.bestRank = self.flagBest       -- unsets bestRank only if 'best' flag was not given before

		self.flagRank = true                -- mark that a rank flag was given

		self.flagRank = true                -- mark that a rank flag was given

	end

	end

	if rank:sub(-1) == "+" then

	if rank:sub(-1) == "+" then

		for i = rankPos, 1, -1 do

		for i = rankPos, 1, -1 do

			self.ranks[i] = true

			self.ranks[i] = true

		end

		end

	elseif rank:sub(-1) == "-" then

	elseif rank:sub(-1) == "-" then

		for i = rankPos, #self.ranks do

		for i = rankPos, #self.ranks do

			self.ranks[i] = true

			self.ranks[i] = true

		end

		end

	else

	else

		self.ranks[rankPos] = true

		self.ranks[rankPos] = true

	end

	end

end

end

function Config:setPeriod(period)

function Config:setPeriod(period)

	local periodPos

	local periodPos

	if period == p.flags.future then

	if period == p.flags.future then

		periodPos = 1

		periodPos = 1

	elseif period == p.flags.current then

	elseif period == p.flags.current then

		periodPos = 2

		periodPos = 2

	elseif period == p.flags.former then

	elseif period == p.flags.former then

		periodPos = 3

		periodPos = 3

	else

	else

		return

		return

	end

	end

	-- one of the period flags was given, check if another one was given before

	-- one of the period flags was given, check if another one was given before

	if not self.flagPeriod then

	if not self.flagPeriod then

		self.periods = {false, false, false}  -- no other period flag given before, so unset periods

		self.periods = {false, false, false}  -- no other period flag given before, so unset periods

		self.flagPeriod = true                -- mark that a period flag was given

		self.flagPeriod = true                -- mark that a period flag was given

	end

	end

	self.periods[periodPos] = true

	self.periods[periodPos] = true

end

end

function Config:qualifierMatches(claim, id, value)

function Config:qualifierMatches(claim, id, value)

	local qualifiers

	local qualifiers

	if claim.qualifiers then qualifiers = claim.qualifiers[id] end

	if claim.qualifiers then qualifiers = claim.qualifiers[id] end

	if qualifiers then

	if qualifiers then

		for _, v in pairs(qualifiers) do

		for _, v in pairs(qualifiers) do

			if self:snakEqualsValue(v, value) then

			if self:snakEqualsValue(v, value) then

				return true

				return true

			end

			end

		end

		end

	elseif value == "" then

	elseif value == "" then

		-- if the qualifier is not present then treat it the same as the special value 'novalue'

		-- if the qualifier is not present then treat it the same as the special value 'novalue'

		return true

		return true

	end

	end

	return false

	return false

end

end

function Config:rankMatches(rankPos)

function Config:rankMatches(rankPos)

	if self.bestRank then

	if self.bestRank then

		return (self.ranks[rankPos] and self.foundRank >= rankPos)

		return (self.ranks[rankPos] and self.foundRank >= rankPos)

	else

	else

		return self.ranks[rankPos]

		return self.ranks[rankPos]

	end

	end

end

end

function Config:timeMatches(claim)

function Config:timeMatches(claim)

	local startTime = nil

	local startTime = nil

	local startTimeY = nil

	local startTimeY = nil

	local startTimeM = nil

	local startTimeM = nil

	local startTimeD = nil

	local startTimeD = nil

	local endTime = nil

	local endTime = nil

	local endTimeY = nil

	local endTimeY = nil

	local endTimeM = nil

	local endTimeM = nil

	local endTimeD = nil

	local endTimeD = nil

	if self.periods[1] and self.periods[2] and self.periods[3] then

	if self.periods[1] and self.periods[2] and self.periods[3] then

		-- any time

		-- any time

		return true

		return true

	end

	end

	startTime = self:getSingleRawQualifier(claim, aliasesP.startTime)

	startTime = self:getSingleRawQualifier(claim, aliasesP.startTime)

	if startTime and startTime ~= "" and startTime ~= " " then

	if startTime and startTime ~= "" and startTime ~= " " then

		startTimeY, startTimeM, startTimeD = parseDate(startTime)

		startTimeY, startTimeM, startTimeD = parseDate(startTime)

	end

	end

	endTime = self:getSingleRawQualifier(claim, aliasesP.endTime)

	endTime = self:getSingleRawQualifier(claim, aliasesP.endTime)

	if endTime and endTime ~= "" and endTime ~= " " then

	if endTime and endTime ~= "" and endTime ~= " " then

		endTimeY, endTimeM, endTimeD = parseDate(endTime)

		endTimeY, endTimeM, endTimeD = parseDate(endTime)

	end

	end

	if startTimeY ~= nil and endTimeY ~= nil and datePrecedesDate(endTimeY, endTimeM, endTimeD, startTimeY, startTimeM, startTimeD) then

	if startTimeY ~= nil and endTimeY ~= nil and datePrecedesDate(endTimeY, endTimeM, endTimeD, startTimeY, startTimeM, startTimeD) then

		-- invalidate end time if it precedes start time

		-- invalidate end time if it precedes start time

		endTimeY = nil

		endTimeY = nil

		endTimeM = nil

		endTimeM = nil

		endTimeD = nil

		endTimeD = nil

	end

	end

	if self.periods[1] then

	if self.periods[1] then

		-- future

		-- future

		if startTimeY and datePrecedesDate(self.atDate[1], self.atDate[2], self.atDate[3], startTimeY, startTimeM, startTimeD) then

		if startTimeY and datePrecedesDate(self.atDate[1], self.atDate[2], self.atDate[3], startTimeY, startTimeM, startTimeD) then

			return true

			return true

		end

		end

	end

	end

	if self.periods[2] then

	if self.periods[2] then

		-- current

		-- current

		if (startTimeY == nil or not datePrecedesDate(self.atDate[1], self.atDate[2], self.atDate[3], startTimeY, startTimeM, startTimeD)) and

		if (startTimeY == nil or not datePrecedesDate(self.atDate[1], self.atDate[2], self.atDate[3], startTimeY, startTimeM, startTimeD)) and

		   (endTimeY == nil or datePrecedesDate(self.atDate[1], self.atDate[2], self.atDate[3], endTimeY, endTimeM, endTimeD)) then

		   (endTimeY == nil or datePrecedesDate(self.atDate[1], self.atDate[2], self.atDate[3], endTimeY, endTimeM, endTimeD)) then

			return true

			return true

		end

		end

	end

	end

	if self.periods[3] then

	if self.periods[3] then

		-- former

		-- former

		if endTimeY and not datePrecedesDate(self.atDate[1], self.atDate[2], self.atDate[3], endTimeY, endTimeM, endTimeD) then

		if endTimeY and not datePrecedesDate(self.atDate[1], self.atDate[2], self.atDate[3], endTimeY, endTimeM, endTimeD) then

			return true

			return true

		end

		end

	end

	end

	return false

	return false

end

end

function Config:processFlag(flag)

function Config:processFlag(flag)

	if not flag then

	if not flag then

		return false

		return false

	end

	end

	if flag == p.flags.linked then

	if flag == p.flags.linked then

		self.curState.linked = true

		self.curState.linked = true

		return true

		return true

	elseif flag == p.flags.raw then

	elseif flag == p.flags.raw then

		self.curState.rawValue = true

		self.curState.rawValue = true

		if self.curState == self.states[parameters.reference] then

		if self.curState == self.states[parameters.reference] then

			-- raw reference values end with periods and require a separator (other than none)

			-- raw reference values end with periods and require a separator (other than none)

			self.separators["sep%r"][1] = {" "}

			self.separators["sep%r"][1] = {" "}

		end

		end

		return true

		return true

	elseif flag == p.flags.short then

	elseif flag == p.flags.short then

		self.curState.shortName = true

		self.curState.shortName = true

		return true

		return true

	elseif flag == p.flags.multilanguage then

	elseif flag == p.flags.multilanguage then

		self.curState.anyLanguage = true

		self.curState.anyLanguage = true

		return true

		return true

	elseif flag == p.flags.unit then

	elseif flag == p.flags.unit then

		self.curState.unitOnly = true

		self.curState.unitOnly = true

		return true

		return true

	elseif flag == p.flags.mdy then

	elseif flag == p.flags.mdy then

		self.mdyDate = true

		self.mdyDate = true

		return true

		return true

	elseif flag == p.flags.single then

	elseif flag == p.flags.single then

		self.singleClaim = true

		self.singleClaim = true

		return true

		return true

	elseif flag == p.flags.sourced then

	elseif flag == p.flags.sourced then

		self.sourcedOnly = true

		self.sourcedOnly = true

		return true

		return true

	elseif flag == p.flags.edit then

	elseif flag == p.flags.edit then

		self.editable = true

		self.editable = true

		return true

		return true

	elseif flag == p.flags.editAtEnd then

	elseif flag == p.flags.editAtEnd then

		self.editable = true

		self.editable = true

		self.editAtEnd = true

		self.editAtEnd = true

		return true

		return true

	elseif flag == p.flags.best or flag:match('^'..p.flags.preferred..'[+-]?$') or flag:match('^'..p.flags.normal..'[+-]?$') or flag:match('^'..p.flags.deprecated..'[+-]?$') then

	elseif flag == p.flags.best or flag:match('^'..p.flags.preferred..'[+-]?$') or flag:match('^'..p.flags.normal..'[+-]?$') or flag:match('^'..p.flags.deprecated..'[+-]?$') then

		self:setRank(flag)

		self:setRank(flag)

		return true

		return true

	elseif flag == p.flags.future or flag == p.flags.current or flag == p.flags.former then

	elseif flag == p.flags.future or flag == p.flags.current or flag == p.flags.former then

		self:setPeriod(flag)

		self:setPeriod(flag)

		return true

		return true

	elseif flag == "" then

	elseif flag == "" then

		-- ignore empty flags and carry on

		-- ignore empty flags and carry on

		return true

		return true

	else

	else

		return false

		return false

	end

	end

end

end

function Config:processFlagOrCommand(flag)

function Config:processFlagOrCommand(flag)

	local param = ""

	local param = ""

	if not flag then

	if not flag then

		return false

		return false

	end

	end

	if flag == p.claimCommands.property or flag == p.claimCommands.properties then

	if flag == p.claimCommands.property or flag == p.claimCommands.properties then

		param = parameters.property

		param = parameters.property

	elseif flag == p.claimCommands.qualifier or flag == p.claimCommands.qualifiers then

	elseif flag == p.claimCommands.qualifier or flag == p.claimCommands.qualifiers then

		self.states.qualifiersCount = self.states.qualifiersCount + 1

		self.states.qualifiersCount = self.states.qualifiersCount + 1

		param = parameters.qualifier .. self.states.qualifiersCount

		param = parameters.qualifier .. self.states.qualifiersCount

		self.separators["sep"..param] = {copyTable(defaultSeparators["sep%q\\d"])}

		self.separators["sep"..param] = {copyTable(defaultSeparators["sep%q\\d"])}

	elseif flag == p.claimCommands.reference or flag == p.claimCommands.references then

	elseif flag == p.claimCommands.reference or flag == p.claimCommands.references then

		param = parameters.reference

		param = parameters.reference

	else

	else

		return self:processFlag(flag)

		return self:processFlag(flag)

	end

	end

	if self.states[param] then

	if self.states[param] then

		return false

		return false

	end

	end

	-- create a new state for each command

	-- create a new state for each command

	self.states[param] = State:new(self, param)

	self.states[param] = State:new(self, param)

	-- use "%x" as the general parameter name

	-- use "%x" as the general parameter name

	self.states[param].parsedFormat = parseFormat(parameters.general)  -- will be overwritten for param=="%p"

	self.states[param].parsedFormat = parseFormat(parameters.general)  -- will be overwritten for param=="%p"

	-- set the separator

	-- set the separator

	self.states[param].separator = self.separators["sep"..param]  -- will be nil for param=="%p", which will be set separately

	self.states[param].separator = self.separators["sep"..param]  -- will be nil for param=="%p", which will be set separately

	if flag == p.claimCommands.property or flag == p.claimCommands.qualifier or flag == p.claimCommands.reference then

	if flag == p.claimCommands.property or flag == p.claimCommands.qualifier or flag == p.claimCommands.reference then

		self.states[param].singleValue = true

		self.states[param].singleValue = true

	end

	end

	self.curState = self.states[param]

	self.curState = self.states[param]

	return true

	return true

end

end