2
0

pn1drum 421 B

1234567891011121314151617
  1. # -*- mode: snippet -*-
  2. # name: pn1drum
  3. # group: pigsnose
  4. # key: pn1drum
  5. # expand-env: (yas-indent-line fixed)
  6. # --
  7. -- @pn1drum
  8. d'drum $ cf $
  9. -- overlay (s "[hh*8 [hh*4 ho]]/2") $ -- (5)
  10. -- every 8 (density 2) $ -- (3)
  11. -- jux (iter 4) . -- (2)
  12. -- jux (density 2 . iter 4) . -- (4) replace (2)(3)
  13. -- every 3 rev $ -- (1)
  14. stack [
  15. s "[bd [~ ~ ~ bd] bd*2 ~]/2",
  16. s "[~ [~ sn:1] ~ sn:1 ~ ~ sn:1 ~]/2"
  17. ]