From d7ebe96c3f4bb452673078739f108305d5f952e7 Mon Sep 17 00:00:00 2001
From: Mohammad S Anwar <mohammad.anwar@yahoo.com>
Date: Sun, 23 Aug 2020 23:46:27 +0100
Subject: - Updated solution by Colin Crain.

---
 challenge-074/colin-crain/raku/ch-1.raku | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/challenge-074/colin-crain/raku/ch-1.raku b/challenge-074/colin-crain/raku/ch-1.raku
index b1d9cc78f3..f0f7d00059 100644
--- a/challenge-074/colin-crain/raku/ch-1.raku
+++ b/challenge-074/colin-crain/raku/ch-1.raku
@@ -23,7 +23,9 @@
 #       2020 colin crain
 ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ##
 
-
+sub circumfix:<⎣ ⎦>( Numeric $n ) {
+    $n.floor ;
+}
 
 unit sub MAIN (*@A);
 
@@ -32,7 +34,7 @@ my %count;
 %count{$_}++ for @A;
 
 # is count of first elem count larger than half list size?
-my $max = @A.max({%count{$_}});
-say %count{$max} > (@A.elems/2).Int ?? $max !! -1 ;
+my $max = @A.max:{ %count{$_} };
+say %count{$max} > ⎣@A.elems/2⎦ ?? $max !! -1 ;
 
 
-- 
cgit