open System
let avantgarde() =
    let rand = Random()
    let melody = [ for i in 1..20 -> (rand.NextDouble() * 500.) |> int, (rand.NextDouble() * 1540. + 220.) |> int ]
    for (duration, note) in melody do
        Console.Beep(note, duration)