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

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

diff --git a/extra/project-euler/073/073.factor b/extra/project-euler/073/073.factor
index f4360f32774bb366b018e7e2ef8fee8f7e1d8225..1d1a4ebbb285b4125ac44dee82819dd451b9981a 100644 (file)
--- a/extra/project-euler/073/073.factor
+++ b/extra/project-euler/073/073.factor
@@ -3,32 +3,33 @@
 USING: kernel math project-euler.common ;
 IN: project-euler.073
 
-! https://projecteuler.net/index.php?section=problems&id=73
+! https://projecteuler.net/problem=73
 
 ! DESCRIPTION
 ! -----------
 
-! Consider the fraction, n/d, where n and d are positive integers. If n<d and
-! HCF(n,d) = 1, it is called a reduced proper fraction.
+! Consider the fraction, n/d, where n and d are positive
+! integers. If n<d and HCF(n,d) = 1, it is called a reduced
+! proper fraction.
 
-! If we list the set of reduced proper fractions for d <= 8 in ascending order of
-! size, we get:
+! If we list the set of reduced proper fractions for d <= 8 in
+! ascending order of size, we get:
 
-!     1/8, 1/7, 1/6, 1/5, 1/4, 2/7, 1/3, 3/8, 2/5, 3/7, 1/2, 4/7, 3/5, 5/8,
-!     2/3, 5/7, 3/4, 4/5, 5/6, 6/7, 7/8
+!     1/8, 1/7, 1/6, 1/5, 1/4, 2/7, 1/3, 3/8, 2/5, 3/7, 1/2,
+!     4/7, 3/5, 5/8, 2/3, 5/7, 3/4, 4/5, 5/6, 6/7, 7/8
 
 ! It can be seen that there are 3 fractions between 1/3 and 1/2.
 
-! How many fractions lie between 1/3 and 1/2 in the sorted set of reduced
-! proper fractions for d <= 10,000?
+! How many fractions lie between 1/3 and 1/2 in the sorted set
+! of reduced proper fractions for d <= 10,000?
 
 
 ! SOLUTION
 ! --------
 
-! Use the properties of a Farey sequence and mediants to recursively generate
-! the next fraction until the denominator is as close to 1000000 as possible
-! without going over.
+! Use the properties of a Farey sequence and mediants to
+! recursively generate the next fraction until the denominator
+! is as close to 1000000 as possible without going over.
 
 <PRIVATE