「モジュール:ET」の版間の差分
ページの作成:「local rat = require("Module:Rational") local seq = require("Module:Sequence") local p = {} local common_suffix = { ["3/2"] = "f", ["2"] = "o", ["2/1"] = "o", ["3"] =…」 |
編集の要約なし |
||
| 42行目: | 42行目: | ||
-- parse a ET structure | -- parse a ET structure | ||
function p.parse(unparsed) | function p.parse(unparsed) | ||
local size, equave = unparsed:match("^(%d+%.*%d*)(平均律)$") | |||
if equave == nil then | |||
return nil | |||
else | |||
return p.new(size, 2, "o") | |||
end | |||
local size, suffix, equave = unparsed:match("^(%d+%.*%d*)([Ee][Dd](.+))$") | local size, suffix, equave = unparsed:match("^(%d+%.*%d*)([Ee][Dd](.+))$") | ||
-- local size, suffix, equave = unparsed:match("^(%d+%.*%d*)([Cc]?[Ee][Dd]?[Tt]?(.*))$") | -- local size, suffix, equave = unparsed:match("^(%d+%.*%d*)([Cc]?[Ee][Dd]?[Tt]?(.*))$") | ||