Module:Temperament data: Difference between revisions
CompactStar (talk | contribs) No edit summary |
CompactStar (talk | contribs) No edit summary |
||
| Line 172: | Line 172: | ||
period = period * (subgroup[i]^preimage[i][1]) | period = period * (subgroup[i]^preimage[i][1]) | ||
end | end | ||
local te = get_te_generator(subgroup, comma_basis) | local te = get_te_generator(subgroup, comma_basis, preimage) | ||
local stretch_factor = math.log2(period) / math.log2(te[1][1]) | local stretch_factor = math.log2(period) / math.log2(te[1][1]) | ||
return scalar_matmul(te, stretch_factor) | return scalar_matmul(te, stretch_factor) | ||