From a0d9ecf91bcc757cea259d0c869c50d8794d8edd Mon Sep 17 00:00:00 2001 From: Mark <53903062+andemark@users.noreply.github.com> Date: Tue, 25 Apr 2023 10:36:40 +0000 Subject: ch-1.raku was incorrect too :-( --- challenge-214/mark-anderson/raku/ch-1.raku | 16 ---------------- 1 file changed, 16 deletions(-) delete mode 100644 challenge-214/mark-anderson/raku/ch-1.raku diff --git a/challenge-214/mark-anderson/raku/ch-1.raku b/challenge-214/mark-anderson/raku/ch-1.raku deleted file mode 100644 index aeb0059f6e..0000000000 --- a/challenge-214/mark-anderson/raku/ch-1.raku +++ /dev/null @@ -1,16 +0,0 @@ -#!/usr/bin/env raku -use Test; - -is-deeply rank-score(<1 2 4 3 5>), <5 4 S B G>>>.Str; -is-deeply rank-score(<8 5 6 7 4>), >>.Str; -is-deeply rank-score(<3 5 4 2>), >>.Str; -is-deeply rank-score(<2 5 2 1 7 5 1>), >>.Str; -is-deeply rank-score(<3 5>), ; - -sub rank-score($a) -{ - my $u := $a.unique.sort(-*); - my $s := ...*; - - $a.trans($u => $s.head($u)).comb(//) -} -- cgit