F#洗牌功能

Question

我一直在尝试在 F# 中创建一个简单的纸牌游戏，我使用 system.Random 创建了一个简单的随机函数。

type card = int
type deck = card list
let rand : int -> int = let rnd = System.Random ()
                        in fun n -> rnd.Next (0 , n )

但是我的问题是我不知道如何使用 rand 函数创建一个随机播放功能的牌组 -> 牌组。

需要任何帮助。

Answer 1

您可以根据随机值进行排序：

let shuffle (d:deck) =
    let rnd = System.Random ()
    d |> List.sortBy(fun _ -> rnd.Next(1, 52) )