{-# LANGUAGE DataKinds #-}
{-# LANGUAGE NoIncoherentInstances #-}
{-# LANGUAGE NoMonomorphismRestriction #-}
{-# LANGUAGE NoUndecidableInstances #-}
module Vivid.UGens.Random (
expRand
, linRand
, rand
) where
import Vivid.SC.SynthDef.Types (CalculationRate(..))
import Vivid.SynthDef
import Vivid.SynthDef.FromUA
import Vivid.UGens.Args
expRand :: (Args '[] '["lo","hi"] a) => a -> SDBody a Signal
expRand = makeUGen
"ExpRand" IR
(Vs::Vs '["lo", "hi"])
(lo_ (0::Float), hi_ (1::Float))
linRand :: (Args '[] '["lo","hi","minmax"] a) => a -> SDBody a Signal
linRand = makeUGen
"LinRand" IR
(Vs::Vs '["lo", "hi", "minmax"])
(lo_ (0::Float), hi_ (1::Float), minmax_ (0::Float))
rand :: (Args '[] '["lo","hi"] a) => a -> SDBody a Signal
rand = makeUGen
"Rand" IR
(Vs::Vs '["lo", "hi"])
(lo_ (0::Float), hi_ (1::Float))