bpm 60
meter 4
unit 1/4
key f maj
Arp ::= 1 _2 3 _2 5 _2
Dream ::= 1 _10 .7 _2 Arp
Theme ::= 5 _2 '1 _2 2 _2 3 _2 4 _2 6 _2
assert Dream == 1 _10 .7 _2 1 _2 3 _2 5 _2
assert Dream[2:] == Arp
.5 _4 Dream Theme
Arp Theme {Theme}@~1
{Arp Theme}_2
{Arp Theme Theme, - _4 {.5 _4 1 _8}@-12 {Arp}@-12 {Theme}@-12}
bpm 60
meter 4
unit 1/4
key f4 maj
mode diatonic
assert Dream == f4 _10 e4 _2 f4 _2 a4 _2 c5 _2
Settle ::= 1 _16 .7 _8
assert Settle == f4 _16 e4 _8
Fall ::= {7b, 3} _8 3 _4 2 _6 {3, .7b} _2 4 _6 {3, .5} _2 2 _6 .6 _6
assert Fall[:2] == {eb5, a4} _8 a4 _4
assert Fall@7 == {bb5, e5} _8 e5 _4 d5 _6 {e5, bb4} _2 f5 _6 {e5, g4} _2 d5 _6 a4 _6
assert '1 == f5
assert '3 == a5
assert .5Dia == {c4, e4, g4}
.5 _4 Dream '1 _2
Settle
.5 _8 .5Dia _8 .5 _4
Dream '3 _2
3 _18 {'1, 3b} _2 7 _6 {7b, 2b} _2 1 _8 .7 _4
bpm 51.75
- _2 .5 _2 Dream {7b, 4} _2
Fall
bpm 58.75
assert {Dream \4 {5 _4}}@~3 == bb4 _10 a4 _2 bb4 _2 d5 _2 f5 _4
{- _2 .5 _2 {Dream \4 {5 _4}}}@~3
assert {Fall[:1]}@7 == {bb5, e5} _8
Fall@7 {2, .7} _4
Dream '1 _2
Settle
.5 _8 .5Dia _8 .5 _4
Dream '3 _2
Settle
bpm 44
assert {1, .3} == {f4, a3}
.6 _8 .4 _4 {1, .3} _8