Module:Is instance

Module documentation[view] [edit] [history] [purge]

Usage

{{#invoke:Is instance|main|qid=|value=}}

This module will use Wikidata properties instance of (P31) and subclass of (P279) to determine whether or not an entity is an instance of some other entity.

Example

For example:

• HMS Ark Royal (Q847672)
  • is an instance of light aircraft carrier (Q1185562), which
    • is a subclass of aircraft carrier (Q17205), which
      • is a subclass of warship (Q3114762), which
        • is a subclass of naval vessel (Q177597), which
          • is a subclass of ship (Q11446).

To know that HMS Ark Royal (Q847672) is an instance of ship (Q11446), you can use:

{{#invoke:Is instance|main|qid=Q847672|value=Q11446}} = true

The output number indicates the minimum recursion depth to find the value required. An output of zero indicates that the item is not an instance.

Maximum depth

For performance considerations, the module will not go on searching indefinitely. The default maximum recursion depth is 5. If you want to change this, use the |maxdepth= parameter.

The above documentation is transcluded from Module:Is instance/doc. (edit | history)
Editors can experiment in this module's sandbox (edit | diff) and testcases (edit | run) pages.
Subpages of this module.

local p = {};

local function checksubclass(depth) -- check subclasses of items at current depth
	for j=1,#checklist[depth],1 do
		local subclasses = mw.wikibase.getBestStatements(checklist[depth][j],"P279")
		checklist[depth+1] = {}
		for i,statement in ipairs(subclasses) do
			local newitem = statement.mainsnak.datavalue.value.id
			if newitem == value then
				isInstance = true
				break
			else
				checklist[depth+1][#checklist[depth+1]+1] = newitem -- Add item to next depth of checklist table
			end
		end
		if isInstance then
			break -- break away from loop if instance found
		end
	end
	return isInstance
end

local function checkitem(depth)
	local instances = mw.wikibase.getBestStatements(checklist[depth][1],"P31")
	checklist[1] = {}
	for i,statement in ipairs(instances) do
		local newitem = statement.mainsnak.datavalue.value.id
		if newitem == value then
			isInstance = true
			break
		end
		checklist[1][#checklist[depth+1]+1] = newitem
	end
	while not isInstance and depth<maxdepth do
		depth = depth+1
		checksubclass(depth)
	end
	return isInstance
end

function p.main(frame)
	local args = frame.args
	local pargs = frame:getParent().args
	maxdepth = 5
	local qid = args.qid or pargs.qid
	checklist = {}
	checklist[0] = {qid}
	value = args.value or pargs.value
	return checkitem(0)
end

return p