Module:MOS mode degrees: Difference between revisions

Ganaram inukshuk (talk | contribs)
mNo edit summary
Ganaram inukshuk (talk | contribs)
Added double-harmonic default mode names, corrected other mode names
Line 203: Line 203:
if step_pattern == "LsLLsAs" then
if step_pattern == "LsLLsAs" then
-- Modes of harmonic minor
-- Modes of harmonic minor
-- Closest-mode search always returns one name
mode_names = {
mode_names = {
"Harmonic minor<br>(Aeolian ♮7)",
"Harmonic minor<br>(Aeolian ♮7)",
Line 214: Line 215:
elseif step_pattern == "LLsLsAs" then
elseif step_pattern == "LLsLsAs" then
-- Modes of harmonic major
-- Modes of harmonic major
-- Closest-mode search always returns one name
mode_names = {
mode_names = {
"Harmonic major<br>(Ionian b6)",
"Harmonic major<br>(Ionian b6)",
Line 225: Line 227:
elseif step_pattern == "LsLLLLs" then
elseif step_pattern == "LsLLLLs" then
-- Modes of melodic minor
-- Modes of melodic minor
-- Closest-mode search sometimes returns two names
mode_names = {
mode_names = {
"Melodic minor<br>(Ionian b3)",
"Melodic minor<br>(Ionian b3, Dorian ♮7)",
"Dorian b2",
"Dorian b2, Phrygian ♮6",
"Lydian augmented<br>(Lydian #5)",
"Lydian augmented<br>(Lydian #5)",
"Lydian dominant<br>(Lydian b7)",
"Lydian dominant<br>(Lydian b7, Mixolydian #4)",
"Mixolydian b6",
"Mixolydian b6, Aeolian ♮3",
"Half-diminished<br>(Aeolian b5)",
"Half-diminished<br>(Aeolian b5, Locrian ♮)",
"Altered, Altered dominant<br>(Locrian b4)",
"Altered, Altered dominant<br>(Locrian b4)",
}
}
elseif step_pattern == "sLLLLLs" then
elseif step_pattern == "sLLLLLs" then
-- Modes of Neapolitan major
-- Modes of Neapolitan major
-- Closest-mode search sometimes returns two names
mode_names = {
mode_names = {
"Neapolitan major<br>(Ionian b2 b3)",
"Neapolitan major<br>(Ionian b2 b3, Phrigian ♮6 ♮7)",
"Lydian augmented #6<br>(Lydian #5 #6)",
"Lydian augmented #6<br>(Lydian #5 #6)",
"Lydian augmented dominant<br>(Lydian #5 b7)",
"Lydian augmented dominant<br>(Lydian #5 b7, Mixolydian #4 #5)",
"Lydian minor<br>(Lydian b6 b7)",
"Lydian minor<br>(Lydian b6 b7, Aeolian ♮3 #4)",
"Major locrian<br>(Mixolydian b5 b6)",
"Major locrian<br>(Mixolydian b5 b6, Locrian ♮2 ♮3)",
"Altered dominant ♮2<br>(Aeolian b4 b5)",
"Altered dominant ♮2<br>(Aeolian b4 b5, Locrian ♮2, b4)",
"Altered dominant bb3<br>(Locrian bb3 b4)",
"Altered dominant bb3<br>(Locrian bb3 b4)",
}
}
elseif step_pattern == "sLLLsAs" then
elseif step_pattern == "sLLLsAs" then
-- TODO: Modes of Neapolitan minor
-- Modes of Neapolitan minor
-- Closest-mode search always returns one name
mode_names = {
mode_names = {
"Neapolitan minor<br>(Phrygian ♮7)",
"Neapolitan minor<br>(Phrygian ♮7)",
Line 255: Line 260:
"Ionian #2",
"Ionian #2",
"Altered diminished bb3<br>(Locrian bb3 b4 bb7)",
"Altered diminished bb3<br>(Locrian bb3 b4 bb7)",
}
elseif step_pattern == "sLLLsAs" then
-- Modes of double harmonic
-- Closest-mode search sometimes returns two names
mode_names = {
"Double harmonic<br>(Ionian b2 b6, Phrygian ♮3 ♮7)",
"Lydian #2 #6",
"Altered ♮5 bb6<br>(Phrygian b4 bb6)",
"Double harmonic minor<br>(Lydian b3 b6, Aeolian #4 ♮7)",
"Mixolydian b2 b5, Locrian ♮3 ♮6",
"Ionian augmented #2<br>(Ionian #2 #5)",
"Locrian bb3 bb7",
}
}
elseif #step_pattern == 0 then
elseif #step_pattern == 0 then