Module:Temperament data: Difference between revisions
CompactStar (talk | contribs) No edit summary |
CompactStar (talk | contribs) No edit summary |
||
| Line 11: | Line 11: | ||
end | end | ||
function | local function cmul(a, b) | ||
return {(a[1] * b[1] - a[2] * b[2]), (a[1] * b[2] + a[2] * b[1])} | return {(a[1] * b[1] - a[2] * b[2]), (a[1] * b[2] + a[2] * b[1])} | ||
end | end | ||
function p.cdiv(a, b) | |||
return {(a[1] * b[1] + a[2] * b[2])/(b[1]*b[1] + b[2]*b[2]), (a[2] * b[1] - a[1] * b[2])/(b[1]*b[1] + b[2]*b[2])} | |||
end | |||
local function matmul(a, b) | local function matmul(a, b) | ||