aboutsummaryrefslogtreecommitdiff
path: root/challenge-112
diff options
context:
space:
mode:
authorMark A <andemark@a-iot1t.uch.ad.pvt>2021-05-10 04:02:16 -0600
committerMark A <andemark@a-iot1t.uch.ad.pvt>2021-05-10 04:02:16 -0600
commit533e40116001cb17b3f5b6f7a0f714bbcb0e2bd2 (patch)
tree6bb64be0ad3d0f9e395777f31eb3055ff2864e61 /challenge-112
parent9af03c6853b679b6cbb724e313f76c0b4e62df66 (diff)
downloadperlweeklychallenge-club-533e40116001cb17b3f5b6f7a0f714bbcb0e2bd2.tar.gz
perlweeklychallenge-club-533e40116001cb17b3f5b6f7a0f714bbcb0e2bd2.tar.bz2
perlweeklychallenge-club-533e40116001cb17b3f5b6f7a0f714bbcb0e2bd2.zip
Challenge 112 Solutions (Raku)
Diffstat (limited to 'challenge-112')
-rw-r--r--challenge-112/mark-anderson/raku/ch-2.raku2
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-112/mark-anderson/raku/ch-2.raku b/challenge-112/mark-anderson/raku/ch-2.raku
index 5f381b8fba..7a4edaffde 100644
--- a/challenge-112/mark-anderson/raku/ch-2.raku
+++ b/challenge-112/mark-anderson/raku/ch-2.raku
@@ -121,7 +121,7 @@ multi MAIN(UInt $u)
.say for $seq;
}
-sub stairs($u)
+sub stairs(UInt $u)
{
my $head = ('100' x $u).substr(0, $u).parse-base(2);
my $tail = ('110' x $u).substr(0, $u).parse-base(2);