bpm 72
key g min
Subject ::= 5 _2 5 6 7 '1 _2 7 6 5 4 3 _2 2 1 _4
assert { 1 2 3 4 5 }^ == 1 .7 .6 .5 .4
Subject {Subject}^
{Subject {Subject}^, .1 _18 .5 _18}
axis 3
Mirror ::= {Subject}^
assert { 1 3 5 }^ == 5 3 1
{Subject Mirror, .5 _18 .1 _18}
{Subject, Mirror@-12} {Mirror, Subject@-12}
axis 1
Fig ::= 1 2 3 5 _2
Rise ::= Fig Fig@~1 Fig@~2 Fig@~3
Fall ::= {Fig}^ {Fig}^@~-1 {Fig}^@~-2 {Fig}^@~-3
assert {Fig}^@~2 == 3 2 1 .6 _2
{Rise Fall, .1 _10 .3 _10 .5 _10 .1 _10}
axis first
assert {Subject}^ == 5 _2 5 4 3 2 _2 3 4 5 6 7 _2 '1 '2 _4
Subject {Subject}^
{Subject@~2 {Subject@~2}^, .1 _9 .4 _9 .5 _9 .1 _9}
axis 1
{Subject, Mirror}
axis 3
{Subject, Mirror}
axis first
{Subject, Mirror}
{1, .1} _8