Module:Harmonics in cet - Revision history

FloraC: Comment out problem parts for the moment

2025-08-17T11:31:55Z

Comment out problem parts for the moment

← Older revision		Revision as of 11:31, 17 August 2025
Line 14:		Line 14:
	local trel = {"! [[Relative interval error\|Relative]] ([[relative cent\|%]]) "}		local trel = {"! [[Relative interval error\|Relative]] ([[relative cent\|%]]) "}
	local tdeg		local tdeg
	if reduction then
	tdeg = {"! colspan=\"2\" \| Steps<br>([[octave reduction\|reduced]])"}		-- TODO: determine `steps`
	else		-- if reduction then
	tdeg = {"! colspan=\"2\" \| Step"}		-- tdeg = {"! colspan=\"2\" \| Steps<br>([[octave reduction\|reduced]])"}
	end		-- else
			-- tdeg = {"! colspan=\"2\" \| Step"}
			-- end

			tdeg = {"! colspan=\"2\" \| Step"}
	local fmt_abs = string.format(" %%+.%df", prec)		local fmt_abs = string.format(" %%+.%df", prec)
	local fmt_rel = " %+.1f"		local fmt_rel = " %+.1f"
Line 30:		Line 34:
	table.insert(tabs, "" .. string.gsub(string.format(fmt_abs, 1200 * (ev - v) * size), "%-", "-"))		table.insert(tabs, "" .. string.gsub(string.format(fmt_abs, 1200 * (ev - v) * size), "%-", "-"))
	table.insert(trel, "" .. string.gsub(string.format(fmt_rel, 100 * (ev - v)), "%-", "-"))		table.insert(trel, "" .. string.gsub(string.format(fmt_rel, 100 * (ev - v)), "%-", "-"))
	if reduction then
	table.insert(tdeg, "" .. ev .. "<br>(".. ev % steps .. ")")		-- TODO: determine `steps`
	else		-- if reduction then
	table.insert(tdeg, "" .. ev)		-- table.insert(tdeg, "" .. ev .. "<br>(".. ev % steps .. ")")
	end		-- else
			-- table.insert(tdeg, "" .. ev)
			-- end

			table.insert(tdeg, "" .. ev)
	end		end
	local titleMarkup = ""		local titleMarkup = ""

FloraC: Fix module dependency

2025-08-17T11:24:58Z

Fix module dependency

← Older revision		Revision as of 11:24, 17 August 2025
Line 1:		Line 1:
	local yesno = require("Module:yesno")		local yesno = require("Module:yesno")
			local utils = require("Module:Utils")
	local p = {}		local p = {}

FloraC: Implement features following Module: Harmonics in equal

2025-08-17T11:24:06Z

Implement features following Module: Harmonics in equal

← Older revision		Revision as of 11:24, 17 August 2025
Line 2:		Line 2:
	local p = {}		local p = {}

	local function approx(step, intervals, title, prec)		local function approx(step, intervals, title, prec, reduction, collapsed)
			local thead
			if collapsed then
			thead = "{\| class=\"wikitable center-all mw-collapsible mw-collapsed\"\n"
			else
			thead = "{\| class=\"wikitable center-all\"\n"
			end
	local tpri = {"! colspan=\"2\" \| Harmonic "}		local tpri = {"! colspan=\"2\" \| Harmonic "}
	local tabs = {"! rowspan=\"2\" \| Error \n! Absolute ([[cent\|¢]]) "}		local tabs = {"! rowspan=\"2\" \| Error \n! Absolute ([[cent\|¢]]) "}
	local trel = {"! [[Relative interval error\|Relative]] (%) "}		local trel = {"! [[Relative interval error\|Relative]] ([[relative cent\|%]]) "}
	local tdeg = {"! colspan=\"2\" \| Steps"}		local tdeg
			if reduction then
			tdeg = {"! colspan=\"2\" \| Steps<br>([[octave reduction\|reduced]])"}
			else
			tdeg = {"! colspan=\"2\" \| Step"}
			end
	local fmt_abs = string.format(" %%+.%df", prec)		local fmt_abs = string.format(" %%+.%df", prec)
	local fmt_rel = " %+.1f"		local fmt_rel = " %+.1f"
Line 19:		Line 29:
	table.insert(tabs, "" .. string.gsub(string.format(fmt_abs, 1200 * (ev - v) * size), "%-", "-"))		table.insert(tabs, "" .. string.gsub(string.format(fmt_abs, 1200 * (ev - v) * size), "%-", "-"))
	table.insert(trel, "" .. string.gsub(string.format(fmt_rel, 100 * (ev - v)), "%-", "-"))		table.insert(trel, "" .. string.gsub(string.format(fmt_rel, 100 * (ev - v)), "%-", "-"))
	table.insert(tdeg, "" .. ev)		if reduction then
			table.insert(tdeg, "" .. ev .. "<br>(".. ev % steps .. ")")
			else
			table.insert(tdeg, "" .. ev)
			end
	end		end
			local titleMarkup = ""
			if title then
			titleMarkup = "\|+ style=\"font-size: 105%; white-space: nowrap;\" \| " .. title .. "\n"
			end

			thead = thead ..
			titleMarkup ..
			"\|-\n" ..
			table.concat(tpri, "\n! ") .. "\n" ..
			"\|-\n" ..
			table.concat(tabs, "\n\| ") .. "\n" ..
			"\|-\n" ..
			table.concat(trel, "\n\| ") .. "\n" ..
			"\|-\n" ..
			table.concat(tdeg, "\n\| ") .. "\n" ..
			"\|}"

	return ~~"{\| class=\"wikitable center-all\"\n"~~		return thead
	~~.. "\|+ style=\"font-size: 105%; white-space: nowrap;\" \| " .. title .. "\n"~~
	~~.. "\|-\n"~~
	~~.. table.concat(tpri, "\n!") .. "\n"~~
	~~.. "\|-\n"~~
	~~.. table.concat(tabs, "\n\|") .. "\n"~~
	~~.. "\|-\n"~~
	~~.. table.concat(trel, "\n\|") .. "\n"~~
	~~.. "\|-\n"~~
	~~.. table.concat(tdeg, "\n\|") .. "\n"~~
	~~.. "\|}"~~
	end		end

Line 65:		Line 85:
	local step = eval_num_arg(frame.args["step"], 63.1578947368)		local step = eval_num_arg(frame.args["step"], 63.1578947368)
	-- optional number of columns, default: 10		-- optional number of columns, default: 10
	local columns = eval_num_arg(frame.args["columns"], 10)		local columns = eval_num_arg(frame.args["columns"], 11)
	-- optional start column, default: start with prime 2		-- optional start column, default: start with prime 2
	local start = eval_num_arg(frame.args["start"], 1)		local start = eval_num_arg(frame.args["start"], 1)
	-- option intervals		-- option intervals
	local select_intervals = "integer"		local select_intervals = "integer"

			local name = "1ed" .. step .. "c"

			-- override default intervals
	if frame.args["intervals"] and string.len(frame.args["intervals"]) > 0 then		if frame.args["intervals"] and string.len(frame.args["intervals"]) > 0 then
	select_intervals = frame.args["intervals"]		select_intervals = frame.args["intervals"]
	end		end

	~~local name = "1ed" .. step .. "c"~~

	~~title_intervals = "prime harmonics"~~
	if select_intervals == "odd" then		if select_intervals == "odd" then
	title_intervals = "odd harmonics"		title_intervals = "odd harmonics"
	elseif select_intervals == "integer" then		elseif select_intervals == "integer" then
	title_intervals = "harmonics"		title_intervals = "harmonics"
			else
			title_intervals = "prime harmonics"
	end		end

Line 89:		Line 112:
	-- optional precision for abs error, default about 3 digits		-- optional precision for abs error, default about 3 digits
	local prec = eval_num_arg(frame.args["prec"], prec_by_cet(step))		local prec = eval_num_arg(frame.args["prec"], prec_by_cet(step))
			local reduction = true
			if steps == 1 then
			reduction = false
			end

	local ~~result~~ = ~~approx~~(~~step, {unpack(intervals~~[~~select_intervals~~]~~, start, start + columns - 1)}, title, prec~~)		local collapsed = utils.value_provided(frame.args["collapsed"])
	local debugg = yesno(frame.args["debug"])		local debugg = yesno(frame.args["debug"])
			local result = approx(step, {unpack(intervals[select_intervals], start, start + columns - 1)}, title, prec, reduction, collapsed)

	if debugg == true then		if debugg == true then

ArrowHead294 at 12:05, 1 June 2025

2025-06-01T12:05:27Z

← Older revision		Revision as of 12:05, 1 June 2025
Line 92:		Line 92:
	local result = approx(step, {unpack(intervals[select_intervals], start, start + columns - 1)}, title, prec)		local result = approx(step, {unpack(intervals[select_intervals], start, start + columns - 1)}, title, prec)
	local debugg = yesno(frame.args["debug"])		local debugg = yesno(frame.args["debug"])
	~~return frame:preprocess(~~debugg == true ~~and~~ "<syntaxhighlight lang=\"wikitext\">" .. result .. "</syntaxhighlight>" or result)
			if debugg == true then
			result = "<syntaxhighlight lang=\"wikitext\">" .. result .. "</syntaxhighlight>"
			end

			return frame:preprocess(result)
	end		end

	return p		return p

ArrowHead294 at 12:09, 19 May 2025

2025-05-19T12:09:55Z

← Older revision		Revision as of 12:09, 19 May 2025
Line 23:		Line 23:

	return "{\| class=\"wikitable center-all\"\n"		return "{\| class=\"wikitable center-all\"\n"
	.. "\|+ style=\"font-size: 105%;\" \| " .. title .. "\n"		.. "\|+ style=\"font-size: 105%; white-space: nowrap;\" \| " .. title .. "\n"
	.. "\|-\n"		.. "\|-\n"
	.. table.concat(tpri, "\n!") .. "\n"		.. table.concat(tpri, "\n!") .. "\n"

ArrowHead294 at 13:34, 2 May 2025

2025-05-02T13:34:19Z

← Older revision		Revision as of 13:34, 2 May 2025
Line 90:		Line 90:
	local prec = eval_num_arg(frame.args["prec"], prec_by_cet(step))		local prec = eval_num_arg(frame.args["prec"], prec_by_cet(step))

	local ~~out_str~~ = approx(step, {unpack(intervals[select_intervals], start, start + columns - 1)}, title, prec)		local result = approx(step, {unpack(intervals[select_intervals], start, start + columns - 1)}, title, prec)
	local debugg = yesno(frame.args["debug"])		local debugg = yesno(frame.args["debug"])
	return frame:preprocess(debugg == true and "<~~pre~~>" .. ~~out_str~~ .. "</~~pre~~>" or ~~out_str~~)		return frame:preprocess(debugg == true and "<syntaxhighlight lang=\"wikitext\">" .. result .. "</syntaxhighlight>" or result)
	end		end

	return p		return p

ArrowHead294 at 22:29, 12 February 2025

2025-02-12T22:29:37Z

← Older revision		Revision as of 22:29, 12 February 2025
Line 1:		Line 1:
			local yesno = require("Module:yesno")
	local p = {}		local p = {}

Line 90:		Line 91:

	local out_str = approx(step, {unpack(intervals[select_intervals], start, start + columns - 1)}, title, prec)		local out_str = approx(step, {unpack(intervals[select_intervals], start, start + columns - 1)}, title, prec)
	local debugg = frame.args["debug"]		local debugg = yesno(frame.args["debug"])
	return frame:preprocess(debugg == "true" and "<pre>" .. out_str .. "</pre>" or out_str)		return frame:preprocess(debugg == true and "<pre>" .. out_str .. "</pre>" or out_str)
	end		end

	return p		return p

ArrowHead294 at 13:44, 3 February 2025

2025-02-03T13:44:12Z

← Older revision		Revision as of 13:44, 3 February 2025
Line 89:		Line 89:
	local prec = eval_num_arg(frame.args["prec"], prec_by_cet(step))		local prec = eval_num_arg(frame.args["prec"], prec_by_cet(step))

	~~return~~ approx(step, {unpack(intervals[select_intervals], start, start + columns - 1)}, title, prec)		local out_str = approx(step, {unpack(intervals[select_intervals], start, start + columns - 1)}, title, prec)
			local debugg = frame.args["debug"]
			return frame:preprocess(debugg == "true" and "<pre>" .. out_str .. "</pre>" or out_str)
	end		end

	return p		return p

ArrowHead294 at 14:24, 10 September 2024

2024-09-10T14:24:03Z

← Older revision		Revision as of 14:24, 10 September 2024
Line 8:		Line 8:

	local fmt_abs = string.format(" %%+.%df", prec)		local fmt_abs = string.format(" %%+.%df", prec)
	local fmt_rel = " %+.0f"		local fmt_rel = " %+.1f"
	local size = step / 1200		local size = step / 1200

Line 37:		Line 37:

	intervals.prime = {2, 3, 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47, 53, 59, 61, 67, 71, 73, 79, 83, 89, 97 }		intervals.prime = {2, 3, 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47, 53, 59, 61, 67, 71, 73, 79, 83, 89, 97 }
	~~-- intervals.prime_no2 = {3, 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47, 53, 59, 61, 67, 71, 73, 79, 83, 89, 97 }~~
	intervals.odd = {3, 5, 7, 9, 11, 13, 15, 17, 19, 21, 23, 25, 27, 29, 31, 33, 35, 37, 39, 41, 43, 45, 47, 49, 51, 53 }		intervals.odd = {3, 5, 7, 9, 11, 13, 15, 17, 19, 21, 23, 25, 27, 29, 31, 33, 35, 37, 39, 41, 43, 45, 47, 49, 51, 53 }
	intervals.integer = {2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64}		intervals.integer = {2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64}

ArrowHead294: Undid revision 147909 by ArrowHead294 (talk)

2024-07-15T14:20:12Z

Undid revision 147909 by ArrowHead294 (talk)

← Older revision		Revision as of 14:20, 15 July 2024
Line 23:		Line 23:
	return "{\| class=\"wikitable center-all\"\n"		return "{\| class=\"wikitable center-all\"\n"
	.. "\|+ style=\"font-size: 105%;\" \| " .. title .. "\n"		.. "\|+ style=\"font-size: 105%;\" \| " .. title .. "\n"
	.. "\|-\n! "		.. "\|-\n"
	.. table.concat(tpri, " !! ") .. "\n"		.. table.concat(tpri, "\n!") .. "\n"
	.. "\|-\n\| "		.. "\|-\n"
	.. table.concat(tabs, " \|\| ") .. "\n"		.. table.concat(tabs, "\n\|") .. "\n"
	.. "\|-\n\| "		.. "\|-\n"
	.. table.concat(trel, " \|\| ") .. "\n"		.. table.concat(trel, "\n\|") .. "\n"
	.. "\|-\n\| "		.. "\|-\n"
	.. table.concat(tdeg, " \|\| ") .. "\n"		.. table.concat(tdeg, "\n\|") .. "\n"
	.. "\|}"		.. "\|}"
	end		end

← Older revision		Revision as of 14:20, 15 July 2024
Line 23:		Line 23:
	return "{\| class=\"wikitable center-all\"\n"		return "{\| class=\"wikitable center-all\"\n"
	.. "\|+ style=\"font-size: 105%;\" \| " .. title .. "\n"		.. "\|+ style=\"font-size: 105%;\" \| " .. title .. "\n"
	.. "\|-\n! "		.. "\|-\n"
	.. table.concat(tpri, " !! ") .. "\n"		.. table.concat(tpri, "\n!") .. "\n"
	.. "\|-\n\| "		.. "\|-\n"
	.. table.concat(tabs, " \|\| ") .. "\n"		.. table.concat(tabs, "\n\|") .. "\n"
	.. "\|-\n\| "		.. "\|-\n"
	.. table.concat(trel, " \|\| ") .. "\n"		.. table.concat(trel, "\n\|") .. "\n"
	.. "\|-\n\| "		.. "\|-\n"
	.. table.concat(tdeg, " \|\| ") .. "\n"		.. table.concat(tdeg, "\n\|") .. "\n"
	.. "\|}"		.. "\|}"
	end		end