hsc3-unsafe (empty) → 0.5

raw patch · 7 files changed

+237/−0 lines, 7 filesdep +basedep +hsc3setup-changed

Dependencies added: base, hsc3

Files

README +10/−0
Setup.lhs +3/−0
Sound/SC3/UGen/Demand/Unsafe.hs +66/−0
Sound/SC3/UGen/FFT/Unsafe.hs +17/−0
Sound/SC3/UGen/Noise/Unsafe.hs +110/−0
Sound/SC3/UGen/Unsafe.hs +7/−0
hsc3-unsafe.cabal +24/−0

+ README view

@@ -0,0 +1,10 @@+hsc3-unsafe - haskell supercollider++hsc3 provides Sound.SC3.UGen.Unsafe.  ++  http://slavepianos.org/rd/f/207949/+  http://haskell.org/+  http://audiosynth.com/++(c) rohan drape, 2006-2008+    gpl, http://gnu.org/copyleft/

+ Setup.lhs view

@@ -0,0 +1,3 @@+#!/usr/bin/env runhaskell+> import Distribution.Simple+> main = defaultMain

+ Sound/SC3/UGen/Demand/Unsafe.hs view

@@ -0,0 +1,66 @@+module Sound.SC3.UGen.Demand.Unsafe where++import Sound.SC3.UGen.UGen+import Sound.SC3.UGen.UGen.Lift+import qualified Sound.SC3.UGen.Demand.Monadic as D+import Sound.SC3.UGen.Enum++-- | Buffer demand ugen.+dbufrd :: UGen -> UGen -> Loop -> UGen+dbufrd = liftP3 D.dbufrd++-- | Buffer write on demand unit generator.+dbufwr :: UGen -> UGen -> UGen -> Loop -> UGen+dbufwr = liftP4 D.dbufwr++-- | Demand rate white noise.+dwhite :: UGen -> UGen -> UGen -> UGen+dwhite = liftP3 D.dwhite++-- | Demand rate integer white noise.+diwhite :: UGen -> UGen -> UGen -> UGen+diwhite = liftP3 D.diwhite++-- | Demand rate brown noise.+dbrown :: UGen -> UGen -> UGen -> UGen -> UGen+dbrown = liftP4 D.dbrown++-- | Demand rate integer brown noise.+dibrown :: UGen -> UGen -> UGen -> UGen -> UGen+dibrown = liftP4 D.dibrown++-- | Demand rate random selection.+drand :: UGen -> UGen -> UGen+drand = liftP2 D.drand++-- | Demand rate random selection with no immediate repetition.+dxrand :: UGen -> UGen -> UGen+dxrand = liftP2 D.dxrand++-- | Demand rate arithmetic series.+dseries :: UGen -> UGen -> UGen -> UGen+dseries = liftP3 D.dseries++-- | Demand rate geometric series.+dgeom :: UGen -> UGen -> UGen -> UGen+dgeom = liftP3 D.dgeom++-- | Demand rate sequence generator.+dseq :: UGen -> UGen -> UGen+dseq = liftP2 D.dseq++-- | Demand rate series generator.+dser :: UGen -> UGen -> UGen+dser = liftP2 D.dser++-- | Demand input replication+dstutter :: UGen -> UGen -> UGen+dstutter = liftP2 D.dstutter++-- | Demand rate input switching.+dswitch1 :: UGen -> UGen -> UGen+dswitch1 = liftP2 D.dswitch1++-- | Demand rate input switching.+dswitch :: UGen -> UGen -> UGen+dswitch = liftP2 D.dswitch

+ Sound/SC3/UGen/FFT/Unsafe.hs view

@@ -0,0 +1,17 @@+module Sound.SC3.UGen.FFT.Unsafe where++import Sound.SC3.UGen.UGen+import Sound.SC3.UGen.UGen.Lift+import qualified Sound.SC3.UGen.FFT.Monadic as F++-- | Randomize order of bins.+pv_BinScramble :: UGen -> UGen -> UGen -> UGen -> UGen+pv_BinScramble = liftP4 F.pv_BinScramble++-- | Randomly clear bins.+pv_RandComb :: UGen -> UGen -> UGen -> UGen+pv_RandComb = liftP3 F.pv_RandComb++-- | Cross fade, copying bins in random order.+pv_RandWipe :: UGen -> UGen -> UGen -> UGen -> UGen+pv_RandWipe = liftP4 F.pv_RandWipe

+ Sound/SC3/UGen/Noise/Unsafe.hs view

@@ -0,0 +1,110 @@+module Sound.SC3.UGen.Noise.Unsafe where++import Sound.SC3.UGen.Rate+import Sound.SC3.UGen.UGen+import Sound.SC3.UGen.UGen.Lift+import qualified Sound.SC3.UGen.Noise.Monadic as N++-- | Brown noise.+brownNoise :: Rate -> UGen+brownNoise = liftP N.brownNoise++-- | Clip noise.+clipNoise :: Rate -> UGen+clipNoise = liftP N.clipNoise++-- | Randomly pass or block triggers.+coinGate :: UGen -> UGen -> UGen+coinGate = liftP2 N.coinGate++-- | Random impulses in (-1, 1).+dust2 :: Rate -> UGen -> UGen+dust2 = liftP2 N.dust2++-- | Random impulse in (0,1).+dust :: Rate -> UGen -> UGen+dust = liftP2 N.dust++-- | Random value in exponential distribution.+expRand :: UGen -> UGen -> UGen+expRand = liftP2 N.expRand++-- | Gray noise.+grayNoise :: Rate -> UGen+grayNoise = liftP N.grayNoise++-- | Random integer in uniform distribution.+iRand :: UGen -> UGen -> UGen+iRand = liftP2 N.iRand++-- | Clip noise.+lfClipNoise :: Rate -> UGen -> UGen+lfClipNoise = liftP2 N.lfClipNoise++-- | Dynamic clip noise.+lfdClipNoise :: Rate -> UGen -> UGen+lfdClipNoise = liftP2 N.lfdClipNoise++-- | Dynamic step noise.+lfdNoise0 :: Rate -> UGen -> UGen+lfdNoise0 = liftP2 N.lfdNoise0++-- | Dynamic ramp noise.+lfdNoise1 :: Rate -> UGen -> UGen+lfdNoise1 = liftP2 N.lfdNoise1++-- | Dynamic quadratic noise+lfdNoise2 :: Rate -> UGen -> UGen+lfdNoise2 = liftP2 N.lfdNoise2++-- | Dynamic cubic noise+lfdNoise3 :: Rate -> UGen -> UGen+lfdNoise3 = liftP2 N.lfdNoise3++-- | Step noise.+lfNoise0 :: Rate -> UGen -> UGen+lfNoise0 = liftP2 N.lfNoise0++-- | Ramp noise.+lfNoise1 :: Rate -> UGen -> UGen+lfNoise1 = liftP2 N.lfNoise1++-- | Quadratic noise.+lfNoise2 :: Rate -> UGen -> UGen+lfNoise2 = liftP2 N.lfNoise2++-- | Random value in skewed linear distribution.+linRand :: UGen -> UGen -> UGen -> UGen+linRand = liftP3 N.linRand++-- | Random value in sum of n linear distribution.+nRand :: UGen -> UGen -> UGen -> UGen+nRand = liftP3 N.nRand++-- | Pink noise.+pinkNoise :: Rate -> UGen+pinkNoise = liftP N.pinkNoise++-- | Random value in uniform distribution.+rand :: UGen -> UGen -> UGen+rand = liftP2 N.rand++-- | Random value in exponential distribution on trigger.+tExpRand :: UGen -> UGen -> UGen -> UGen+tExpRand = liftP3 N.tExpRand++-- | Random integer in uniform distribution on trigger.+tiRand :: UGen -> UGen -> UGen -> UGen+tiRand = liftP3 N.tiRand++-- | Random value in uniform distribution on trigger.+tRand :: UGen -> UGen -> UGen -> UGen+tRand = liftP3 N.tRand++-- | Triggered windex.+twindex :: UGen -> UGen -> UGen -> UGen+twindex = liftP3 N.twindex++-- | White noise.+whiteNoise :: Rate -> UGen+whiteNoise = liftP N.whiteNoise

+ Sound/SC3/UGen/Unsafe.hs view

@@ -0,0 +1,7 @@+module Sound.SC3.UGen.Unsafe (module Sound.SC3.UGen.Demand.Unsafe,+                              module Sound.SC3.UGen.FFT.Unsafe,+                              module Sound.SC3.UGen.Noise.Unsafe) where++import Sound.SC3.UGen.Demand.Unsafe+import Sound.SC3.UGen.FFT.Unsafe+import Sound.SC3.UGen.Noise.Unsafe

+ hsc3-unsafe.cabal view

@@ -0,0 +1,24 @@+Name:              hsc3-unsafe+Version:           0.5+Synopsis:          Unsafe Haskell SuperCollider+Description:       hsc3 provides Sound.SC3.UGen.Unsafe.  +License:           GPL+Category:          Sound+Copyright:         (c) Rohan Drape, 2006-2008+Author:            Rohan Drape+Maintainer:        rd@slavepianos.org+Stability:         Experimental+Homepage:          http://slavepianos.org/rd/f/207949/+Tested-With:       GHC==6.10.1+Build-Type:        Simple+Cabal-Version:     >= 1.2++Data-files:        README++Library+  Build-Depends:   base, hsc3 == 0.5+  GHC-Options:     -Wall -fwarn-tabs+  Exposed-modules: Sound.SC3.UGen.Demand.Unsafe+                   Sound.SC3.UGen.FFT.Unsafe+                   Sound.SC3.UGen.Noise.Unsafe+                   Sound.SC3.UGen.Unsafe