sin_osc f ip

   f - frequency 
  ip - initial phase

> import Sound.DF

> do { o <- sin_osc 440.0 0.0
>    ; audition [] (out1 (o * 0.1)) }

Used as both Oscillator and LFO.

> do { f <- sin_osc 4.0 0.0
>    ; o <- sin_osc (f * 400.0 + 400.0) 0.0
>    ; audition [] (out1 (o * 0.1)) }

Cancellation.

> do { o1 <- sin_osc 440.0 0.0
>    ; o2 <- sin_osc 440.0 pi
>    ; audition [] (out1 (o1 + o2)) }