-- | Interaction with @jack-dl@, @scsynth@ and @text-dl@.
module Sound.DF.Uniform.PhT.Audition where

import Sound.OSC {- hosc -}

import Sound.DF.Uniform.PhT.Node
import qualified Sound.DF.Uniform.UDF as U

-- | Audition graph after sending initialisation messages.
audition :: [Message] -> DF () -> IO ()
audition is n = U.audition is (df_udf n)

-- | Audition graph after sending initialisation messages.
audition_sc3 :: [Message] -> DF () -> IO ()
audition_sc3 is n = U.audition_sc3 is (df_udf n)

-- | Audition at @text-dl@.
audition_text :: Int -> DF () -> IO ()
audition_text nf n = U.audition_text nf (df_udf n)