kiss-lang/kiss-vscode
1
0
Fork 0
Code Issues 1 Pull Requests Actions Packages Projects Releases Wiki Activity

fix AOC bugs

Browse Source
This commit is contained in:
Nat Quayle Nelson
2023-01-19 11:12:46 -07:00
parent 1d36d91377
commit d508727aaa
2 changed files with 5 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
projects/aoc/src/year2022/Day11.kiss
View File

@@ -2,7 +2,7 @@
(importAs year2022.inputs.Day11 Monkeys) (importAs year2022.inputs.Day11 Monkeys)
(function :Float monkeyBusiness [:Array<Monkey> monkeys] (function :Float monkeyBusiness [:Array<Monkey> monkeys]
(apply * ~(.slice (sort (for monkey monkeys monkey.inspections)) -2))) (apply * (.slice (sort (for monkey monkeys monkey.inspections)) -2)))
(function printMonkeys [monkeys] (function printMonkeys [monkeys]
(doFor [id monkey] (enumerate monkeys) (doFor [id monkey] (enumerate monkeys)
@@ -24,6 +24,8 @@
(MonkeysExample.main) (MonkeysExample.main)
(Monkeys.main) (Monkeys.main)
/*
// Unsolved.
(doFor num (range 10000) (doFor num (range 10000)
(MonkeysExample.round false) (MonkeysExample.round false)
(Monkeys.round false) (Monkeys.round false)
@@ -35,4 +37,4 @@
(otherwise null)))) (otherwise null))))
(assertEquals 2713310158.0 ~(monkeyBusiness MonkeysExample.monkeys)) (assertEquals 2713310158.0 ~(monkeyBusiness MonkeysExample.monkeys))*/

2
projects/aoc/src/year2022/Day8.kiss
View File

@@ -47,4 +47,4 @@
(count (flatten visibleTrees) ->visible visible)))) (count (flatten visibleTrees) ->visible visible))))
(assertEquals 21 (visibleTrees "src/year2022/inputs/day8example.txt")) (assertEquals 21 (visibleTrees "src/year2022/inputs/day8example.txt"))
(assertEquals 1672 (visibleTrees (input "8"))) (assertEquals 1672 (visibleTrees (input 8)))