Module:Harmonics in cet: Difference between revisions
ArrowHead294 (talk | contribs) mNo edit summary |
Comment out problem parts for the moment |
||
| (4 intermediate revisions by 2 users not shown) | |||
| Line 1: | Line 1: | ||
local yesno = require("Module:yesno") | local yesno = require("Module:yesno") | ||
local utils = require("Module:Utils") | |||
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 | ||
-- TODO: determine `steps` | |||
-- if reduction then | |||
-- tdeg = {"! colspan=\"2\" | Steps<br>([[octave reduction|reduced]])"} | |||
-- 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 19: | 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)), "%-", "-")) | ||
-- TODO: determine `steps` | |||
-- if reduction then | |||
-- table.insert(tdeg, "" .. ev .. "<br>(".. ev % steps .. ")") | |||
-- else | |||
-- table.insert(tdeg, "" .. ev) | |||
-- end | |||
table.insert(tdeg, "" .. ev) | table.insert(tdeg, "" .. ev) | ||
end | |||
local titleMarkup = "" | |||
if title then | |||
titleMarkup = "|+ style=\"font-size: 105%; white-space: nowrap;\" | " .. title .. "\n" | |||
end | 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 thead | |||
end | end | ||
| Line 65: | Line 94: | ||
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"], | 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 | ||
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 121: | ||
-- 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 | 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 | |||
result = "<syntaxhighlight lang=\"wikitext\">" .. result .. "</syntaxhighlight>" | |||
end | |||
return frame:preprocess(result) | |||
end | end | ||
return p | return p | ||