Module:MOS interval HE - Revision history

ArrowHead294 at 12:37, 1 June 2025

2025-06-01T12:37:02Z

← Older revision		Revision as of 12:37, 1 June 2025
Line 70:		Line 70:
	local cents = mos.interval_to_cents(current_bright_interval, input_mos, {1, 1})		local cents = mos.interval_to_cents(current_bright_interval, input_mos, {1, 1})

	result = result .. "\|-\n"		result = result .. string.format("\|-\n \| %s \|\| %.1f{{c}} \|\| ~%.4f nats \|\| ~%.4f nats",
	.. ~~string.format("~~\| %s " , tamnams.interval_quality(current_bright_interval, input_mos, "sentence-case", mos_prefix))		tamnams.interval_quality(current_bright_interval, input_mos, "sentence-case", mos_prefix),
	~~.. string.format("\|\| %.1f¢ "~~, ~~cents)~~		cents,
	~~.. string.format("\|\| ~%.4f nats ",~~ ie.harmonic_entropy_with_lookup_table(cents))		ie.harmonic_entropy_with_lookup_table(cents),
	~~.. string.format("\|\| ~%.4f nats",~~ ie.harmonic_entropy_with_lookup_table(cents))		ie.harmonic_entropy_with_lookup_table(cents))
	else		else
	-- Calculate the best and average harmonic entropies		-- Calculate the best and average harmonic entropies
Line 103:		Line 103:
	-- Then sort, as the min and max may be swapped		-- Then sort, as the min and max may be swapped
	-- This happens if the dark interval has more small steps than large steps		-- This happens if the dark interval has more small steps than large steps
	local dark_interval_range = string.format("%.~~1f¢~~ to %.~~1f¢~~", math.min(sm_min_cents, sm_max_cents), math.max(sm_min_cents, sm_max_cents))		local dark_interval_range = string.format("%.1f{{c}} to %.1f{{c}}", math.min(sm_min_cents, sm_max_cents), math.max(sm_min_cents, sm_max_cents))
	local bright_interval_range = string.format("%.~~1f¢~~ to %.~~1f¢~~", math.min(lg_min_cents, lg_max_cents), math.max(lg_min_cents, lg_max_cents))		local bright_interval_range = string.format("%.1f{{c}} to %.1f{{c}}", math.min(lg_min_cents, lg_max_cents), math.max(lg_min_cents, lg_max_cents))

	result = result .. "\|-\n"		result = result .. string.format("\|-\n\| %s \|\| %s \|\| ~%.4f nats \|\| ~%.4f nats\n\|-\n\| %s \|\| %s \|\| ~%.4f nats \|\| ~%.4f nats",
	~~.. string.format("~~\| %s ~~" , tamnams.interval_quality(current_dark_interval, input_mos, "sentence-case", mos_prefix))~~		tamnams.interval_quality(current_dark_interval, input_mos, "sentence-case", mos_prefix),
	~~.. string.format("~~\|\| %s ~~" , dark_interval_range)~~		dark_interval_range,
	~~.. string.format("~~\|\| ~%.4f nats ~~" , he_dark_average)~~		he_dark_average,
	~~.. string.format("~~\|\| ~%.4f nats\n~~" , he_dark_best)~~		he_dark_best,
	~~.. "~~\|-\n"		tamnams.interval_quality(current_bright_interval, input_mos, "sentence-case", mos_prefix),
	.~~. string.format("~~\| %s " , tamnams.interval_quality(~~current_bright_interval~~, input_mos, "sentence-case", mos_prefix))		bright_interval_range,
	.~~. string.format~~("~~\|\| %s~~ " , ~~bright_interval_range~~)		he_bright_average,
	~~.. string.format("\|\| ~%.4f nats "~~ , he_bright_average)		he_bright_best)
	~~.. string.format("\|\| ~%.4f nats" ,~~ he_bright_best)
	end		end
	result = result .. "\n"		result = result .. "\n"
Line 141:		Line 140:
	local result = p._mos_interval_he(input_mos, mos_prefix, mos_abbrev, is_collapsed)		local result = p._mos_interval_he(input_mos, mos_prefix, mos_abbrev, is_collapsed)
	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)
			-- Debugger option
			if debugg == true then
			result = "<syntaxhighlight lang=\"wikitext\">" .. result .. "</syntaxhighlight>"
			end

			return frame:preprocess(result)
	end		end

	return p		return p

ArrowHead294: Alphabetise dependencies

2025-05-19T13:15:20Z

Alphabetise dependencies

← Older revision		Revision as of 13:15, 19 May 2025
Line 1:		Line 1:
			local p = {}

			local et = require("Module:ET")
			local ie = require("Module:Interval extension")
	local mos = require("Module:MOS")		local mos = require("Module:MOS")
	local rat = require("Module:Rational")		local rat = require("Module:Rational")
	~~local et = require("Module:ET")~~
	local tamnams = require("Module:TAMNAMS")		local tamnams = require("Module:TAMNAMS")
	~~local interval_extension = require("Module:Interval_extension")~~
	local yesno = require("Module:Yesno")		local yesno = require("Module:Yesno")
	~~local p = {}~~

	-- Main function; to be called by wrapper		-- Main function; to be called by wrapper
Line 72:		Line 73:
	.. string.format("\| %s " , tamnams.interval_quality(current_bright_interval, input_mos, "sentence-case", mos_prefix))		.. string.format("\| %s " , tamnams.interval_quality(current_bright_interval, input_mos, "sentence-case", mos_prefix))
	.. string.format("\|\| %.1f¢ ", cents)		.. string.format("\|\| %.1f¢ ", cents)
	.. string.format("\|\| ~%.4f nats ", ~~interval_extension~~.harmonic_entropy_with_lookup_table(cents))		.. string.format("\|\| ~%.4f nats ", ie.harmonic_entropy_with_lookup_table(cents))
	.. string.format("\|\| ~%.4f nats", ~~interval_extension~~.harmonic_entropy_with_lookup_table(cents))		.. string.format("\|\| ~%.4f nats", ie.harmonic_entropy_with_lookup_table(cents))
	else		else
	-- Calculate the best and average harmonic entropies		-- Calculate the best and average harmonic entropies
Line 82:		Line 83:
	for i = 1, #step_ratios do		for i = 1, #step_ratios do
	local step_ratio = step_ratios[i]		local step_ratio = step_ratios[i]
	local he_dark = ~~interval_extension~~.harmonic_entropy_with_lookup_table(mos.interval_to_cents(current_dark_interval, input_mos, step_ratio))		local he_dark = ie.harmonic_entropy_with_lookup_table(mos.interval_to_cents(current_dark_interval, input_mos, step_ratio))
	local he_bright = ~~interval_extension~~.harmonic_entropy_with_lookup_table(mos.interval_to_cents(current_bright_interval, input_mos, step_ratio))		local he_bright = ie.harmonic_entropy_with_lookup_table(mos.interval_to_cents(current_bright_interval, input_mos, step_ratio))
	he_dark_average = he_dark_average + he_dark / #step_ratios		he_dark_average = he_dark_average + he_dark / #step_ratios
	he_bright_average = he_bright_average + he_bright / #step_ratios		he_bright_average = he_bright_average + he_bright / #step_ratios

ArrowHead294 at 13:47, 2 May 2025

2025-05-02T13:47:27Z

← Older revision		Revision as of 13:47, 2 May 2025
Line 138:		Line 138:
	mos_abbrev = tamnams.verify_abbrev(input_mos, mos_abbrev)		mos_abbrev = tamnams.verify_abbrev(input_mos, mos_abbrev)

	~~return~~ p._mos_interval_he(input_mos, mos_prefix, mos_abbrev, is_collapsed)		local result = p._mos_interval_he(input_mos, mos_prefix, mos_abbrev, is_collapsed)
			local debugg = yesno(frame.args["debug"])
			return frame:preprocess(debugg == true and "<syntaxhighlight lang=\"wikitext\">" .. result .. "</syntaxhighlight>" or result)
	end		end

	return p		return p

ArrowHead294 at 20:25, 5 February 2025

2025-02-05T20:25:43Z

← Older revision		Revision as of 20:25, 5 February 2025
Line 53:		Line 53:
	.. "! Interval "		.. "! Interval "
	.. "!! Range in cents "		.. "!! Range in cents "
	.. "!! Average of [[HE]]<br/>(from [http://www.mikebattagliamusic.com/HE-JS/HE.html HE Calc]) "		.. "!! Average of [[HE]]<br />(from [http://www.mikebattagliamusic.com/HE-JS/HE.html HE Calc]) "
	.. "!! Min of [[HE]]\n"		.. "!! Min of [[HE]]\n"

ArrowHead294 at 00:46, 26 January 2025

2025-01-26T00:46:43Z

← Older revision		Revision as of 00:46, 26 January 2025
Line 51:		Line 51:
	-- Create table headers		-- Create table headers
	result = result		result = result
	.. "! Interval"		.. "! Interval "
	.. "!! Range in cents"		.. "!! Range in cents "
	.. "!! Average of [[HE]]<br/>(from [http://www.mikebattagliamusic.com/HE-JS/HE.html HE Calc])"		.. "!! Average of [[HE]]<br/>(from [http://www.mikebattagliamusic.com/HE-JS/HE.html HE Calc]) "
	.. "!! Min of [[HE]]\n"		.. "!! Min of [[HE]]\n"

ArrowHead294 at 14:23, 18 December 2024

2024-12-18T14:23:51Z

← Older revision		Revision as of 14:23, 18 December 2024
Line 70:		Line 70:

	result = result .. "\|-\n"		result = result .. "\|-\n"
	.. string.format("\|\| %s " , tamnams.interval_quality(current_bright_interval, input_mos, "sentence-case", mos_prefix))		.. string.format("\| %s " , tamnams.interval_quality(current_bright_interval, input_mos, "sentence-case", mos_prefix))
	.. string.format("\|\| %.1f¢ ", cents)		.. string.format("\|\| %.1f¢ ", cents)
	.. string.format("\|\| ~%.4f nats ", interval_extension.harmonic_entropy_with_lookup_table(cents))		.. string.format("\|\| ~%.4f nats ", interval_extension.harmonic_entropy_with_lookup_table(cents))
Line 106:		Line 106:

	result = result .. "\|-\n"		result = result .. "\|-\n"
	.. string.format("\|\| %s " , tamnams.interval_quality(current_dark_interval, input_mos, "sentence-case", mos_prefix))		.. string.format("\| %s " , tamnams.interval_quality(current_dark_interval, input_mos, "sentence-case", mos_prefix))
	.. string.format("\|\| %s " , dark_interval_range)		.. string.format("\|\| %s " , dark_interval_range)
	.. string.format("\|\| ~%.4f nats " , he_dark_average)		.. string.format("\|\| ~%.4f nats " , he_dark_average)

Ganaram inukshuk at 20:52, 17 August 2024

2024-08-17T20:52:54Z

← Older revision		Revision as of 20:52, 17 August 2024
Line 51:		Line 51:
	-- Create table headers		-- Create table headers
	result = result		result = result
	.. "! Interval\n"		.. "! Interval"
	.. "! Range in cents\n"		.. "!! Range in cents"
	.. "! Average of [[HE]]<br/>(from [http://www.mikebattagliamusic.com/HE-JS/HE.html HE Calc])\n"		.. "!! Average of [[HE]]<br/>(from [http://www.mikebattagliamusic.com/HE-JS/HE.html HE Calc])"
	.. "!Min of [[HE]]\n"		.. "!! Min of [[HE]]\n"

	-- Write each row		-- Write each row

Ganaram inukshuk at 20:25, 17 August 2024

2024-08-17T20:25:35Z

← Older revision		Revision as of 20:25, 17 August 2024
Line 46:		Line 46:
	-- Create table title		-- Create table title
	result = result		result = result
	.. "\|+ style=\"font-size: 105%; white-space: nowrap;\" \| " .. string.format("Harmonic entropy ~~data~~ for %s\n", scale_sig)		.. "\|+ style=\"font-size: 105%; white-space: nowrap;\" \| " .. string.format("Harmonic entropy info for %s\n", scale_sig)
	.. "\|-\n"		.. "\|-\n"

Ganaram inukshuk: Rename

2024-08-17T20:23:55Z

Rename

← Older revision		Revision as of 20:23, 17 August 2024
Line 46:		Line 46:
	-- Create table title		-- Create table title
	result = result		result = result
	.. "\|+ style=\"font-size: 105%; white-space: nowrap;\" \| " .. string.format("~~Intervals of~~ %s\n", scale_sig)		.. "\|+ style=\"font-size: 105%; white-space: nowrap;\" \| " .. string.format("Harmonic entropy data for %s\n", scale_sig)
	.. "\|-\n"		.. "\|-\n"

	-- Create table headers		-- Create table headers
	result = result		result = result
	.. "! Interval"		.. "! Interval\n"
	.. "!! Range in cents"		.. "! Range in cents\n"
	.. "!! Average of [[HE]]<br/>(from [http://www.mikebattagliamusic.com/HE-JS/HE.html HE Calc])\n"		.. "! Average of [[HE]]<br/>(from [http://www.mikebattagliamusic.com/HE-JS/HE.html HE Calc])\n"
	.. "!! Min of [[HE]]\n"		.. "!Min of [[HE]]\n"

	-- Write each row		-- Write each row

Ganaram inukshuk: Rename function being called

2024-08-17T20:22:05Z

Rename function being called

← Older revision		Revision as of 20:22, 17 August 2024
Line 8:		Line 8:

	-- Main function; to be called by wrapper		-- Main function; to be called by wrapper
	function p.~~_mos_intervals~~(input_mos, mos_prefix, mos_abbrev, is_collapsed)		function p._mos_interval_he(input_mos, mos_prefix, mos_abbrev, is_collapsed)
	-- Default param for input mos is 5L 2s		-- Default param for input mos is 5L 2s
	local input_mos = input_mos or mos.new(5, 2, 2)		local input_mos = input_mos or mos.new(5, 2, 2)
Line 124:		Line 124:

	-- Wrapper function; to be called by template		-- Wrapper function; to be called by template
	function p.~~mos_intervals~~(frame)		function p.mos_interval_he(frame)
	-- Get params		-- Get params
	local scalesig = frame.args["Scale Signature"]		local scalesig = frame.args["Scale Signature"]
Line 138:		Line 138:
	mos_abbrev = tamnams.verify_abbrev(input_mos, mos_abbrev)		mos_abbrev = tamnams.verify_abbrev(input_mos, mos_abbrev)

	return p.~~mos_intervals_description(input_mos, mos_prefix) .. "\n" .. p._mos_intervals~~(input_mos, mos_prefix, mos_abbrev, is_collapsed)		return p._mos_interval_he(input_mos, mos_prefix, mos_abbrev, is_collapsed)
	end		end

	return p		return p

← Older revision		Revision as of 14:23, 18 December 2024
Line 70:		Line 70:

	result = result .. "\|-\n"		result = result .. "\|-\n"
	.. string.format("\|\| %s " , tamnams.interval_quality(current_bright_interval, input_mos, "sentence-case", mos_prefix))		.. string.format("\| %s " , tamnams.interval_quality(current_bright_interval, input_mos, "sentence-case", mos_prefix))
	.. string.format("\|\| %.1f¢ ", cents)		.. string.format("\|\| %.1f¢ ", cents)
	.. string.format("\|\| ~%.4f nats ", interval_extension.harmonic_entropy_with_lookup_table(cents))		.. string.format("\|\| ~%.4f nats ", interval_extension.harmonic_entropy_with_lookup_table(cents))
Line 106:		Line 106:

	result = result .. "\|-\n"		result = result .. "\|-\n"
	.. string.format("\|\| %s " , tamnams.interval_quality(current_dark_interval, input_mos, "sentence-case", mos_prefix))		.. string.format("\| %s " , tamnams.interval_quality(current_dark_interval, input_mos, "sentence-case", mos_prefix))
	.. string.format("\|\| %s " , dark_interval_range)		.. string.format("\|\| %s " , dark_interval_range)
	.. string.format("\|\| ~%.4f nats " , he_dark_average)		.. string.format("\|\| ~%.4f nats " , he_dark_average)