bpm 72
meter 4
unit 1/4
key c4 maj
assert 1Maj == {c4, e4, g4}
assert 1Maj$1-3-5 == {c4, e4, g4}
assert 1Maj$1-5-3 == {c4, g4, e5}
1Maj$1-3-5 _4
1Maj$1-5-3 _4
assert 1Maj$3 == 1Maj$3-5-1
assert 1Maj$3 == {e4, g4, c5}
assert 1Maj$5 == {g4, c5, e5}
assert 1Maj$1 == 1Maj
1Maj _2 1Maj$3 _2 1Maj$5 _2 1Maj$1 _2
assert 1Maj$1-3-5-1 == {c4, e4, g4, c5}
assert 1Maj$1-5 == {c4, g4}
assert 1Maj$1-1 == {c4, c5}
assert 1Maj$1-3-'5 == {c4, e4, g5}
1Maj$1-3-5-1 _2 1Maj$1-5 _2 1Maj$1-3-'5 _4
assert 5Dia7 == {g4, b4, d5, f5}
assert 5Dia7$7 == 5Dia7$7-1-3-5
assert .5Dia7$1-3-7 == {g3, b3, f4}
5Dia7 _2 5Dia7$7 _2 .5Dia7$1-3-7 _4
Walk ::= .1Dia ..5Dia$3 ..6Dia ..3Dia$3 ..4Dia ..1Dia$3 ..2Dia ..5Dia
Tune ::= '3 '2 '1 7 6 5 4 2
assert .1Dia == {c3, e3, g3}
assert ..5Dia$3 == {b2, d3, g3}
assert ..6Dia == {a2, c3, e3}
assert ..3Dia$3 == {g2, b2, e3}
assert ..4Dia == {f2, a2, c3}
assert ..1Dia$3 == {e2, g2, c3}
assert ..2Dia == {d2, f2, a2}
assert ..5Dia == {g2, b2, d3}
assert Tune == e5 d5 c5 b4 a4 g4 f4 d4
Walk _2
{Tune _2, Walk _2}