Comment a couple of ambiguous chords

[scherzo] / scherzo.c

diff --git a/scherzo.c b/scherzo.c
index 4882cc941adba776cacc4890cfcb3567267d717d..b0a6414781c75fa71b82471578470c31e0757853 100644 (file)
--- a/scherzo.c
+++ b/scherzo.c
@@ -677,7 +677,7 @@ scherzo_analyze_chord (scherzo_t *scherzo)
     struct { modified_degree_t degrees[4]; const char *name; } tetrachords[] = {
        /* Sixth chords */
        { {{1, 0}, {4,  0}, {5,  0}, {6,  0}}, "6sus" },
-       { {{1, 0}, {3,  0}, {5,  0}, {6,  0}}, "6" },
+       { {{1, 0}, {3,  0}, {5,  0}, {6,  0}}, "6" }, /* Ambiguous with m7 */
        { {{1, 0}, {3, -1}, {5,  0}, {6,  0}}, "m6" },
        { {{1, 0}, {2,  0}, {5,  0}, {6,  0}}, "m6sus2" },
        /* Seventh chords */
@@ -700,7 +700,7 @@ scherzo_analyze_chord (scherzo_t *scherzo)
        { {{1, 0}, {2,  0}, {5,  0}, {7, -1}}, "m7sus2" },
        { {{1, 0}, {2,  0}, {5, -1}, {7,  0}}, "°" SUP "M7" PUS "sus2" },
        { {{1, 0}, {2,  0}, {5, -1}, {7, -1}}, "𝆩" SUP "7" PUS "sus2" },
-       { {{1, 0}, {2,  0}, {5, -1}, {7, -2}}, "°" SUP "7" PUS "sus2" },
+       { {{1, 0}, {2,  0}, {5, -1}, {7, -2}}, "°" SUP "7" PUS "sus2" }, /* Ambiguous with 7 */
        /* Ninth chords voiced with no 5th */
        { {{1, 0}, {9,  0}, {4,  0}, {7,  0}}, "M9sus" },
        { {{1, 0}, {9,  0}, {4,  0}, {7, -1}}, "9sus" },