HarmTrace.Accompany

map2

data MyState

accompanyIO

accompany

allPossibleRel

allPossible

notesRootedOn

refine

pickBest

embellish

connectNotes

toRootM

notesInKey

notesInChord