|
From: <sv...@va...> - 2005-09-28 11:25:15
|
Author: sewardj
Date: 2005-09-28 12:25:10 +0100 (Wed, 28 Sep 2005)
New Revision: 4807
Log:
Handy program for finding prime numbers (small ones!)
Added:
trunk/auxprogs/primes.c
Modified:
trunk/auxprogs/Makefile.am
Modified: trunk/auxprogs/Makefile.am
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
--- trunk/auxprogs/Makefile.am 2005-09-28 10:47:38 UTC (rev 4806)
+++ trunk/auxprogs/Makefile.am 2005-09-28 11:25:10 UTC (rev 4807)
@@ -3,7 +3,7 @@
=20
bin_PROGRAMS =3D valgrind-listener
=20
-noinst_SCRIPTS =3D gen-mdg DotToScc.hs \
+noinst_SCRIPTS =3D gen-mdg DotToScc.hs primes.c \
gsl16test gsl16-badfree.patch gsl16-wavelet.patch
=20
EXTRA_DIST =3D $(noinst_SCRIPTS)
Added: trunk/auxprogs/primes.c
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
--- trunk/auxprogs/primes.c 2005-09-28 10:47:38 UTC (rev 4806)
+++ trunk/auxprogs/primes.c 2005-09-28 11:25:10 UTC (rev 4807)
@@ -0,0 +1,18 @@
+
+#include <stdio.h>
+
+int isprime ( int n )
+{
+ int m;
+ for (m =3D 2; m < n; m++)
+ if ((n % m) =3D=3D 0) return 0;
+ return 1;
+}
+
+int main ( int argc, char** argv )
+{
+ int i;
+ for (i =3D 79000; i < 81000; i++)
+ if (isprime(i)) { printf ( "%d ", i ); fflush(stdout); }
+ return 0;
+}
|