From e98662b66972b9006bffccbfb0d4db42ec64ccc1 Mon Sep 17 00:00:00 2001 From: Tymoteusz Moryto Date: Mon, 19 Aug 2024 12:48:38 +0200 Subject: week 283 in Uiua --- challenge-283/pieviero/uiua/ch-1.ua | 6 ++++++ challenge-283/pieviero/uiua/ch-2.ua | 3 +++ 2 files changed, 9 insertions(+) create mode 100644 challenge-283/pieviero/uiua/ch-1.ua create mode 100644 challenge-283/pieviero/uiua/ch-2.ua diff --git a/challenge-283/pieviero/uiua/ch-1.ua b/challenge-283/pieviero/uiua/ch-1.ua new file mode 100644 index 0000000000..3a4fd141e1 --- /dev/null +++ b/challenge-283/pieviero/uiua/ch-1.ua @@ -0,0 +1,6 @@ +UniqueNumber ← ⊏⊢⊚=1⊙♭⊕⊃⧻◴⊛. +UniqueNumber [3 3 1] +UniqueNumber [3 2 4 2 4] +UniqueNumber [1] +UniqueNumber [4 3 1 1 1 4] + diff --git a/challenge-283/pieviero/uiua/ch-2.ua b/challenge-283/pieviero/uiua/ch-2.ua new file mode 100644 index 0000000000..8b068d0b7e --- /dev/null +++ b/challenge-283/pieviero/uiua/ch-2.ua @@ -0,0 +1,3 @@ +DigitCountValue ← ≍∩(⊏:⟜⍏)⟜▽:⇡⊸⧻ +DigitCountValue [1 2 1 0] +DigitCountValue [0 3 0] -- cgit From d97eb7fa2607786542befba4245db355da64a4df Mon Sep 17 00:00:00 2001 From: Tymoteusz Moryto Date: Mon, 19 Aug 2024 12:56:18 +0200 Subject: simplify solution for the first task --- challenge-283/pieviero/uiua/ch-1.ua | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/challenge-283/pieviero/uiua/ch-1.ua b/challenge-283/pieviero/uiua/ch-1.ua index 3a4fd141e1..c315a85738 100644 --- a/challenge-283/pieviero/uiua/ch-1.ua +++ b/challenge-283/pieviero/uiua/ch-1.ua @@ -1,4 +1,4 @@ -UniqueNumber ← ⊏⊢⊚=1⊙♭⊕⊃⧻◴⊛. +UniqueNumber ← ⊏⊢⊚=1°▽⊏⊸⍏ UniqueNumber [3 3 1] UniqueNumber [3 2 4 2 4] UniqueNumber [1] -- cgit From c944be2cd5eb8ad18bb449ce00a17ee5280597aa Mon Sep 17 00:00:00 2001 From: PieVieRo Date: Mon, 19 Aug 2024 13:03:20 +0200 Subject: Simplify solution for task 2 --- challenge-283/pieviero/uiua/ch-2.ua | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/challenge-283/pieviero/uiua/ch-2.ua b/challenge-283/pieviero/uiua/ch-2.ua index 8b068d0b7e..635a787290 100644 --- a/challenge-283/pieviero/uiua/ch-2.ua +++ b/challenge-283/pieviero/uiua/ch-2.ua @@ -1,3 +1,3 @@ -DigitCountValue ← ≍∩(⊏:⟜⍏)⟜▽:⇡⊸⧻ +DigitCountValue ← ≍∩(⊏⊸⍏)⟜▽:⇡⊸⧻ DigitCountValue [1 2 1 0] DigitCountValue [0 3 0] -- cgit