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

3:54 AM
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…
7:51 AM
Meta programming wins, lol
I'll do day 19 using XSLT
 
8:20 AM
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…
11:12 PM
This is probably my most favorite APL function: 2÷⍨(×+⊢)⍨
 
11:26 PM
@Fmbalbuena Why not 2÷⍨×⍨+⊢?
@user23129403 Hi Merve Elmaoglu, if you want to participare here, simply email access@apl.chat
 

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