blob: 67d99842bebde4fbf02baaddec38109a24a0f018 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
|
⍝ Look, I told myself I *wouldn't* do AoC 2022,
⍝ but work slack was too goddamned inticing, so
⍝ I'm not *really* doing it, but maybe some notes?
⍝ I know nothing about file i/o in APL, so I'm just
⍝ ignoring that bit of the problem completely.
⍝ This is the 2nd part for day 1 -- this sorts a
⍝ vector in descending order and sums the 1st 3 results
vec ← 40 60 20 110 70 60 40 90 60 80
+/vec[3↑⍒vec]
|