Module:Harmonics intro - Revision history

FloraC at 19:51, 11 October 2026

2026-10-11T19:51:24Z

← Older revision		Revision as of 19:51, 11 October 2026
Line 47:		Line 47:
	n		n
	)		)
	~~out[#out + 1] = string.format("Used as a scale, this set is also called mode %d of the subharmonic series. ", n)~~
	else		else
	out[#out + 1] = string.format(		out[#out + 1] = string.format(
Line 56:		Line 55:
	chord(n, 2 * n), n		chord(n, 2 * n), n
	)		)
	~~out[#out + 1] = string.format("Used as a scale, it is also called mode %d of the harmonic series. ", n)~~
	end		end

FloraC: Try new intro, discussed in XA Discord

2026-10-11T19:49:59Z

Try new intro, discussed in XA Discord

← Older revision		Revision as of 19:49, 11 October 2026
Line 1:		Line 1:
	-- Module:Harmonics intro		-- Module: Harmonics intro
	-- Generates the opening sentences of the "Harmonics n–2n" and "Subharmonics n–2n" pages.		-- Generates the opening sentences of the "Harmonics n–2n" and "Subharmonics n–2n" pages.
	-- Called through Template:Harmonics intro and Template:Subharmonics intro.		-- Called through Template: Harmonics intro and Template: Subharmonics intro.
	local p = {}		local p = {}
	local getArgs = require("Module:Arguments").getArgs		local getArgs = require("Module:Arguments").getArgs
Line 7:		Line 7:
	local EN_DASH = "–"		local EN_DASH = "–"

	-- "n:(n+1):…:2n", written out in full for small n		-- "n:(n + 1):…:2n", written out in full for small n
	local function chord(lo, hi)		local function chord(lo, hi)
	if hi - lo <= 7 then		if hi - lo <= 7 then
Line 27:		Line 27:
	local n = tonumber(args[1] or args.n)		local n = tonumber(args[1] or args.n)
	if not n or n < 1 or n ~= math.floor(n) then		if not n or n < 1 or n ~= math.floor(n) then
	return '<strong class="error">Template:Harmonics intro requires a positive integer, e.g. <code>{{Harmonics intro\|12}}</code>.</strong>'		return '<strong class="error">Template: Harmonics intro requires a positive integer, e.g. <code>{{Harmonics intro\|12}}</code>.</strong>'
	end		end
	local range = n .. EN_DASH .. 2 * n		local range = n .. EN_DASH .. 2 * n
Line 38:		Line 38:
	if sub then		if sub then
	out[#out + 1] = string.format(		out[#out + 1] = string.format(
	"The '''%s''' are ~~the~~ [[subharmonic]]s %d through %d of the [[subharmonic series]]. Above the root they form the ratios %d/%d, %d/%d, …, %d/%d and ~~span one~~ octave. ",		"The '''%s''' are a scale that consists of [[subharmonic]]s %d through %d of the [[subharmonic series]]. Above the root they form the ratios %d/%d, %d/%d, …, %d/%d and repeat at the octave. " ..
			"Used as a [[tuning system]], it is also called '''%difdo'''. ",
	phrase,		phrase,
	n,		n, 2 * n,
	2 * n,		2 * n, 2 * n,
	2 * n,		2 * n, 2 * n - 1,
	2 * n,		2 * n, n,
	2 * n,
	2 * n - 1,
	2 * n,
	n		n
	)		)
Line 52:		Line 50:
	else		else
	out[#out + 1] = string.format(		out[#out + 1] = string.format(
	"The '''~~[[Harmonic~~ series~~#Segments\|harmonic~~ segment]] %d::%d''' ~~(also~~ '''%s''') consists of harmonics %d through %d (%s) and ~~spans one~~ octave ~~above the root~~. ",		"The '''%s''' (also '''harmonic series segment %d::%d''' or '''harmonic series mode %d''') are a scale that consists of harmonics %d through %d (%s) and repeats at the [[octave]]. " ..
	n,		"Used as a [[tuning system]], it is also called '''%dafdo'''. ",
	2 * n,		phrase,
	~~phrase~~,		n, 2 * n, n, n, 2 * n,
	n,		chord(n, 2 * n), n
	2 * n,
	chord(n, 2 * n)
	)		)
	out[#out + 1] = string.format("Used as a scale, it is also called mode %d of the harmonic series. ", n)		out[#out + 1] = string.format("Used as a scale, it is also called mode %d of the harmonic series. ", n)

Sintel: phrasing

2026-10-10T23:48:50Z

phrasing

← Older revision		Revision as of 23:48, 10 October 2026
Line 29:		Line 29:
	return '<strong class="error">Template:Harmonics intro requires a positive integer, e.g. <code>{{Harmonics intro\|12}}</code>.</strong>'		return '<strong class="error">Template:Harmonics intro requires a positive integer, e.g. <code>{{Harmonics intro\|12}}</code>.</strong>'
	end		end
	local ~~base~~ = ~~sub and "Subharmonics" or "Harmonics"~~		local range = n .. EN_DASH .. 2 * n
	local ~~twin~~ = sub and "Harmonics" or "Subharmonics"		local twin_title = (sub and "Harmonics " or "Subharmonics ") .. range
	~~local title = string~~.~~format("%s %d%s%d", base, n, EN_DASH, 2 * n)~~
	~~local twin_title = string~~.~~format("%s %d%s%d", twin, n, EN_DASH, 2 * n)~~

	-- ~~first sentence~~		-- "harmonics 12–24" is a noun phrase, not the name of a scale: plural, lower case
	~~local bold =~~ "~~'''~~" ~~.. title .. "'''"~~		local phrase = (sub and "subharmonics " or "harmonics ") .. range
	~~local akas = {}~~
	~~for~~ name ~~in mw.text.gsplit(args.aka or ""~~, ~~"%s;%s") do~~
	~~if name ~= "" then~~
	~~akas[#akas + 1] = "'''" .. name .. "'''"~~
	~~end~~
	~~end~~
	local ~~aka~~ = ""
	~~if #akas > 0 then~~
	~~aka = ", also known as " .. table.concat(akas,~~ " ~~and~~ ") .. ~~","~~
	~~end~~

	local out = {}		local out = {}
	if sub then		if sub then
	out[#out + 1] = string.format(		out[#out + 1] = string.format(
	"%s~~%s is the scale formed by~~ the [[subharmonic]]s %d through %d of the [[subharmonic series]]~~, that is,~~ the ratios %d/%d, %d/%d, …, %d/%d ~~above the root~~. ",		"The '''%s''' are the [[subharmonic]]s %d through %d of the [[subharmonic series]]. Above the root they form the ratios %d/%d, %d/%d, …, %d/%d and span one octave. ",
	~~bold,~~		phrase,
	~~aka~~,
	n,		n,
	2 * n,		2 * n,
Line 62:		Line 49:
	n		n
	)		)
			out[#out + 1] = string.format("Used as a scale, this set is also called mode %d of the subharmonic series. ", n)
	else		else
	out[#out + 1] = string.format(		out[#out + 1] = string.format(
	"~~%s%s is the~~ [[Harmonic series#Segments\|harmonic segment]] %d::%d~~, consisting~~ of harmonics %d through %d (%s) and ~~spanning~~ one octave above the root. ",		"The '''[[Harmonic series#Segments\|harmonic segment]] %d::%d''' (also '''%s''') consists of harmonics %d through %d (%s) and spans one octave above the root. ",
	~~bold,~~
	~~aka~~,
	n,		n,
	2 * n,		2 * n,
			phrase,
	n,		n,
	2 * n,		2 * n,
	chord(n, 2 * n)		chord(n, 2 * n)
	)		)
			out[#out + 1] = string.format("Used as a scale, it is also called mode %d of the harmonic series. ", n)
			end

			-- other names, given as aka="name; name"
			local akas = {}
			for name in mw.text.gsplit(args.aka or "", "%s;%s") do
			if name ~= "" then
			akas[#akas + 1] = "'''" .. name .. "'''"
			end
			end
			if #akas > 0 then
			out[#out + 1] = "It is also known as " .. table.concat(akas, " and ") .. ". "
	end		end
	~~-- second sentence: mode name~~
	~~out[#out + 1] =~~
	~~string.format("It is also called mode %d of the %s series. ", n, sub and "subharmonic" or "harmonic")~~
	-- inverse		-- inverse
	if n ~= 2 and page_exists(twin_title) then -- 2–4 is its own inverse		if n ~= 2 and page_exists(twin_title) then -- 2–4 is its own inverse
	out[#out + 1] = string.format("~~Its~~ inverse is [[%s]]. ", twin_title)		out[#out + 1] = string.format(
			"The inverse consists of [[%s\|%s]]. ",
			twin_title,
			(sub and "harmonics " or "subharmonics ") .. range
			)
	end		end
	return (table.concat(out):gsub("%s+$", ""))		return (table.concat(out):gsub("%s+$", ""))

Sintel: Formatting, skip 2

2026-10-10T23:28:00Z

Formatting, skip 2

← Older revision		Revision as of 23:28, 10 October 2026
Line 51:		Line 51:
	out[#out + 1] = string.format(		out[#out + 1] = string.format(
	"%s%s is the scale formed by the [[subharmonic]]s %d through %d of the [[subharmonic series]], that is, the ratios %d/%d, %d/%d, …, %d/%d above the root. ",		"%s%s is the scale formed by the [[subharmonic]]s %d through %d of the [[subharmonic series]], that is, the ratios %d/%d, %d/%d, …, %d/%d above the root. ",
	bold, aka, n, 2 * n, 2 * n, 2 * n, 2 * n, 2 * n - 1, 2 * n, n)		bold,
			aka,
			n,
			2 * n,
			2 * n,
			2 * n,
			2 * n,
			2 * n - 1,
			2 * n,
			n
			)
	else		else
	out[#out + 1] = string.format(		out[#out + 1] = string.format(
	"%s%s is the [[Harmonic series#Segments\|harmonic segment]] %d::%d, consisting of harmonics %d through %d (%s) and spanning one octave above the root. ",		"%s%s is the [[Harmonic series#Segments\|harmonic segment]] %d::%d, consisting of harmonics %d through %d (%s) and spanning one octave above the root. ",
	bold, aka, n, 2 * n, n, 2 * n, chord(n, 2 * n))		bold,
			aka,
			n,
			2 * n,
			n,
			2 * n,
			chord(n, 2 * n)
			)
	end		end
	-- second sentence: mode name		-- second sentence: mode name
	out[#out + 1] = string.format("It is also called mode %d of the %s series. ", n, sub and "subharmonic" or "harmonic")		out[#out + 1] =
			string.format("It is also called mode %d of the %s series. ", n, sub and "subharmonic" or "harmonic")
	-- inverse		-- inverse
	if page_exists(twin_title) then		if n ~= 2 and page_exists(twin_title) then -- 2–4 is its own inverse
	out[#out + 1] = string.format("Its inverse is [[%s]]. ", twin_title)		out[#out + 1] = string.format("Its inverse is [[%s]]. ", twin_title)
	end		end

Sintel: Created page with "-- Module:Harmonics intro -- Generates the opening sentences of the "Harmonics n–2n" and "Subharmonics n–2n" pages. -- Called through Template:Harmonics intro and Template:Subharmonics intro. local p = {} local getArgs = require("Module:Arguments").getArgs local EN_DASH = "–" -- "n:(n+1):…:2n", written out in full for small n local function chord(lo, hi) if hi - lo <= 7 then local t = {} for i = lo, hi do t[#t + 1] = i end return table.concat(t, ":"..."

2026-10-10T22:43:07Z

Created page with "-- Module:Harmonics intro -- Generates the opening sentences of the "Harmonics n–2n" and "Subharmonics n–2n" pages. -- Called through Template:Harmonics intro and Template:Subharmonics intro. local p = {} local getArgs = require("Module:Arguments").getArgs local EN_DASH = "–" -- "n:(n+1):…:2n", written out in full for small n local function chord(lo, hi) if hi - lo <= 7 then local t = {} for i = lo, hi do t[#t + 1] = i end return table.concat(t, ":"..."

New page

-- Module:Harmonics intro
-- Generates the opening sentences of the "Harmonics n–2n" and "Subharmonics n–2n" pages.
-- Called through Template:Harmonics intro and Template:Subharmonics intro.
local p = {}
local getArgs = require("Module:Arguments").getArgs

local EN_DASH = "–"

-- "n:(n+1):…:2n", written out in full for small n
local function chord(lo, hi)
if hi - lo <= 7 then
local t = {}
for i = lo, hi do
t[#t + 1] = i
end
return table.concat(t, ":")
end
return string.format("%d:%d:…:%d", lo, lo + 1, hi)
end

local function page_exists(title)
local t = mw.title.new(title)
return t ~= nil and t.exists
end

local function build(args, sub)
local n = tonumber(args[1] or args.n)
if not n or n < 1 or n ~= math.floor(n) then
return '<strong class="error">Template:Harmonics intro requires a positive integer, e.g. <code>{{Harmonics intro|12}}</code>.</strong>'
end
local base = sub and "Subharmonics" or "Harmonics"
local twin = sub and "Harmonics" or "Subharmonics"
local title = string.format("%s %d%s%d", base, n, EN_DASH, 2 * n)
local twin_title = string.format("%s %d%s%d", twin, n, EN_DASH, 2 * n)

-- first sentence
local bold = "'''" .. title .. "'''"
local akas = {}
for name in mw.text.gsplit(args.aka or "", "%s*;%s*") do
if name ~= "" then
akas[#akas + 1] = "'''" .. name .. "'''"
end
end
local aka = ""
if #akas > 0 then
aka = ", also known as " .. table.concat(akas, " and ") .. ","
end

local out = {}
if sub then
out[#out + 1] = string.format(
"%s%s is the scale formed by the [[subharmonic]]s %d through %d of the [[subharmonic series]], that is, the ratios %d/%d, %d/%d, …, %d/%d above the root. ",
bold, aka, n, 2 * n, 2 * n, 2 * n, 2 * n, 2 * n - 1, 2 * n, n)
else
out[#out + 1] = string.format(
"%s%s is the [[Harmonic series#Segments|harmonic segment]] %d::%d, consisting of harmonics %d through %d (%s) and spanning one octave above the root. ",
bold, aka, n, 2 * n, n, 2 * n, chord(n, 2 * n))
end
-- second sentence: mode name
out[#out + 1] = string.format("It is also called mode %d of the %s series. ", n, sub and "subharmonic" or "harmonic")
-- inverse
if page_exists(twin_title) then
out[#out + 1] = string.format("Its inverse is [[%s]]. ", twin_title)
end
return (table.concat(out):gsub("%s+$", ""))
end

function p.harmonics(frame)
return build(getArgs(frame), false)
end

function p.subharmonics(frame)
return build(getArgs(frame), true)
end

p._build = build

return p