From fe6466f89808cc47db47045700c2ffced724dba9 Mon Sep 17 00:00:00 2001 From: Tymoteusz Moryto Date: Mon, 26 Aug 2024 12:13:19 +0200 Subject: added solutions to week 284 in Uiua --- challenge-284/pieviero/uiua/ch-1.ua | 4 ++++ challenge-284/pieviero/uiua/ch-2.ua | 5 +++++ 2 files changed, 9 insertions(+) create mode 100644 challenge-284/pieviero/uiua/ch-1.ua create mode 100644 challenge-284/pieviero/uiua/ch-2.ua diff --git a/challenge-284/pieviero/uiua/ch-1.ua b/challenge-284/pieviero/uiua/ch-1.ua new file mode 100644 index 0000000000..0dfc723144 --- /dev/null +++ b/challenge-284/pieviero/uiua/ch-1.ua @@ -0,0 +1,4 @@ +LuckyInteger ← ⍣(⊏⊢⊚)¯1⊸=°▽⊏⊸⍖ +LuckyInteger [2 2 3 4] +LuckyInteger [1 2 2 3 3 3] +LuckyInteger [1 1 1 3] diff --git a/challenge-284/pieviero/uiua/ch-2.ua b/challenge-284/pieviero/uiua/ch-2.ua new file mode 100644 index 0000000000..8830043994 --- /dev/null +++ b/challenge-284/pieviero/uiua/ch-2.ua @@ -0,0 +1,5 @@ +# this probably can be done better +RelativeSort ← ⊂:⊏⊸⍏⊙(⊏⍏◌⊸⍜⊂⊛:)∩▽⊙,¬.⊸∈⊸: +RelativeSort [2 3 9 3 1 4 6 7 2 8 5] [2 1 4 3 5 6] +RelativeSort [3 3 4 6 2 4 2 1 3] [1 3 2] +RelativeSort [3 0 5 0 2 1 4 1 1] [1 0 3 2] -- cgit