From 73a1e728aba58a14a511ab24599e48a59f1ced91 Mon Sep 17 00:00:00 2001 From: Adam Russell Date: Sun, 11 Aug 2019 11:44:16 -0400 Subject: updated ch-2.rk --- challenge-020/adam-russell/perl6/ch-2.rk | 3 +++ 1 file changed, 3 insertions(+) diff --git a/challenge-020/adam-russell/perl6/ch-2.rk b/challenge-020/adam-russell/perl6/ch-2.rk index 46e4329e8f..8a574752bf 100644 --- a/challenge-020/adam-russell/perl6/ch-2.rk +++ b/challenge-020/adam-russell/perl6/ch-2.rk @@ -1,3 +1,6 @@ +## +# Write a script to print the smallest pair of Amicable Numbers. +## constant RANGE_SIZE = 50; sub factor-sum(@numbers){ my %number_sof; -- cgit