diff options
| -rw-r--r-- | challenge-159/simon-proctor/raku/ch-1.raku | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/challenge-159/simon-proctor/raku/ch-1.raku b/challenge-159/simon-proctor/raku/ch-1.raku new file mode 100644 index 0000000000..c94a0e7bb4 --- /dev/null +++ b/challenge-159/simon-proctor/raku/ch-1.raku @@ -0,0 +1,6 @@ +#!/usr/bin/env raku + +# Output the Farey Sequence of order n +sub MAIN ( Int \n ) { + ((0..n) X/ (1..n)).grep( * <= 1 ).unique.sort.map( *.nude ).map( { "@_[0]/@_[1]" } ).join(", ").say +} |