2025 Day 3 Part 2
This commit is contained in:
parent
7c21533879
commit
2f552a6516
1 changed files with 39 additions and 9 deletions
|
|
@ -3,14 +3,44 @@
|
||||||
Input ← Lines &fras "input/day03.txt"
|
Input ← Lines &fras "input/day03.txt"
|
||||||
Banks ← ⍚(≡⋕) Input
|
Banks ← ⍚(≡⋕) Input
|
||||||
|
|
||||||
BestJoltage ← (
|
# Arr ? Lo Hi
|
||||||
˙⊞˜⊂ °⊏
|
Range ← (
|
||||||
↯ ∞_2
|
◡<
|
||||||
▽⊸≡(>°⊟)
|
⨬(+ ⊙⇡ ⟜-|[])
|
||||||
⊏
|
|
||||||
≡⇌
|
|
||||||
⌝⊥10
|
|
||||||
/↥
|
|
||||||
)
|
)
|
||||||
|
|
||||||
/+ ≡(BestJoltage°□) Banks
|
# Arr ? Hi Lo Arr
|
||||||
|
Slice ← (
|
||||||
|
⊸˜-
|
||||||
|
↙⊙↘
|
||||||
|
)
|
||||||
|
|
||||||
|
# Jolts ? Idx Bank
|
||||||
|
Jolts ← ⌝⊥10 ⇌ ⊏
|
||||||
|
|
||||||
|
# Jolts ? Idx Len Bank
|
||||||
|
Joltage′ ← |3 (
|
||||||
|
◡⋅≠₀
|
||||||
|
⨬(Jolts⊙⋅∘
|
||||||
|
| |3 ⊸(=₀⧻) # Empty Idx ? Idx
|
||||||
|
⨬(⊸(+₁⊣)|0) # Next Idx ? Empty Idx
|
||||||
|
|
||||||
|
⊙⊙-₁ # _ _ Len' ? _ _ Len
|
||||||
|
◡⋅⋅(-⊙⧻) # End _ _ Len' Bank ? _ _ Len' Bank
|
||||||
|
Slice⊙⊙◡⋅⋅(≡⊟°⊏)
|
||||||
|
°⊟⍉
|
||||||
|
⊙(⊢⍖)
|
||||||
|
˜⊡
|
||||||
|
˜⊂
|
||||||
|
Joltage′
|
||||||
|
)
|
||||||
|
)
|
||||||
|
|
||||||
|
# Jolts ? Len Bank
|
||||||
|
Joltage ← |2 Joltage′ []
|
||||||
|
|
||||||
|
Part₁ ← /+ ≡(Joltage 2 °□)
|
||||||
|
Part₂ ← /+ ≡(Joltage 12°□)
|
||||||
|
|
||||||
|
Part₁ Banks
|
||||||
|
Part₂ Banks
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue