-- maquinitas-tidal
-- parameters for instruments by Korg

module Korg where

  volcaBeats :: Num a => String -> a
  volcaBeats "bd" = 36
  volcaBeats "sn" = 38

  -- notes
  bd = 35
  rs = 37
  sd = 38
  cp = 39
  cy = 40
  lt = 41
  chh = 42
  ohh = 46
  ht = 47
  cr = 49
  rd = 51
  lc = 52
  hc = 53
  ta = 54
  cb = 56
  ti = 57
  ca = 58
  la = 61
  wb = 62
  ha = 63
  mp = 64
  mf = 65