Functional Reactive Programming demonstration with Haskell