setcps 0.5
d1
$ whenmod 16 8 (euclid 4 8)
$ whenmod 16 0 (euclid 2 8)
$ s "kick:5"
d2
$ euclid "<3 5>" 8
$ s "[~ hh]"
d3
$ every 4 rev
$ note "0 3 5 [7 7?]"
# s "bass3"
d4
$ someCycles (# crush 5)
$ superimpose (|- note 7)
$ off 0.125 (|+ note "<3 5 7>")
$ s "~ superpiano"
d5
$ off 0.25 (|+ note "<3 5 7>")
$ s "superpiano"
|- note 21