bpm 108
meter 4
key c maj
Climb ::= > 5 _6 6 _2 7 _4 '1 _4
Turn ::= 7 _6 '1 _2 '2 _4 '1 _4
Fall ::= < 7 _4 6 _4 5 _2 4 _2 3 _2 2 _2
Call ::= Climb Turn Fall 1 _2 2 _2 3 _4 2 _8
Answer ::= Climb Turn@~1 Fall 1 _2 2 _2 > .7 _4 1 _8
Theme ::= Call Answer
assert Climb == 5 _6 6 _2 7 _4 '1 _4
Theme
Ton ::= .1 _2 .5 _2 .3 _2 .5 _2
Dom ::= Ton@~-3
Six ::= Ton@~-2
Sub ::= Ton@~-4
Bass ::= Ton*2 Dom*2 Ton*2 Dom*2 Ton*2 Six*2 Ton Sub Dom Ton
assert 1 2 3 4 5 6 7 '1 == c4 d4 e4 f4 g4 a4 b4 c5
assert Dom == ..5 _2 .2 _2 ..7 _2 .2 _2
{Theme, Bass}
key eb maj
assert 1 2 3 4 5 6 7 '1 == eb4 f4 g4 ab4 bb4 c5 d5 eb5
{Call, Bass[:4]}
key c maj
{Answer, Bass[4:]}
key c min
assert 1 2 3 4 5 6 7 '1 == c4 d4 eb4 f4 g4 ab4 bb4 c5
assert Dom == g2 _2 d3 _2 bb2 _2 d3 _2
{Theme, Bass}
key c harm
assert 1 2 3 4 5 6 7 '1 == c4 d4 eb4 f4 g4 ab4 b4 c5
assert 6 7 7b == ab4 b4 bb4
assert Dom == g2 _2 d3 _2 b2 _2 d3 _2
{Theme, Bass}
key c mel
assert Climb == g4 _6 a4 _2 b4 _4 c5 _4
assert Fall == bb4 _4 ab4 _4 g4 _2 f4 _2 eb4 _2 d4 _2
{Theme, Bass}
key c maj
{Theme, Bass}
key c min
{Theme, Bass}
key c harm
{Call, Bass[:4]}
key c mel
{Answer, Bass[4:]}
key c maj
{Theme, Bass}