隨機整數列表上的F＃選擇排序

Question

我是F＃的新手，試圖找出一些基本知識，但是很慢。在下面的代碼中，我試圖生成一個隨機整數列表，然後對其進行排序。

let randomNumberList count = 
    let r = System.Random() 
    List.init count (fun _ -> r.Next(100)) 

let rec selectionSort l = function 
    | [] -> [] 
    | l -> let min = List.min l in 
      let rest = List.filter (fun i -> i <> min) l in 
      let sortedList = selectionSort rest in 
      min :: sortedList 
sortedList = selectionSort l 

let unsortedList = randomNumberList 10 
printfn "%A" unsortedList 
printfn "%A" sortedList 

所以兩件事......一個是我收到的錯誤：

stdin(515,19): error FS0001: This expression was expected to have type 
    'a list  
but here has type 
    'a list -> 'a list 

另一種是用隨機數表。它可以工作，但我希望生成的數字少於100，而不是我現在得到的巨大數值。

感謝您的耐心和幫助！

Answer 1

正如在評論中提到的那樣，l不需要let rec selectionSort。固定碼：

let randomNumberList count = 
    let r = System.Random() 
    List.init count (fun _ -> r.Next(100)) 

let rec selectionSort = function 
    | [] -> [] 
    | l -> let min = List.min l in 
      let rest = List.filter (fun i -> i <> min) l in 
      let sortedList = selectionSort rest in 
      min :: sortedList 

let unsortedList = randomNumberList 10 
let sortedList = selectionSort unsortedList 
printfn "%A" unsortedList 
printfn "%A" sortedList 
System.Console.ReadLine() |> ignore 

說明：

let vname = function 
    | ... -> ... 
    | ... -> ... 

是

let vname arg = match arg with 
    | ... -> ... 
    | ... -> ...