Module:Clade/sequential - Revision history

Jts1882: add reverse to default

2019-10-31T11:51:12Z

add reverse to default

← Previous revision		Revision as of 11:51, 31 October 2019
Line 35:		Line 35:
	end		end

			local template = "Clade"
			if pargs ['reverse'] then template = "CladeR" end

		⚫	return frame:expandTemplate{ title = template, args = args }

⚫	return frame:expandTemplate{ title = ~~"Clade"~~, args = args }
	end		end
	function p.inverseClade(frame,i,max) -- \|1= innermost at bottom		function p.inverseClade(frame,i,max) -- \|1= innermost at bottom

Jts1882: add reverse

2019-10-31T11:26:55Z

add reverse

← Previous revision		Revision as of 11:26, 31 October 2019
Line 52:		Line 52:
	args[1] = p.inverseClade(frame,i-1,max) -- or the result of the next pair		args[1] = p.inverseClade(frame,i-1,max) -- or the result of the next pair
	end		end
			local template = "Clade"

			if pargs ['reverse'] then template = "CladeR" end
	return frame:expandTemplate{ title = ~~"Clade"~~, args = args }		return frame:expandTemplate{ title = template , args = args }
	end		end
	function p.inverseClade2(frame,i,max) -- \|1= is innermost at bottom		function p.inverseClade2(frame,i,max) -- \|1= is innermost at bottom

Jts1882: add sublabel

2019-10-31T10:33:21Z

add sublabel

← Previous revision		Revision as of 10:33, 31 October 2019
Line 25:		Line 25:
	args[1] = pargs [i]		args[1] = pargs [i]
	args['label1'] = pargs ['label'..tostring(i)]		args['label1'] = pargs ['label'..tostring(i)]
			args['sublabel1'] = pargs ['sublabel'..tostring(i)]

	if i+1 == max then		if i+1 == max then
	args[2] = pargs [i+1]		args[2] = pargs [i+1]
	args['label2'] = pargs ['label'..tostring(i+1)]		args['label2'] = pargs ['label'..tostring(i+1)]
			args['sublabel2'] = pargs ['sublabel'..tostring(i+1)]
	else		else
	args[2] = p.clade(frame,i+1,max) -- or the result of the next pair		args[2] = p.clade(frame,i+1,max) -- or the result of the next pair
Line 41:		Line 44:
	args[2] = pargs [i]		args[2] = pargs [i]
	args['label2'] = pargs ['label'..tostring(i)]		args['label2'] = pargs ['label'..tostring(i)]
			args['sublabel2'] = pargs ['sublabel'..tostring(i)]
	if i-1 == 1 then		if i-1 == 1 then
	args[1] = pargs [i-1]		args[1] = pargs [i-1]
	args['label1'] = pargs ['label'..tostring(i-1)]		args['label1'] = pargs ['label'..tostring(i-1)]
			args['sublabel1'] = pargs ['sublabel'..tostring(i-1)]
	else		else
	args[1] = p.inverseClade(frame,i-1,max) -- or the result of the next pair		args[1] = p.inverseClade(frame,i-1,max) -- or the result of the next pair

Jts1882: invert

2019-10-31T09:25:28Z

invert

← Previous revision		Revision as of 09:25, 31 October 2019
Line 20:		Line 20:
	end		end

	function p.clade(frame,i,max)		function p.clade(frame,i,max) -- \|1= is basal at top
	local args = {}		local args = {}

Line 36:		Line 36:
	return frame:expandTemplate{ title = "Clade", args = args }		return frame:expandTemplate{ title = "Clade", args = args }
	end		end
	function p.inverseClade(frame,i,max)		function p.inverseClade(frame,i,max) -- \|1= innermost at bottom
			local args = {}
		⚫
			args[2] = pargs [i]
			args['label2'] = pargs ['label'..tostring(i)]
			if i-1 == 1 then
			args[1] = pargs [i-1]
			args['label1'] = pargs ['label'..tostring(i-1)]
			else
			args[1] = p.inverseClade(frame,i-1,max) -- or the result of the next pair
			end

			return frame:expandTemplate{ title = "Clade", args = args }
			end
			function p.inverseClade2(frame,i,max) -- \|1= is innermost at bottom
	local args = {}		local args = {}

Line 47:		Line 61:
	args[2] = p.inverseClade(frame,i-1,max) -- or the result of the next pair		args[2] = p.inverseClade(frame,i-1,max) -- or the result of the next pair
	end		end

⚫


	return frame:expandTemplate{ title = "Clade", args = args }		return frame:expandTemplate{ title = "Clade", args = args }
	end		end

Jts1882: add inverse

2019-10-31T09:14:39Z

add inverse

@@ Line 9: / Line 9: @@
 	local contentString = ""
     local max = getMax()
 	return contentString
@@ Line 32: / Line 36: @@
 	return frame:expandTemplate{ title = "Clade", args = args }
 end
 function getMax()
 	local i=1

Jts1882: create

2019-10-31T08:41:54Z

create

New page

local p = {}
local pargs
function p.main(frame)

pargs = frame:getParent().args

local args = {}
local i=1
local contentString = ""
local max = getMax()

contentString = p.clade(frame,1,max)

return contentString

end

function p.clade(frame,i,max)
local args = {}

args[1] = pargs [i]
args['label1'] = pargs ['label'..tostring(i)]
if i+1 == max then
args[2] = pargs [i+1]
args['label2'] = pargs ['label'..tostring(i+1)]
else
args[2] = p.clade(frame,i+1,max) -- or the result of the next pair
end

return frame:expandTemplate{ title = "Clade", args = args }
end

function getMax()
local i=1
local max
while i<50 do
if pargs [i] then
max = i
i=i+1
else
break
end
end
return max
end

return p