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"
|
||||
Banks ← ⍚(≡⋕) Input
|
||||
|
||||
BestJoltage ← (
|
||||
˙⊞˜⊂ °⊏
|
||||
↯ ∞_2
|
||||
▽⊸≡(>°⊟)
|
||||
⊏
|
||||
≡⇌
|
||||
⌝⊥10
|
||||
/↥
|
||||
# Arr ? Lo Hi
|
||||
Range ← (
|
||||
◡<
|
||||
⨬(+ ⊙⇡ ⟜-|[])
|
||||
)
|
||||
|
||||
/+ ≡(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