Module:Temperament data: Difference between revisions

CompactStar (talk | contribs)
No edit summary
CompactStar (talk | contribs)
No edit summary
Line 150: Line 150:
end
end


local function get_te_tuning_map(subgroup, comma_basis)
local function get_te_generator(subgroup, comma_basis, preimage)
local v = unreduced_mapping_from_basis(comma_basis)
local v = get_reduced_mapping(comma_basis, preimage)
local w = {}
local w = {}
for i = 1, #subgroup do
for i = 1, #subgroup do
Line 171: Line 171:
local g = matmul(jw, pseudoinv(vw))
local g = matmul(jw, pseudoinv(vw))
return g
return g
end
local function get_te_generator(subgroup, comma_basis, preimage)
return matmul(get_te_tuning_map(subgroup, comma_basis), preimage)
end
end