bpm 42
meter 4
unit 1/4
key e4 mel
Ladder ::= 1 2 3 4 5 6 7 '1
> Ladder _2
< Ladder~ _2
> Ladder < Ladder~
Theme ::= 5 _2 5 6 5 4 3 _2 2 _2 1 _2 2 _4
Bridge ::= '1 _2 7 _2 6 _2 5 _2 6 5 4 3 2 _2 -*2
Tag ::= 3 _2 2 _2 .7 _2 1 _4
assert < .7 == d4
assert > .7 == d#4
< Theme Bridge Tag
< Theme Bridge > Tag
assert > 6 == < 6#
assert > 7 == < 7#
> Bridge~
> Bridge~ < Bridge > Tag
< Bridge~ > Bridge
> Bridge~ < Bridge
> {Bridge~, Ladder@-12}
{> Bridge~, < Ladder~@-12}
Close ::= .1Dia _2 ..5Dia _4 .1Dia _4
assert > 4Dia == aMaj
assert > 5Dia == bMaj
assert > 6Dia == 'c#Dim
assert < 4Dia == aMin
assert < 5Dia == bMin
assert < 6Dia == 'cMaj
> {Tag, Close}
< {Tag, Close}
< Theme Theme
{> Bridge~, < Ladder~@-12} {< Bridge, > Ladder@-12}
< Theme
> {Tag, Close}