-- | (Undocumented class)
module Sound.SC3.UGen.Record.WidthFirstUGen where
import qualified Sound.SC3.UGen as S
import Sound.SC3.UGen.Record
data WidthFirstUGen = WidthFirstUGen {
  maxSize :: S.UGen
  } deriving (Show)
widthFirstUGen :: WidthFirstUGen
widthFirstUGen = WidthFirstUGen {
  maxSize = 0.0
  }
mkWidthFirstUGen :: WidthFirstUGen -> S.UGen
mkWidthFirstUGen (WidthFirstUGen  a') = S.mkOsc S.AR "WidthFirstUGen" [a'] 1
instance Make WidthFirstUGen where
  ugen = mkWidthFirstUGen