module internal SystemServices

    open System
    
    let PickRandomNumber min max = Random().Next(min, max)

    let PickRandomItem seq =
        let index = PickRandomNumber 0 (Seq.length seq)
        seq |> Seq.item index