fork download

let rec qsort = function | []   -> []
                         | h::t -> qsort [for e in h do if (e <= h) then yield e]
                                   @ [h] @
                                   qsort [for e in h do if (e > h) then yield e]
 
let r = new System.Randon()
 
let main() = 
        let sample = List.init 300 (fun _-> r.Next(int.MaxValue))
        System.Console.WriteLine(qsort sample) 

/home/kLhSCg/prog.fs(6,20): error FS0039: The type 'Randon' is not defined

/home/kLhSCg/prog.fs(9,45): error FS0072: Lookup on object of indeterminate type based on information prior to this program point. A type annotation may be needed prior to this program point to constrain the type of the object. This may allow the lookup to be resolved.

Standard output is empty