ams_companion.tidal

do
setcps (165/60/4)
d1
  $ (# djf (slow 32 $ sine))
  $ superimpose (const
    $ fast (slow 16 $ "<1 2 4 2 1>")
    $ "jazz"
    # gain 0.65
    # room 0.4
  )
  $ splice 8 ("0 1 2 3*<1!3 2>")
  $ "breaks165"
  # cut 1
  # gain 0.8
d2
  $ jux rev
  $ ply 4
  $ "drum:8*<1 1 4 1>"
  # room 0.2
  # gain 0.6


d2 $ fast 1 $ "sn:20"
  # gain 0.8
  # delay 0.5

d1 $ n (stack [
  "0*4",
  "~ 2"
  ]) # "cpu2"
  # gain 1.3

  # gain 1.2
d2 $ "h . h ~ <~ h> <h ~>"
  # "hh"
d3 $ slice 8 ("1 2 3 ~") "amencutup" # gain 1.1