F# Sharp Cheat-Sheet
F# Allgemein
Meine Versuche in F# nehmen langsam Gestalt an. Das Cheat-Sheet hat mir die korrekte Definition eines Arrays gezeigt.
Kategorie Meine Versuche in F# nehmen langsam Gestalt an. Das Cheat-Sheet hat mir die korrekte Definition eines Arrays gezeigt.
Darauf hin konnte
ich einen Bubble-Sort implementieren:
Gruß JJR
let swap i j (arr : 'a []) =
let tmp = arr.[i]
arr.[i] <- arr.[j]
arr.[j] <- tmp
let bubbleSort arr =
let rec loop (arr : 'a []) =
let mutable swaps = 0
for i = 0 to arr.Length - 2 do
if arr.[i] > arr.[i+1] then
swap i (i+1) arr
swaps <- swaps + 1
if swaps > 0 then loop arr else arr
loop arr
printfn "%A" (bubbleSort [|1;5;2;8;9;7|])
System.Console.ReadLine()
Gruß JJR
let swap i j (arr : 'a []) =
let tmp = arr.[i]
arr.[i] <- arr.[j]
arr.[j] <- tmp
let bubbleSort arr =
let rec loop (arr : 'a []) =
let mutable swaps = 0
for i = 0 to arr.Length - 2 do
if arr.[i] > arr.[i+1] then
swap i (i+1) arr
swaps <- swaps + 1
if swaps > 0 then loop arr else arr
loop arr
printfn "%A" (bubbleSort [|1;5;2;8;9;7|])
System.Console.ReadLine()