Circular primes: Difference between revisions

Content added Content deleted

Inline

@@ Line 1,690: / Line 1,690: @@
 main :-
     findall(P, limit(23, circular(P)), S),
-    format("The first 23 circular primes are ~w~n", [S]),
+    format("The first 23 circular primes:~n~w~n", [S]),
     halt.
@@ Line 1,697: / Line 1,697: @@
 {{Out}}
 <pre>
-The first 23 circular primes are [2,3,5,7,11,13,17,37,79,113,197,199,337,1193,3779,11939,19937,193939,199933,r(19),r(23),r(317),r(1031)]
+The first 23 circular primes:
+[2,3,5,7,11,13,17,37,79,113,197,199,337,1193,3779,11939,19937,193939,199933,r(19),r(23),r(317),r(1031)]
 </pre>