packages feed

hsc3-0.18: Help/UGen/henonN.help.lhs

> import Sound.SC3 {- hsc3 -}
> import Sound.SC3.Common.Math.Noise {- hsc3 -}

With SC3 default initial parameters.

> g_01 =
>     let x = mouseX KR 20 sampleRate Linear 0.1
>     in henonN AR x 1.4 0.3 0 0 * 0.1

With mouse-control of parameters.

> g_02 =
>     let x = mouseX KR 1 1.4 Linear 0.1
>         y = mouseY KR 0 0.3 Linear 0.1
>     in henonN AR (sampleRate / 4) x y 0 0 * 0.1

With randomly modulated parameters.

> g_03 =
>     let n0 = lfNoise2 'α' KR 1 * 0.20 + 1.20
>         n1 = lfNoise2 'β' KR 1 * 0.15 + 0.15
>     in henonN AR (sampleRate / 8) n0 n1 0 0 * 0.1

As a frequency control.

> g_04 =
>     let x = mouseX KR 1 1.4 Linear 0.1
>         y = mouseY KR 0 0.3 Linear 0.1
>         f0 = 40
>         f = henonN AR f0 x y 0 0 * 800 + 900
>     in sinOsc AR f 0 * 0.4

Drawing

    > import Sound.SC3.Plot {- hsc3-plot -}
    > plot_ugen1 0.1 (henonN AR 2500 1.4 0.3 0 0 * 0.1)

![](sw/hsc3/Help/SVG/henonN.0.svg)

In haskell:

> henon_hs a b = map snd (iterate (henon_f a b) (0.0,0.0))

    import Sound.SC3.Plot {- hsc3-plot -}
    plotTable1 (take 600 (henon_hs 1.4 0.3))
    plot_ugen_nrt (600,1) 1.0 (henonN AR 600 1.4 0.3 0 0)