1
2
3
4
5
6
7
8
9
10
11
12
&fras "../day_14.txt"
⊜∘ ≠, @\n
Input ←

Tilt ← ⍜⊜□(∵(□⊏⍖.°□))≠@#.

⍜⍉≡(Tilt) Input # tilt platform north
=@O             # keep rocks
≡/+             # number of rocks per row
⇌+1⇡⧻.          # load amount per row
×               # load per row
/+              # sum of row loads