bpm 140
meter 2
unit 1/4
key d maj
Toy ::= 3 - 3 - 4 - 4 - 5 - 5 - 3 - - -
Toy
Call ::= 6 _3 6b 6 _2 - (7 = 5)
Call {Call}@~1
Toy {Toy}@-12
Left ::= .1 - {.5 _2, .3 _2} - .1 - {.5 _2, .3 _2} -
{Toy, Left Left}
Beat ::= $1 _2 - _2
assert Toy == Beat(3 3 4 4 5 5 3) /2 - _2
Snap ::= $1 _2 - $2
Third ::= {'4, '2}
assert Third@~-2 == {'2, 7}
assert Third@~-3 == {'1, 6}
Step ::= Beat({'1, 5} '1)
Rise ::= Beat({'1, 5} Third@~-2 '3 Third@~-1)
assert Rise == Beat({'1, 5} Third@~-2) Beat('3 Third@~-1)
Strain ::= Step Call Step Call
Rise
Snap(Third Third@~-1 Third@~-2 Third@~-3)
Beat(Third@~-2) - _4
Step Call
Strain
Step Call
Beat({'1, 5})
Beat(Third@~-2)
Beat('3 Third@~-1)
Snap(Third@~-2 Third@~-3 Third@~-4 {6, 5b})
Beat(5) - _4
assert Snap(Third@~-2 Third@~-3 Third@~-4 Third@~-5) == Snap(Third Third@~-1 Third@~-2 Third@~-3)@~-2
assert 5b == 4#
Trio ::= Step@~-3 Call#2@-1
Beat(5 5) Call#2@-1
Beat(5 6)
Beat({7, 5b} Third@~-4)
Third@~-3 _2 -
assert Step@~-3 == Beat({5, 2} 5)
Trio
7 Snap(6 5)
| 5b _2 - _6 |
Trio
7 Snap(6 7)
| 5 _2 - _6 |
Strain
Beat('1 '1)
Call
Rise
Snap('2 '2b '2 '3)
'1 _2