« first day (2520 days earlier)      last day (352 days later) » 

03:54
For today's part 1 I thought the "workflows" looked a lot like dfns and came up with this abomination:
R A←0 1
workflows parts←(×⍤≢¨⊆⊢)⊃⎕NGET'19.txt'1
(⍎'{' ',' '[a-z](?=[,}])'⎕R'←{' '⋄' '&⍵')¨workflows
⎕←+/(⍎'⋄+/x m a s×in⍬',⍨'[{}]' ',' '='⎕R'' '⋄' '←')¨parts
 
4 hours later…
07:51
Meta programming wins, lol
I'll do day 19 using XSLT
08:20
Well I ended up using Emacs regexp replace, cannot resist the temptation using dfns syntax
⍝ ^\([a-z]+\){ → \1←{
⍝ , →  ⋄
⍝ \([xmas][><]\) → ⍵.\1
⍝ \([A-Z]\) → '\1'
⍝ \([: ][a-z]+\) → \1 ⍵
 
15 hours later…
23:12
This is probably my most favorite APL function: 2÷⍨(×+⊢)⍨
23:26
@Fmbalbuena Why not 2÷⍨×⍨+⊢?
@user23129403 Hi Merve Elmaoglu, if you want to participare here, simply email [email protected]

« first day (2520 days earlier)      last day (352 days later) »