bpm 72
meter 4
unit 1/4
key g4 harm
Ground ::= .1 _2 _2 ..7+2 _2 ..6 _4/2 ..5+3
assert .1 _2 _2 == .1 _4
assert ..7+2 _2 == ..7 _6
assert ..6 _4/2 == ..6 _2
assert ..5+3 == ..5 _4
Ground*2
Arp ::= 1 3 5 '1
Fall ::= Arp Arp@~-1 Arp@~-2 Arp@~-3
assert Arp*2 == Arp Arp
assert Fall*2/2 == Fall/2 Fall/2
{Fall, Ground}
{Fall*2/2, Ground}
Gm ::= {1, 3, 5}
Dim ::= {7, 2, 4}
Eb ::= {6, '1, 3}
D ::= {5, 7, 2}
Chords ::= Gm _4 Dim+2 _2 Eb _4/2 D+3
Answer ::= | Gm _2 -*2 Dim _2 -*2 Eb _2 -*2 D _4 |*2
assert - +1 1 == -*2 1
{Chords, Ground}
Answer
Toll ::= 1 - - - .5 - 5 - '1 _2 - - 5 - .5 -
Grid ::= | 1___ ---- ---- ---- : .5__ ---- 5___ ---- : '1__ ___2 ---- ---- : 5___ ---- .5__ ---- |
assert 5--- == 5
assert Toll == Grid
{Grid, Ground}
Ground*2
{Fall, Ground}
{Fall*2/2, Ground}
{Chords, Ground}
Answer
{Grid, Ground}
Gm _16