open System
open System.Collections.Generic
open System.Windows.Forms
open System.Windows.Forms.DataVisualization.Charting
open System.Reactive.Linq;
open FSharp.Charting


[<EntryPoint>]
[<STAThread>]
let main argv =

    Application.EnableVisualStyles()
    Application.SetCompatibleTextRenderingDefault false

    let form = new Form(Visible = true, TopMost = true,
                            Width = 700, Height = 500)
    let rand = new Random()

    let obs = Observable.Interval(TimeSpan.FromSeconds(2.0))
                |> Observable.map(fun x -> DateTime.Now.ToShortDateString(),rand.Next(0,21))

    let one  = LiveChart.FastLineIncremental(obs,Name="SimpleExample")
    one.ShowChart()

    Application.Run form
    0