Generalize Music.Pitch.Common.Harmony functions #20