13a working on the example but probably subtly wrong

diff --git a/13/13a.bqn b/13/13a.bqn
index 6a1c6b1c1ccfad76ae8aabf634940c29b37ff1dc..8f3299de2ceefd2c2e96106183b272cd4f92413d 100644 (file)
--- a/13/13a.bqn
+++ b/13/13a.bqn
@@ -6,7 +6,7 @@ Split←{
 }
 
 Prep←{
-  {•Show 𝕩 ⋄ •Show ParseVal 𝕩}¨¨(""⊸≡¨𝕩)Split𝕩
+  ParseVal¨¨(""⊸≡¨𝕩)Split𝕩
 }
 
 ParseList←{𝕊in:
@@ -17,4 +17,8 @@ ParseList←{𝕊in:
 
 ParseVal←{'['=⊑𝕩}◶⟨•ParseFloat,ParseList⟩
 
-•Show Prep •file.Lines ⊑•args
+Main←{
+  +´({0=⊑⍋𝕩}¨𝕩)/1+↕≠𝕩
+}
+
+•Show Main Prep •file.Lines ⊑•args