1998-06-11 01:21:14 +02:00
|
|
|
/* GLIB - Library of useful routines for C programming
|
|
|
|
* Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
|
|
|
|
*
|
|
|
|
* This library is free software; you can redistribute it and/or
|
2000-07-26 13:02:02 +02:00
|
|
|
* modify it under the terms of the GNU Lesser General Public
|
1998-06-11 01:21:14 +02:00
|
|
|
* License as published by the Free Software Foundation; either
|
|
|
|
* version 2 of the License, or (at your option) any later version.
|
|
|
|
*
|
|
|
|
* This library is distributed in the hope that it will be useful,
|
|
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
2000-07-26 13:02:02 +02:00
|
|
|
* Lesser General Public License for more details.
|
1998-06-11 01:21:14 +02:00
|
|
|
*
|
2000-07-26 13:02:02 +02:00
|
|
|
* You should have received a copy of the GNU Lesser General Public
|
1998-06-11 01:21:14 +02:00
|
|
|
* License along with this library; if not, write to the
|
|
|
|
* Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
|
|
|
* Boston, MA 02111-1307, USA.
|
|
|
|
*/
|
1998-12-15 06:28:02 +01:00
|
|
|
|
1999-02-24 07:14:27 +01:00
|
|
|
/*
|
2000-07-26 13:02:02 +02:00
|
|
|
* Modified by the GLib Team and others 1997-2000. See the AUTHORS
|
1999-02-24 07:14:27 +01:00
|
|
|
* file for a list of people on the GLib Team. See the ChangeLog
|
|
|
|
* files for a list of changes. These files are distributed with
|
|
|
|
* GLib at ftp://ftp.gtk.org/pub/gtk/.
|
|
|
|
*/
|
|
|
|
|
1998-12-15 06:28:02 +01:00
|
|
|
/*
|
|
|
|
* MT safe
|
|
|
|
*/
|
|
|
|
|
1998-06-11 01:21:14 +02:00
|
|
|
#include "glib.h"
|
|
|
|
|
1998-09-02 09:44:02 +02:00
|
|
|
static const guint g_primes[] =
|
1998-06-11 01:21:14 +02:00
|
|
|
{
|
|
|
|
11,
|
1998-09-02 09:44:02 +02:00
|
|
|
19,
|
|
|
|
37,
|
1998-06-11 01:21:14 +02:00
|
|
|
73,
|
|
|
|
109,
|
|
|
|
163,
|
|
|
|
251,
|
|
|
|
367,
|
|
|
|
557,
|
|
|
|
823,
|
|
|
|
1237,
|
|
|
|
1861,
|
|
|
|
2777,
|
|
|
|
4177,
|
|
|
|
6247,
|
|
|
|
9371,
|
|
|
|
14057,
|
|
|
|
21089,
|
|
|
|
31627,
|
|
|
|
47431,
|
|
|
|
71143,
|
|
|
|
106721,
|
|
|
|
160073,
|
|
|
|
240101,
|
|
|
|
360163,
|
|
|
|
540217,
|
|
|
|
810343,
|
|
|
|
1215497,
|
|
|
|
1823231,
|
|
|
|
2734867,
|
|
|
|
4102283,
|
|
|
|
6153409,
|
|
|
|
9230113,
|
|
|
|
13845163,
|
|
|
|
};
|
|
|
|
|
1998-09-02 09:44:02 +02:00
|
|
|
static const guint g_nprimes = sizeof (g_primes) / sizeof (g_primes[0]);
|
|
|
|
|
|
|
|
guint
|
|
|
|
g_spaced_primes_closest (guint num)
|
|
|
|
{
|
|
|
|
gint i;
|
|
|
|
|
|
|
|
for (i = 0; i < g_nprimes; i++)
|
|
|
|
if (g_primes[i] > num)
|
|
|
|
return g_primes[i];
|
|
|
|
|
|
|
|
return g_primes[g_nprimes - 1];
|
|
|
|
}
|