Module:Sandbox/ProcrastinatingReader/ib: Difference between revisions

Revision as of 12:23, 5 December 2020

Latest revision as of 13:37, 5 December 2020

(6 intermediate revisions by the same user not shown)

Line 2:

local p = {}

local function isempty(s)

return s == nil or s == ''

end

local function dataValue(frame, settlementName, parameterName, itemName)

Line 10 ⟶ 14:

end

local function getNetValue(frame, argCategory, argName)

local args = getArgs(frame)

local argType = args['arg_type'] and (args['arg_type']..'_') or ''

local netparamName = args['area_'..argTypeargCategory..'_'..argName] or dataValue(frame, args['subdivision_name'], 'area_'..argType..'_'..argName, args['name'])

local net = args[paramName] or dataValue(frame, args['subdivision_name'], paramName, args['name'])

return net

end

Line 34 ⟶ 41:

local args = getArgs(frame)

local argCategory = 'area'

return frame:expandTemplate{ title = 'infobox_settlement/areadisp', args = {

['km2'] = getNetValue(frame, 'km2'),

['ha'] local km2 = getNetValue(frame, argCategory, 'hakm2'),

['acre'] local ha = getNetValue(frame, argCategory, 'acreha'),

['sqmi'] local acre = getNetValue(frame, argCategory, 'sq_miacre'),

['dunam'] local sqmi = getNetValue(frame, argCategory, 'dunamsq_mi'),

local dunam = getNetValue(frame, argCategory, 'dunam')

['link'] = args['dunam_link'],

['pref'] = args['unit_pref'],

if not (isempty(km2) and isempty(ha) and isempty(acre) and isempty(sqmi) and isempty(dunam)) then

['name'] = args['subdivision_name'],

return frame:expandTemplate{ title = 'infobox_settlement/areadisp', args = {

['mag'] = args['area_magnitude']

['km2'] = km2,

}}

['ha'] = ha,

['acre'] = acre,

['sqmi'] = sqmi,

['dunam'] = dunam,

['link'] = args['dunam_link'],

['pref'] = args['unit_pref'],

['name'] = args['subdivision_name'],

['mag'] = args['area_magnitude']

}}

else

return ""

end

end

function p.demographics(frame)

local args = getArgs(frame)

local tArgs = {

['child'] = 'yes',

['headerstyle'] = 'text-align:left',

}}

for i = 1,2 do

local dtype = getNetValue(frame, 'demographics', 'type'..i)

if not isempty(dtype) then

local series = i + 20 * (i-1)

tArgs['header'..series] = dtype..'<div style="font-weight:normal;display:inline;">'.. getNetValue(frame, 'demographics1', 'footnotes') ..'</div>'

tArgs['rowclass'..series] = 'mergedtoprow'

for j = 1,10 do

local dval = getNetValue(frame, 'demographics1', 'title'..j)

if not isempty(dval) then

tArgs['rowclass'..(series + j)] = 'mergedrow'

tArgs['label'..(series + j)] = '&nbsp;•&nbsp;'..getNetValue(frame, 'demographics1', 'title'..j)

tArgs['data'..(series + j)] = getNetValue(frame, 'demographics1', 'info'..j)

end

end

end

end

return frame:expandTemplate{ title = 'infobox', args = tArgs}

end

function p.generic(frame)

local args = getArgs(frame)

local paramName = args['param_name']

['km2'] = return getNetValue(frame, 'km2area', paramName),

end