在 F# 中反转数组

Question

是否有任何其他方法可以在不使用 array.rev 函数且不复制原始数组的情况下在 F# 中反转数组，可能类似于反转列表的方式。

let rev (lst : List<'T>) =
  let length = List.length lst
  seq { for i in (length-1) .. -1 .. 0 do yield lst.[i] }
  |> Seq.toList

Answer 1

如果您不想创建新数组，唯一的选择是改变原始数组的元素。将它们更改到位。

要反转，只需将第一个元素与最后一个元素交换，将第二个元素与倒数第二个元素交换，依此类推：

let rev arr =
    let len = Array.length arr
    for i in 0..(len/2 - 1) do
        let x = arr.[i]
        arr.[i] <- arr.[len-i-1]
        arr.[len-i-1] <- x
    arr