Pigs-Nose-EP/pigs-nose.megalet.tidal

{-
anny fm: pig's nose ep megalet
see pigs-nose.tidal for full composition
-}

let cf = slow 2
    pn'hointro = s "[~ [~ ho] ~ ho ~ ~ ho ~]/2"
    pn'sn = s "[~ [~ sn:1] ~ sn:1 ~ ~ sn:1 ~]/2"
    pn'bd = s "[bd [~ ~ ~ bd] bd*2 ~]/2"
    pn'hh = s "[hh*8 [hh*4 ho]]/2"
    pn'qs sl = slow sl . striate 4 $ s "qspace"
    pn'bass4 = s "bass*2 bass*2 bass*3 bass*3"
    pn'bass5 = s "bass*2 bass*2 bass*3 bass*3 ~"