Fix comments to be ! not #!.

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

diff --git a/extra/project-euler/070/070.factor b/extra/project-euler/070/070.factor
index 38aa022b3d125eb0e659cb751a9f497be9373d3b..499ce21c340a98eb82246dab18ee16a1598a192b 100644 (file)
--- a/extra/project-euler/070/070.factor
+++ b/extra/project-euler/070/070.factor
@@ -47,7 +47,7 @@ IN: project-euler.070
     7 10^ sqrt >integer 1000 [ - ] [ + ] 2bi primes-between ; inline
 
 : n-and-phi ( seq -- seq' )
-    #! ( seq  = { p1, p2 } -- seq' = { n, φ(n) } )
+    ! ( seq  = { p1, p2 } -- seq' = { n, φ(n) } )
     [ product ] [ [ 1 - ] map product ] bi 2array ;
 
 : fit-requirements? ( seq -- ? )