diff options
| author | aecepoglu <aecepoglu@fastmail.fm> | 2022-09-04 20:21:51 +0100 |
|---|---|---|
| committer | aecepoglu <aecepoglu@fastmail.fm> | 2022-09-04 20:21:51 +0100 |
| commit | 6743e3e74bac2a9589257c78e496b30aed0378e0 (patch) | |
| tree | c62daf6b701e32058b1a2e4f7f44852d21bbff6a /challenge-043/aecepoglu | |
| parent | 35658fb34d1cba6d98016bc8900699b42e92c547 (diff) | |
| download | perlweeklychallenge-club-6743e3e74bac2a9589257c78e496b30aed0378e0.tar.gz perlweeklychallenge-club-6743e3e74bac2a9589257c78e496b30aed0378e0.tar.bz2 perlweeklychallenge-club-6743e3e74bac2a9589257c78e496b30aed0378e0.zip | |
solutions 1-56,177,180 missing a few
Diffstat (limited to 'challenge-043/aecepoglu')
| -rw-r--r-- | challenge-043/aecepoglu/README.md | 1 | ||||
| -rw-r--r-- | challenge-043/aecepoglu/bqn/ch-1.bqn | 6 | ||||
| -rw-r--r-- | challenge-043/aecepoglu/bqn/ch-2.bqn | 7 |
3 files changed, 14 insertions, 0 deletions
diff --git a/challenge-043/aecepoglu/README.md b/challenge-043/aecepoglu/README.md new file mode 100644 index 0000000000..2f43e385e0 --- /dev/null +++ b/challenge-043/aecepoglu/README.md @@ -0,0 +1 @@ +Overdue solutions by AhmetEmre diff --git a/challenge-043/aecepoglu/bqn/ch-1.bqn b/challenge-043/aecepoglu/bqn/ch-1.bqn new file mode 100644 index 0000000000..1e559182d1 --- /dev/null +++ b/challenge-043/aecepoglu/bqn/ch-1.bqn @@ -0,0 +1,6 @@ +# 1 +d←⟨9‿'a','a'‿5‿'b','b'‿'c'‿'d','d'‿7‿'e','e'‿8⟩ +d←⟨9‿'a','a'‿5‿'b','b'‿'c'‿'d','d'‿7‿'e'⟩ +>b←<˘⍉∨´¨"abcde"=⌜d +v←+´¨"abcde"(∨˝∘(=⌜)¬⊸/¨⊢)d +>(∧˝11=v+b(+´/)⌜⊢)⊸/ <˘(Perm⟜≠)⊸⊏1‿2‿3‿4‿6 diff --git a/challenge-043/aecepoglu/bqn/ch-2.bqn b/challenge-043/aecepoglu/bqn/ch-2.bqn new file mode 100644 index 0000000000..51bfaf0de9 --- /dev/null +++ b/challenge-043/aecepoglu/bqn/ch-2.bqn @@ -0,0 +1,7 @@ +# 2 +F←{0:@;1:@;2:@;3:@;6:@; + 4:'0'-˜"1210"‿"2020"; + 5:'0'-˜"21200"; + 7:'0'-˜"3211000"; + (𝕩-4)∾2‿1∾(0⥊˜𝕩-7)∾1‿0‿0‿0} +⌽˘⍉(F¨)⊸≍↕17 |