aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--challenge-253/probablyfine/uiua/ch-1.ua12
1 files changed, 12 insertions, 0 deletions
diff --git a/challenge-253/probablyfine/uiua/ch-1.ua b/challenge-253/probablyfine/uiua/ch-1.ua
new file mode 100644
index 0000000000..d436c89fa2
--- /dev/null
+++ b/challenge-253/probablyfine/uiua/ch-1.ua
@@ -0,0 +1,12 @@
+# Pad link:
+# https://www.uiua.org/pad?src=0_8_0__U3BsaXRTdHJpbmdzIOKGkCAv4oqU4oqC4omhKOKWoeKKnOKWoeKKlCjiiaAsKSkKCi0tLQoiLiIgeyJvbmUudHdvLnRocmVlIiAiZm91ci5maXZlIiAic2l4In0K4o2k4oqD4ouF4oiY4omNIHsib25lIiAidHdvIiAidGhyZWUiICJmb3VyIiAiZml2ZSIgInNpeCJ9IFNwbGl0U3RyaW5ncwoKIiQiIHsiJHBlcmwkJCIgIiQkcmFrdSQifQrijaTiioPii4XiiJjiiY0geyJwZXJsIiAicmFrdSJ9IFNwbGl0U3RyaW5ncwotLS0K
+
+SplitStrings ← /⊔⊂≡(□⊜□⊔(≠,))
+
+---
+"." {"one.two.three" "four.five" "six"}
+⍤⊃⋅∘≍ {"one" "two" "three" "four" "five" "six"} SplitStrings
+
+"$" {"$perl$$" "$$raku$"}
+⍤⊃⋅∘≍ {"perl" "raku"} SplitStrings
+---