diff options
| -rw-r--r-- | challenge-172/0rir/raku/ch-1.raku | 1 | ||||
| -rw-r--r-- | challenge-172/0rir/raku/ch-2.raku | 4 |
2 files changed, 1 insertions, 4 deletions
diff --git a/challenge-172/0rir/raku/ch-1.raku b/challenge-172/0rir/raku/ch-1.raku index 507c548593..bb58648e48 100644 --- a/challenge-172/0rir/raku/ch-1.raku +++ b/challenge-172/0rir/raku/ch-1.raku @@ -1,7 +1,6 @@ #!/usr/bin/env raku # :vim ft=raku sw=4 expandtab # ∅ ≡ ∩ ≢ use v6.d; -use lib $?FILE.IO.parent(2).add("lib"); use Test; use Prime::Factor; diff --git a/challenge-172/0rir/raku/ch-2.raku b/challenge-172/0rir/raku/ch-2.raku index e1cf415d75..d5275aa69d 100644 --- a/challenge-172/0rir/raku/ch-2.raku +++ b/challenge-172/0rir/raku/ch-2.raku @@ -26,7 +26,7 @@ if TEST { my @std = 6, 7, 15, 36, 39, 40, 41, 42, 43, 47, 49; my @ti83 = 6, 15, 40, 43, 49; - my @test = +my @test = { in => @std , expect => @ti83 }, { in => @moon , expect => @moon-sumry }, { in => [1,2,3,4,5,6,7,8], expect => [1,2.5,4.5,6.5,8] }, @@ -77,8 +77,6 @@ sub naive-five-num( @ary --> Array) { @ret; } -exit if TEST; - sub MAIN( @arg = @moon ) { say "Input: ", @arg.raku(); say "Five-number Summary (TI-83ish):"; |
