Commit 7de7fa45 authored by Thorsten Wißmann's avatar Thorsten Wißmann 🐧
Browse files

Rearrange puzzles

parent d857d8e8
...@@ -209,16 +209,8 @@ insertion_sort n = ...@@ -209,16 +209,8 @@ insertion_sort n =
db : Array RailExample db : Array RailExample
db = db =
Array.fromList <| Array.fromList <|
[ simple --, simple
, insertion_sort 4 [ inglenook_422
|> permute_by [4,3,2,1]
, insertion_sort 5
|> permute_by [5,4,3,2,1]
, merge_sort 4
|> permute_by [4,3,2,1]
, merge_sort 8
|> permute_by [8,7,6,5,4,3,2,1]
, inglenook_422
|> addQuery [1,5,2,3] -- 36.sol |> addQuery [1,5,2,3] -- 36.sol
|> addQuery [1,2,6,5] -- 11.sol |> addQuery [1,2,6,5] -- 11.sol
|> addQuery [1,3,6,2] -- 21.sol |> addQuery [1,3,6,2] -- 21.sol
...@@ -227,6 +219,14 @@ db = ...@@ -227,6 +219,14 @@ db =
|> addQuery [1,2,6,8,7] -- 79.sol |> addQuery [1,2,6,8,7] -- 79.sol
|> addQuery [1,4,5,8,6] -- 298.sol |> addQuery [1,4,5,8,6] -- 298.sol
|> addQuery [1,2,7,8,5] -- 98.sol |> addQuery [1,2,7,8,5] -- 98.sol
, insertion_sort 4
|> permute_by [4,3,2,1]
, insertion_sort 5
|> permute_by [5,4,3,2,1]
, merge_sort 4
|> permute_by [4,3,2,1]
, merge_sort 8
|> permute_by [8,7,6,5,4,3,2,1]
-- , one_junction (Shunt 2 0) [Shunt 4 4, Shunt 2 2, Shunt 2 0] -- , one_junction (Shunt 2 0) [Shunt 4 4, Shunt 2 2, Shunt 2 0]
-- |> addQuery [6,5,1,4,2,3] -- |> addQuery [6,5,1,4,2,3]
-- , one_junction (Shunt 3 0) [Shunt 5 5, Shunt 3 3, Shunt 3 0] -- , one_junction (Shunt 3 0) [Shunt 5 5, Shunt 3 3, Shunt 3 0]
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment