project-euler: Rewrap, update links, add copyrights, tests

[factor.git] / extra / project-euler / 053 / 053.factor

diff --git a/extra/project-euler/053/053.factor b/extra/project-euler/053/053.factor
index 1df1975cce40cc034d6ee44ff6e13d1ed5bf7aab..27d70b414ba819590fdd7a4e3ed46967d9a5d6ec 100644 (file)
--- a/extra/project-euler/053/053.factor
+++ b/extra/project-euler/053/053.factor
@@ -1,14 +1,16 @@
 ! Copyright (c) 2008 Aaron Schaefer.
 ! See https://factorcode.org/license.txt for BSD license.
-USING: kernel math math.combinatorics ranges sequences project-euler.common ;
+USING: kernel math math.combinatorics ranges sequences
+project-euler.common ;
 IN: project-euler.053
 
-! https://projecteuler.net/index.php?section=problems&id=53
+! https://projecteuler.net/problem=53
 
 ! DESCRIPTION
 ! -----------
 
-! There are exactly ten ways of selecting three from five, 12345:
+! There are exactly ten ways of selecting three from five,
+! 12345:
 
 !     123, 124, 125, 134, 135, 145, 234, 235, 245, and 345
 
@@ -18,9 +20,11 @@ IN: project-euler.053
 !     nCr = n! / r! * (n - r)!
 ! where r ≤ n, n! = n * (n − 1) * ... * 3 * 2 * 1, and 0! = 1.
 
-! It is not until n = 23, that a value exceeds one-million: 23C10 = 1144066.
+! It is not until n = 23, that a value exceeds one-million:
+! 23C10 = 1144066.
 
-! How many values of nCr, for 1 ≤ n ≤ 100, are greater than one-million?
+! How many values of nCr, for 1 ≤ n ≤ 100, are greater than
+! one-million?
 
 
 ! SOLUTION