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
