FastJet  3.4.0
BasicRandom.cc
1 //FJSTARTHEADER
2 // $Id$
3 //
4 // Copyright (c) 2005-2021, Matteo Cacciari, Gavin P. Salam and Gregory Soyez
5 //
6 //----------------------------------------------------------------------
7 // This file is part of FastJet.
8 //
9 // FastJet is free software; you can redistribute it and/or modify
10 // it under the terms of the GNU General Public License as published by
11 // the Free Software Foundation; either version 2 of the License, or
12 // (at your option) any later version.
13 //
14 // The algorithms that underlie FastJet have required considerable
15 // development. They are described in the original FastJet paper,
16 // hep-ph/0512210 and in the manual, arXiv:1111.6097. If you use
17 // FastJet as part of work towards a scientific publication, please
18 // quote the version you use and include a citation to the manual and
19 // optionally also to hep-ph/0512210.
20 //
21 // FastJet is distributed in the hope that it will be useful,
22 // but WITHOUT ANY WARRANTY; without even the implied warranty of
23 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
24 // GNU General Public License for more details.
25 //
26 // You should have received a copy of the GNU General Public License
27 // along with FastJet. If not, see <http://www.gnu.org/licenses/>.
28 //----------------------------------------------------------------------
29 //FJENDHEADER
30 
31 // nlo includes
32 #include "fastjet/internal/BasicRandom.hh"
33 
34 FASTJET_BEGIN_NAMESPACE // defined in fastjet/internal/base.hh
35 
36 #ifdef FASTJET_HAVE_LIMITED_THREAD_SAFETY
37 std::mutex BasicRandom<double>::_multiple_number_generation_mutex;
38 #endif
39 
40 //
41 // random number generator
42 // uses method of L'Ecuyer, (via F.James, comp. phys. comm. 60(1990)329)
43 //
44 int __default_random_generator(int *__iseed)
45 {
46  int __k = __iseed[0]/53668;
47  __iseed[0] = (__iseed[0] - __k*53668)*40014 - __k*12211;
48  if(__iseed[0] < 0) __iseed[0] += 2147483563;
49 
50  __k = __iseed[1]/52774;
51  __iseed[1] = (__iseed[1] - __k*52774)*40692 - __k*3791;
52  if(__iseed[1] < 0) __iseed[1] += 2147483399;
53 
54  int __iz = __iseed[0] - __iseed[1];
55  if(__iz < 1) __iz += 2147483562;
56 
57  return __iz;
58 }
59 
60 // global defined random number generator
61 BasicRandom<int> _G_random_int;
62 BasicRandom<double> _G_random_double;
63 
64 
65 FASTJET_END_NAMESPACE
66