module Language.XDsp.Semantics.Extras (
  module Language.XDsp.Semantics.Extras.Delay
 ,module Language.XDsp.Semantics.Extras.FSig
 ,a
 ,k
 ,i
)

where

import           Language.XDsp.Semantics.Core

import           Language.XDsp.Semantics.Extras.Delay
import           Language.XDsp.Semantics.Extras.FSig

-- a few helper functions

-- | Restrict a value to `ASig` type
a :: Dsp repr => ASig repr -> ASig repr
a = id

-- | Restrict a value to `KSig` type
k :: Dsp repr => KSig repr -> KSig repr
k = id

-- | Restrict a value to `INum` type
i :: Dsp repr => INum repr -> INum repr
i = id