ReplaceElementAt alternatives

gistfile1.fs

let ReplaceElementAt index element sequence =
    let beforeIndex = sequence |> Seq.take index
    let atIndex = element |> Seq.singleton
    let afterIndex = sequence |> Seq.skip (index + 1)
    Seq.append beforeIndex <| Seq.append atIndex afterIndex

let ReplaceElementAt index element sequence =
    let beforeIndex = sequence |> Seq.take index
    let afterIndex = sequence |> Seq.skip (index + 1)
    seq { yield! beforeIndex; yield element; yield! afterIndex }