From afdc5d81ded3335a2ef0686f3305fc3d00f1bd1d Mon Sep 17 00:00:00 2001 From: Greg Burri Date: Sun, 10 Dec 2017 21:52:23 +0100 Subject: [PATCH] Using curryfication --- AdventOfCode2017/Day10.fs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/AdventOfCode2017/Day10.fs b/AdventOfCode2017/Day10.fs index 2383dee..a5cdb5d 100644 --- a/AdventOfCode2017/Day10.fs +++ b/AdventOfCode2017/Day10.fs @@ -22,4 +22,4 @@ let knotHash1 (str : string) = knotHash 1 (fun s -> s.[0] * s.[1] |> string) (str.Split ',' |> List.ofArray |> List.map int) let knotHash2 (str : string) = - knotHash 64 (fun s -> s |> Array.chunkBySize 16 |> Array.map (Array.reduce (^^^) >> sprintf "%02x") |> Array.reduce (+)) (List.append (str |> List.ofSeq |> List.map int) [ 17; 31; 73; 47; 23 ]) 256 \ No newline at end of file + knotHash 64 (Array.chunkBySize 16 >> Array.map (Array.reduce (^^^) >> sprintf "%02x") >> Array.reduce (+)) (List.append (str |> List.ofSeq |> List.map int) [ 17; 31; 73; 47; 23 ]) 256 \ No newline at end of file -- 2.45.2