granular numbers

granular_numbers.tidal

let position f d a b = (# begin (range a b $ slow d f))
let grain x = (# legato x)

d1
  $ grain 0.5
  $ position isaw 4 0.05 0.3
  $ density 16
  $ sound "numbers:1"

d2
  $ mask "011011"
  $ grain 0.6
  $ position saw 4 0.11 0.14
  $ density 6
  $ sound "numbers:2" # gain 1.1

d3
  $ (+ up "<0 3>/2")
  $ grain 0.3
  $ position saw (1/8) 0 0.4
  $ density 6
  $ sound "numbers:3" + up "-12" # gain 1.4

d4
  $ grain 2
  $ position saw 2 0.05 0.1
  $ density 8
  $ sound "numbers:4" # vowel "u" # gain 1.2