<!-- HTML header for doxygen 1.8.8-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="X-UA-Compatible" content="IE=edge">
<!-- For Mobile Devices -->
<meta name="viewport" content="width=device-width, initial-scale=1">
<meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
<meta name="generator" content="Doxygen 1.8.17"/>
<script type="text/javascript" src="https://code.jquery.com/jquery-2.1.1.min.js"></script>
<title>QuEST: mt19937ar.c Source File</title>
<!--<link href="tabs.css" rel="stylesheet" type="text/css"/>-->
<script type="text/javascript" src="dynsections.js"></script>
<link href="doxygen.css" rel="stylesheet" type="text/css" />
<link href="style.css" rel="stylesheet" type="text/css"/>
<link href='https://fonts.googleapis.com/css?family=Roboto+Slab' rel='stylesheet' type='text/css'>
<link rel="stylesheet" href="https://maxcdn.bootstrapcdn.com/bootstrap/3.3.6/css/bootstrap.min.css">
<script src="https://maxcdn.bootstrapcdn.com/bootstrap/3.3.6/js/bootstrap.min.js"></script>
<link href="jquery.smartmenus.bootstrap.css" rel="stylesheet">
<script type="text/javascript" src="jquery.smartmenus.js"></script>
<!-- SmartMenus jQuery Bootstrap Addon -->
<script type="text/javascript" src="jquery.smartmenus.bootstrap.js"></script>
<!-- SmartMenus jQuery plugin -->
</head>
<body>
<nav class="navbar navbar-default" role="navigation">
<div class="container">
<div class="navbar-header">
<a class="navbar-brand"><img alt="Logo" src="logo.png"/></a>
<a class="navbar-brand"><b>QuEST</b> v3.1.0<br>The Quantum Exact Simulation Toolkit</a>
</div>
</div>
</nav>
<div id="top"><!-- do not remove this div, it is closed by doxygen! -->
<div class="content" id="content">
<div class="container">
<div class="row">
<div class="col-sm-12 panel " style="padding-bottom: 15px;">
<div style="margin-bottom: 15px;">
<!-- end header part -->
<!-- Generated by Doxygen 1.8.17 -->
<script type="text/javascript" src="menudata.js"></script>
<script type="text/javascript" src="menu.js"></script>
<script type="text/javascript">
/* @license magnet:?xt=urn:btih:cf05388f2679ee054f2beb29a391d25f4e673ac3&dn=gpl-2.0.txt GPL-v2 */
$(function() {
initMenu('',false,false,'search.php','Search');
});
/* @license-end */</script>
<div id="main-nav"></div>
<div id="nav-path" class="navpath">
<ul>
<li class="navelem"><a class="el" href="dir_d522931ffa1371640980b621734a4381.html">Users</a></li><li class="navelem"><a class="el" href="dir_70834f0dcd10de01d2e35ab402a2238e.html">tysonjones</a></li><li class="navelem"><a class="el" href="dir_1957401ef452be7528010ba0f4832a45.html">Desktop</a></li><li class="navelem"><a class="el" href="dir_dee4414d5d72b49a9429e079789ffd08.html">GithubRepos</a></li><li class="navelem"><a class="el" href="dir_a89b43d59316bb5045aa22bb53a67d29.html">QuEST</a></li><li class="navelem"><a class="el" href="dir_f1fe56bf5ef15ff22696c757278c6962.html">QuEST</a></li><li class="navelem"><a class="el" href="dir_757750313c878cfe3b7d1ade55b4b819.html">src</a></li> </ul>
</div>
</div><!-- top -->
<div class="header">
<div class="headertitle">
<div class="title">mt19937ar.c</div> </div>
</div><!--header-->
<div class="contents">
<a href="mt19937ar_8c.html">Go to the documentation of this file.</a><div class="fragment"><div class="line"><a name="l00001"></a><span class="lineno"> 1</span> <span class="comment">/* </span></div>
<div class="line"><a name="l00002"></a><span class="lineno"> 2</span> <span class="comment"> A C-program for MT19937, with initialization improved 2002/1/26.</span></div>
<div class="line"><a name="l00003"></a><span class="lineno"> 3</span> <span class="comment"> Coded by Takuji Nishimura and Makoto Matsumoto.</span></div>
<div class="line"><a name="l00004"></a><span class="lineno"> 4</span> <span class="comment"></span> </div>
<div class="line"><a name="l00005"></a><span class="lineno"> 5</span> <span class="comment"> Before using, initialize the state by using init_genrand(seed) </span></div>
<div class="line"><a name="l00006"></a><span class="lineno"> 6</span> <span class="comment"> or init_by_array(init_key, key_length).</span></div>
<div class="line"><a name="l00007"></a><span class="lineno"> 7</span> <span class="comment"></span> </div>
<div class="line"><a name="l00008"></a><span class="lineno"> 8</span> <span class="comment"> Copyright (C) 1997 - 2002, Makoto Matsumoto and Takuji Nishimura,</span></div>
<div class="line"><a name="l00009"></a><span class="lineno"> 9</span> <span class="comment"> All rights reserved. </span></div>
<div class="line"><a name="l00010"></a><span class="lineno"> 10</span> <span class="comment"></span> </div>
<div class="line"><a name="l00011"></a><span class="lineno"> 11</span> <span class="comment"> Redistribution and use in source and binary forms, with or without</span></div>
<div class="line"><a name="l00012"></a><span class="lineno"> 12</span> <span class="comment"> modification, are permitted provided that the following conditions</span></div>
<div class="line"><a name="l00013"></a><span class="lineno"> 13</span> <span class="comment"> are met:</span></div>
<div class="line"><a name="l00014"></a><span class="lineno"> 14</span> <span class="comment"></span> </div>
<div class="line"><a name="l00015"></a><span class="lineno"> 15</span> <span class="comment"> 1. Redistributions of source code must retain the above copyright</span></div>
<div class="line"><a name="l00016"></a><span class="lineno"> 16</span> <span class="comment"> notice, this list of conditions and the following disclaimer.</span></div>
<div class="line"><a name="l00017"></a><span class="lineno"> 17</span> <span class="comment"></span> </div>
<div class="line"><a name="l00018"></a><span class="lineno"> 18</span> <span class="comment"> 2. Redistributions in binary form must reproduce the above copyright</span></div>
<div class="line"><a name="l00019"></a><span class="lineno"> 19</span> <span class="comment"> notice, this list of conditions and the following disclaimer in the</span></div>
<div class="line"><a name="l00020"></a><span class="lineno"> 20</span> <span class="comment"> documentation and/or other materials provided with the distribution.</span></div>
<div class="line"><a name="l00021"></a><span class="lineno"> 21</span> <span class="comment"></span> </div>
<div class="line"><a name="l00022"></a><span class="lineno"> 22</span> <span class="comment"> 3. The names of its contributors may not be used to endorse or promote </span></div>
<div class="line"><a name="l00023"></a><span class="lineno"> 23</span> <span class="comment"> products derived from this software without specific prior written </span></div>
<div class="line"><a name="l00024"></a><span class="lineno"> 24</span> <span class="comment"> permission.</span></div>
<div class="line"><a name="l00025"></a><span class="lineno"> 25</span> <span class="comment"></span> </div>
<div class="line"><a name="l00026"></a><span class="lineno"> 26</span> <span class="comment"> THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS</span></div>
<div class="line"><a name="l00027"></a><span class="lineno"> 27</span> <span class="comment"> "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT</span></div>
<div class="line"><a name="l00028"></a><span class="lineno"> 28</span> <span class="comment"> LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR</span></div>
<div class="line"><a name="l00029"></a><span class="lineno"> 29</span> <span class="comment"> A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR</span></div>
<div class="line"><a name="l00030"></a><span class="lineno"> 30</span> <span class="comment"> CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,</span></div>
<div class="line"><a name="l00031"></a><span class="lineno"> 31</span> <span class="comment"> EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,</span></div>
<div class="line"><a name="l00032"></a><span class="lineno"> 32</span> <span class="comment"> PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR</span></div>
<div class="line"><a name="l00033"></a><span class="lineno"> 33</span> <span class="comment"> PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF</span></div>
<div class="line"><a name="l00034"></a><span class="lineno"> 34</span> <span class="comment"> LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING</span></div>
<div class="line"><a name="l00035"></a><span class="lineno"> 35</span> <span class="comment"> NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS</span></div>
<div class="line"><a name="l00036"></a><span class="lineno"> 36</span> <span class="comment"> SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.</span></div>
<div class="line"><a name="l00037"></a><span class="lineno"> 37</span> <span class="comment"></span> </div>
<div class="line"><a name="l00038"></a><span class="lineno"> 38</span> <span class="comment"></span> </div>
<div class="line"><a name="l00039"></a><span class="lineno"> 39</span> <span class="comment"> Any feedback is very welcome.</span></div>
<div class="line"><a name="l00040"></a><span class="lineno"> 40</span> <span class="comment"> http://www.math.sci.hiroshima-u.ac.jp/~m-mat/MT/emt.html</span></div>
<div class="line"><a name="l00041"></a><span class="lineno"> 41</span> <span class="comment"> email: m-mat @ math.sci.hiroshima-u.ac.jp (remove space)</span></div>
<div class="line"><a name="l00042"></a><span class="lineno"> 42</span> <span class="comment">*/</span></div>
<div class="line"><a name="l00043"></a><span class="lineno"> 43</span>  </div>
<div class="line"><a name="l00044"></a><span class="lineno"> 44</span> <span class="preprocessor">#include <stdio.h></span></div>
<div class="line"><a name="l00045"></a><span class="lineno"> 45</span>  </div>
<div class="line"><a name="l00046"></a><span class="lineno"> 46</span> <span class="comment">/* Period parameters */</span> </div>
<div class="line"><a name="l00047"></a><span class="lineno"><a class="line" href="mt19937ar_8c.html#a0240ac851181b84ac374872dc5434ee4"> 47</a></span> <span class="preprocessor">#define N 624</span></div>
<div class="line"><a name="l00048"></a><span class="lineno"><a class="line" href="mt19937ar_8c.html#a52037c938e3c1b126c6277da5ca689d0"> 48</a></span> <span class="preprocessor">#define M 397</span></div>
<div class="line"><a name="l00049"></a><span class="lineno"><a class="line" href="mt19937ar_8c.html#a376c3581bae3c2367fc9ce694e5a8949"> 49</a></span> <span class="preprocessor">#define MATRIX_A 0x9908b0dfUL </span><span class="comment">/* constant vector a */</span><span class="preprocessor"></span></div>
<div class="line"><a name="l00050"></a><span class="lineno"><a class="line" href="mt19937ar_8c.html#a39bc458849360f8f371b54c4365d397f"> 50</a></span> <span class="preprocessor">#define UPPER_MASK 0x80000000UL </span><span class="comment">/* most significant w-r bits */</span><span class="preprocessor"></span></div>
<div class="line"><a name="l00051"></a><span class="lineno"><a class="line" href="mt19937ar_8c.html#a4ddd8cab3564b7a86a4b0e52ba08f70e"> 51</a></span> <span class="preprocessor">#define LOWER_MASK 0x7fffffffUL </span><span class="comment">/* least significant r bits */</span><span class="preprocessor"></span></div>
<div class="line"><a name="l00052"></a><span class="lineno"> 52</span>  </div>
<div class="line"><a name="l00053"></a><span class="lineno"> 53</span> <span class="preprocessor">#ifdef __cplusplus</span></div>
<div class="line"><a name="l00054"></a><span class="lineno"> 54</span> <span class="keyword">extern</span> <span class="stringliteral">"C"</span> {</div>
<div class="line"><a name="l00055"></a><span class="lineno"> 55</span> <span class="preprocessor">#endif</span></div>
<div class="line"><a name="l00056"></a><span class="lineno"> 56</span>  </div>
<div class="line"><a name="l00057"></a><span class="lineno"><a class="line" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f"> 57</a></span> <span class="keyword">static</span> <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> <a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[<a class="code" href="mt19937ar_8c.html#a0240ac851181b84ac374872dc5434ee4">N</a>]; <span class="comment">/* the array for the state vector */</span></div>
<div class="line"><a name="l00058"></a><span class="lineno"><a class="line" href="mt19937ar_8c.html#a0893639c022032e006e5b13378f7b4b2"> 58</a></span> <span class="keyword">static</span> <span class="keywordtype">int</span> <a class="code" href="mt19937ar_8c.html#a0893639c022032e006e5b13378f7b4b2">mti</a>=<a class="code" href="mt19937ar_8c.html#a0240ac851181b84ac374872dc5434ee4">N</a>+1; <span class="comment">/* mti==N+1 means mt[N] is not initialized */</span></div>
<div class="line"><a name="l00059"></a><span class="lineno"> 59</span>  </div>
<div class="line"><a name="l00060"></a><span class="lineno"> 60</span> <span class="comment">/* initializes mt[N] with a seed */</span></div>
<div class="line"><a name="l00061"></a><span class="lineno"><a class="line" href="mt19937ar_8h.html#a57af1d02a3fb56a949fb4c258f0bc066"> 61</a></span> <span class="keywordtype">void</span> <a class="code" href="mt19937ar_8c.html#a57af1d02a3fb56a949fb4c258f0bc066">init_genrand</a>(<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> s)</div>
<div class="line"><a name="l00062"></a><span class="lineno"> 62</span> {</div>
<div class="line"><a name="l00063"></a><span class="lineno"> 63</span>  <a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[0]= s & 0xffffffffUL;</div>
<div class="line"><a name="l00064"></a><span class="lineno"> 64</span>  <span class="keywordflow">for</span> (<a class="code" href="mt19937ar_8c.html#a0893639c022032e006e5b13378f7b4b2">mti</a>=1; <a class="code" href="mt19937ar_8c.html#a0893639c022032e006e5b13378f7b4b2">mti</a><<a class="code" href="mt19937ar_8c.html#a0240ac851181b84ac374872dc5434ee4">N</a>; <a class="code" href="mt19937ar_8c.html#a0893639c022032e006e5b13378f7b4b2">mti</a>++) {</div>
<div class="line"><a name="l00065"></a><span class="lineno"> 65</span>  <a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[<a class="code" href="mt19937ar_8c.html#a0893639c022032e006e5b13378f7b4b2">mti</a>] = </div>
<div class="line"><a name="l00066"></a><span class="lineno"> 66</span>  (1812433253UL * (<a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[<a class="code" href="mt19937ar_8c.html#a0893639c022032e006e5b13378f7b4b2">mti</a>-1] ^ (<a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[<a class="code" href="mt19937ar_8c.html#a0893639c022032e006e5b13378f7b4b2">mti</a>-1] >> 30)) + <a class="code" href="mt19937ar_8c.html#a0893639c022032e006e5b13378f7b4b2">mti</a>); </div>
<div class="line"><a name="l00067"></a><span class="lineno"> 67</span>  <span class="comment">/* See Knuth TAOCP Vol2. 3rd Ed. P.106 for multiplier. */</span></div>
<div class="line"><a name="l00068"></a><span class="lineno"> 68</span>  <span class="comment">/* In the previous versions, MSBs of the seed affect */</span></div>
<div class="line"><a name="l00069"></a><span class="lineno"> 69</span>  <span class="comment">/* only MSBs of the array mt[]. */</span></div>
<div class="line"><a name="l00070"></a><span class="lineno"> 70</span>  <span class="comment">/* 2002/01/09 modified by Makoto Matsumoto */</span></div>
<div class="line"><a name="l00071"></a><span class="lineno"> 71</span>  <a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[<a class="code" href="mt19937ar_8c.html#a0893639c022032e006e5b13378f7b4b2">mti</a>] &= 0xffffffffUL;</div>
<div class="line"><a name="l00072"></a><span class="lineno"> 72</span>  <span class="comment">/* for >32 bit machines */</span></div>
<div class="line"><a name="l00073"></a><span class="lineno"> 73</span>  }</div>
<div class="line"><a name="l00074"></a><span class="lineno"> 74</span> }</div>
<div class="line"><a name="l00075"></a><span class="lineno"> 75</span>  </div>
<div class="line"><a name="l00076"></a><span class="lineno"> 76</span> <span class="comment">/* initialize by an array with array-length */</span></div>
<div class="line"><a name="l00077"></a><span class="lineno"> 77</span> <span class="comment">/* init_key is the array for initializing keys */</span></div>
<div class="line"><a name="l00078"></a><span class="lineno"> 78</span> <span class="comment">/* key_length is its length */</span></div>
<div class="line"><a name="l00079"></a><span class="lineno"> 79</span> <span class="comment">/* slight change for C++, 2004/2/26 */</span></div>
<div class="line"><a name="l00080"></a><span class="lineno"><a class="line" href="mt19937ar_8h.html#ac1283f9b1ed571332f5ffe53545ffc16"> 80</a></span> <span class="keywordtype">void</span> <a class="code" href="mt19937ar_8c.html#ac1283f9b1ed571332f5ffe53545ffc16">init_by_array</a>(<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> init_key[], <span class="keywordtype">int</span> key_length)</div>
<div class="line"><a name="l00081"></a><span class="lineno"> 81</span> {</div>
<div class="line"><a name="l00082"></a><span class="lineno"> 82</span>  <span class="keywordtype">int</span> i, j, k;</div>
<div class="line"><a name="l00083"></a><span class="lineno"> 83</span>  <a class="code" href="mt19937ar_8c.html#a57af1d02a3fb56a949fb4c258f0bc066">init_genrand</a>(19650218UL);</div>
<div class="line"><a name="l00084"></a><span class="lineno"> 84</span>  i=1; j=0;</div>
<div class="line"><a name="l00085"></a><span class="lineno"> 85</span>  k = (<a class="code" href="mt19937ar_8c.html#a0240ac851181b84ac374872dc5434ee4">N</a>>key_length ? <a class="code" href="mt19937ar_8c.html#a0240ac851181b84ac374872dc5434ee4">N</a> : key_length);</div>
<div class="line"><a name="l00086"></a><span class="lineno"> 86</span>  <span class="keywordflow">for</span> (; k; k--) {</div>
<div class="line"><a name="l00087"></a><span class="lineno"> 87</span>  <a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[i] = (<a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[i] ^ ((<a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[i-1] ^ (<a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[i-1] >> 30)) * 1664525UL))</div>
<div class="line"><a name="l00088"></a><span class="lineno"> 88</span>  + init_key[j] + j; <span class="comment">/* non linear */</span></div>
<div class="line"><a name="l00089"></a><span class="lineno"> 89</span>  <a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[i] &= 0xffffffffUL; <span class="comment">/* for WORDSIZE > 32 machines */</span></div>
<div class="line"><a name="l00090"></a><span class="lineno"> 90</span>  i++; j++;</div>
<div class="line"><a name="l00091"></a><span class="lineno"> 91</span>  <span class="keywordflow">if</span> (i>=<a class="code" href="mt19937ar_8c.html#a0240ac851181b84ac374872dc5434ee4">N</a>) { <a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[0] = <a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[<a class="code" href="mt19937ar_8c.html#a0240ac851181b84ac374872dc5434ee4">N</a>-1]; i=1; }</div>
<div class="line"><a name="l00092"></a><span class="lineno"> 92</span>  <span class="keywordflow">if</span> (j>=key_length) j=0;</div>
<div class="line"><a name="l00093"></a><span class="lineno"> 93</span>  }</div>
<div class="line"><a name="l00094"></a><span class="lineno"> 94</span>  <span class="keywordflow">for</span> (k=<a class="code" href="mt19937ar_8c.html#a0240ac851181b84ac374872dc5434ee4">N</a>-1; k; k--) {</div>
<div class="line"><a name="l00095"></a><span class="lineno"> 95</span>  <a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[i] = (<a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[i] ^ ((<a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[i-1] ^ (<a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[i-1] >> 30)) * 1566083941UL))</div>
<div class="line"><a name="l00096"></a><span class="lineno"> 96</span>  - i; <span class="comment">/* non linear */</span></div>
<div class="line"><a name="l00097"></a><span class="lineno"> 97</span>  <a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[i] &= 0xffffffffUL; <span class="comment">/* for WORDSIZE > 32 machines */</span></div>
<div class="line"><a name="l00098"></a><span class="lineno"> 98</span>  i++;</div>
<div class="line"><a name="l00099"></a><span class="lineno"> 99</span>  <span class="keywordflow">if</span> (i>=<a class="code" href="mt19937ar_8c.html#a0240ac851181b84ac374872dc5434ee4">N</a>) { <a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[0] = <a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[<a class="code" href="mt19937ar_8c.html#a0240ac851181b84ac374872dc5434ee4">N</a>-1]; i=1; }</div>
<div class="line"><a name="l00100"></a><span class="lineno"> 100</span>  }</div>
<div class="line"><a name="l00101"></a><span class="lineno"> 101</span>  </div>
<div class="line"><a name="l00102"></a><span class="lineno"> 102</span>  <a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[0] = 0x80000000UL; <span class="comment">/* MSB is 1; assuring non-zero initial array */</span> </div>
<div class="line"><a name="l00103"></a><span class="lineno"> 103</span> }</div>
<div class="line"><a name="l00104"></a><span class="lineno"> 104</span>  </div>
<div class="line"><a name="l00105"></a><span class="lineno"> 105</span> <span class="comment">/* generates a random number on [0,0xffffffff]-interval */</span></div>
<div class="line"><a name="l00106"></a><span class="lineno"><a class="line" href="mt19937ar_8c.html#a2b30ec504bc40c51320d14da9dfab43b"> 106</a></span> <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> <a class="code" href="mt19937ar_8c.html#a2b30ec504bc40c51320d14da9dfab43b">genrand_int32</a>(<span class="keywordtype">void</span>)</div>
<div class="line"><a name="l00107"></a><span class="lineno"> 107</span> {</div>
<div class="line"><a name="l00108"></a><span class="lineno"> 108</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> y;</div>
<div class="line"><a name="l00109"></a><span class="lineno"> 109</span>  <span class="keyword">static</span> <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> mag01[2]={0x0UL, <a class="code" href="mt19937ar_8c.html#a376c3581bae3c2367fc9ce694e5a8949">MATRIX_A</a>};</div>
<div class="line"><a name="l00110"></a><span class="lineno"> 110</span>  <span class="comment">/* mag01[x] = x * MATRIX_A for x=0,1 */</span></div>
<div class="line"><a name="l00111"></a><span class="lineno"> 111</span>  </div>
<div class="line"><a name="l00112"></a><span class="lineno"> 112</span>  <span class="keywordflow">if</span> (<a class="code" href="mt19937ar_8c.html#a0893639c022032e006e5b13378f7b4b2">mti</a> >= <a class="code" href="mt19937ar_8c.html#a0240ac851181b84ac374872dc5434ee4">N</a>) { <span class="comment">/* generate N words at one time */</span></div>
<div class="line"><a name="l00113"></a><span class="lineno"> 113</span>  <span class="keywordtype">int</span> kk;</div>
<div class="line"><a name="l00114"></a><span class="lineno"> 114</span>  </div>
<div class="line"><a name="l00115"></a><span class="lineno"> 115</span>  <span class="keywordflow">if</span> (<a class="code" href="mt19937ar_8c.html#a0893639c022032e006e5b13378f7b4b2">mti</a> == <a class="code" href="mt19937ar_8c.html#a0240ac851181b84ac374872dc5434ee4">N</a>+1) <span class="comment">/* if init_genrand() has not been called, */</span></div>
<div class="line"><a name="l00116"></a><span class="lineno"> 116</span>  <a class="code" href="mt19937ar_8c.html#a57af1d02a3fb56a949fb4c258f0bc066">init_genrand</a>(5489UL); <span class="comment">/* a default initial seed is used */</span></div>
<div class="line"><a name="l00117"></a><span class="lineno"> 117</span>  </div>
<div class="line"><a name="l00118"></a><span class="lineno"> 118</span>  <span class="keywordflow">for</span> (kk=0;kk<<a class="code" href="mt19937ar_8c.html#a0240ac851181b84ac374872dc5434ee4">N</a>-<a class="code" href="mt19937ar_8c.html#a52037c938e3c1b126c6277da5ca689d0">M</a>;kk++) {</div>
<div class="line"><a name="l00119"></a><span class="lineno"> 119</span>  y = (<a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[kk]&<a class="code" href="mt19937ar_8c.html#a39bc458849360f8f371b54c4365d397f">UPPER_MASK</a>)|(<a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[kk+1]&<a class="code" href="mt19937ar_8c.html#a4ddd8cab3564b7a86a4b0e52ba08f70e">LOWER_MASK</a>);</div>
<div class="line"><a name="l00120"></a><span class="lineno"> 120</span>  <a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[kk] = <a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[kk+<a class="code" href="mt19937ar_8c.html#a52037c938e3c1b126c6277da5ca689d0">M</a>] ^ (y >> 1) ^ mag01[y & 0x1UL];</div>
<div class="line"><a name="l00121"></a><span class="lineno"> 121</span>  }</div>
<div class="line"><a name="l00122"></a><span class="lineno"> 122</span>  <span class="keywordflow">for</span> (;kk<<a class="code" href="mt19937ar_8c.html#a0240ac851181b84ac374872dc5434ee4">N</a>-1;kk++) {</div>
<div class="line"><a name="l00123"></a><span class="lineno"> 123</span>  y = (<a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[kk]&<a class="code" href="mt19937ar_8c.html#a39bc458849360f8f371b54c4365d397f">UPPER_MASK</a>)|(<a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[kk+1]&<a class="code" href="mt19937ar_8c.html#a4ddd8cab3564b7a86a4b0e52ba08f70e">LOWER_MASK</a>);</div>
<div class="line"><a name="l00124"></a><span class="lineno"> 124</span>  <a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[kk] = <a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[kk+(<a class="code" href="mt19937ar_8c.html#a52037c938e3c1b126c6277da5ca689d0">M</a>-<a class="code" href="mt19937ar_8c.html#a0240ac851181b84ac374872dc5434ee4">N</a>)] ^ (y >> 1) ^ mag01[y & 0x1UL];</div>
<div class="line"><a name="l00125"></a><span class="lineno"> 125</span>  }</div>
<div class="line"><a name="l00126"></a><span class="lineno"> 126</span>  y = (<a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[<a class="code" href="mt19937ar_8c.html#a0240ac851181b84ac374872dc5434ee4">N</a>-1]&<a class="code" href="mt19937ar_8c.html#a39bc458849360f8f371b54c4365d397f">UPPER_MASK</a>)|(<a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[0]&<a class="code" href="mt19937ar_8c.html#a4ddd8cab3564b7a86a4b0e52ba08f70e">LOWER_MASK</a>);</div>
<div class="line"><a name="l00127"></a><span class="lineno"> 127</span>  <a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[<a class="code" href="mt19937ar_8c.html#a0240ac851181b84ac374872dc5434ee4">N</a>-1] = <a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[<a class="code" href="mt19937ar_8c.html#a52037c938e3c1b126c6277da5ca689d0">M</a>-1] ^ (y >> 1) ^ mag01[y & 0x1UL];</div>
<div class="line"><a name="l00128"></a><span class="lineno"> 128</span>  </div>
<div class="line"><a name="l00129"></a><span class="lineno"> 129</span>  <a class="code" href="mt19937ar_8c.html#a0893639c022032e006e5b13378f7b4b2">mti</a> = 0;</div>
<div class="line"><a name="l00130"></a><span class="lineno"> 130</span>  }</div>
<div class="line"><a name="l00131"></a><span class="lineno"> 131</span>  </div>
<div class="line"><a name="l00132"></a><span class="lineno"> 132</span>  y = <a class="code" href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a>[<a class="code" href="mt19937ar_8c.html#a0893639c022032e006e5b13378f7b4b2">mti</a>++];</div>
<div class="line"><a name="l00133"></a><span class="lineno"> 133</span>  </div>
<div class="line"><a name="l00134"></a><span class="lineno"> 134</span>  <span class="comment">/* Tempering */</span></div>
<div class="line"><a name="l00135"></a><span class="lineno"> 135</span>  y ^= (y >> 11);</div>
<div class="line"><a name="l00136"></a><span class="lineno"> 136</span>  y ^= (y << 7) & 0x9d2c5680UL;</div>
<div class="line"><a name="l00137"></a><span class="lineno"> 137</span>  y ^= (y << 15) & 0xefc60000UL;</div>
<div class="line"><a name="l00138"></a><span class="lineno"> 138</span>  y ^= (y >> 18);</div>
<div class="line"><a name="l00139"></a><span class="lineno"> 139</span>  </div>
<div class="line"><a name="l00140"></a><span class="lineno"> 140</span>  <span class="keywordflow">return</span> y;</div>
<div class="line"><a name="l00141"></a><span class="lineno"> 141</span> }</div>
<div class="line"><a name="l00142"></a><span class="lineno"> 142</span>  </div>
<div class="line"><a name="l00143"></a><span class="lineno"> 143</span> <span class="comment">/* generates a random number on [0,0x7fffffff]-interval */</span></div>
<div class="line"><a name="l00144"></a><span class="lineno"><a class="line" href="mt19937ar_8c.html#a6339fb46fb539f173518a6367f6616bd"> 144</a></span> <span class="keywordtype">long</span> <a class="code" href="mt19937ar_8c.html#a6339fb46fb539f173518a6367f6616bd">genrand_int31</a>(<span class="keywordtype">void</span>)</div>
<div class="line"><a name="l00145"></a><span class="lineno"> 145</span> {</div>
<div class="line"><a name="l00146"></a><span class="lineno"> 146</span>  <span class="keywordflow">return</span> (<span class="keywordtype">long</span>)(<a class="code" href="mt19937ar_8c.html#a2b30ec504bc40c51320d14da9dfab43b">genrand_int32</a>()>>1);</div>
<div class="line"><a name="l00147"></a><span class="lineno"> 147</span> }</div>
<div class="line"><a name="l00148"></a><span class="lineno"> 148</span>  </div>
<div class="line"><a name="l00149"></a><span class="lineno"> 149</span> <span class="comment">/* generates a random number on [0,1]-real-interval */</span></div>
<div class="line"><a name="l00150"></a><span class="lineno"><a class="line" href="mt19937ar_8h.html#ac94ab75771800274ed1a2bedeca86f04"> 150</a></span> <span class="keywordtype">double</span> <a class="code" href="mt19937ar_8c.html#ac94ab75771800274ed1a2bedeca86f04">genrand_real1</a>(<span class="keywordtype">void</span>)</div>
<div class="line"><a name="l00151"></a><span class="lineno"> 151</span> {</div>
<div class="line"><a name="l00152"></a><span class="lineno"> 152</span>  <span class="keywordflow">return</span> <a class="code" href="mt19937ar_8c.html#a2b30ec504bc40c51320d14da9dfab43b">genrand_int32</a>()*(1.0/4294967295.0); </div>
<div class="line"><a name="l00153"></a><span class="lineno"> 153</span>  <span class="comment">/* divided by 2^32-1 */</span> </div>
<div class="line"><a name="l00154"></a><span class="lineno"> 154</span> }</div>
<div class="line"><a name="l00155"></a><span class="lineno"> 155</span>  </div>
<div class="line"><a name="l00156"></a><span class="lineno"> 156</span> <span class="comment">/* generates a random number on [0,1)-real-interval */</span></div>
<div class="line"><a name="l00157"></a><span class="lineno"><a class="line" href="mt19937ar_8h.html#a4ee58afbdf91669ff8a15fc19e627bea"> 157</a></span> <span class="keywordtype">double</span> <a class="code" href="mt19937ar_8c.html#a4ee58afbdf91669ff8a15fc19e627bea">genrand_real2</a>(<span class="keywordtype">void</span>)</div>
<div class="line"><a name="l00158"></a><span class="lineno"> 158</span> {</div>
<div class="line"><a name="l00159"></a><span class="lineno"> 159</span>  <span class="keywordflow">return</span> <a class="code" href="mt19937ar_8c.html#a2b30ec504bc40c51320d14da9dfab43b">genrand_int32</a>()*(1.0/4294967296.0); </div>
<div class="line"><a name="l00160"></a><span class="lineno"> 160</span>  <span class="comment">/* divided by 2^32 */</span></div>
<div class="line"><a name="l00161"></a><span class="lineno"> 161</span> }</div>
<div class="line"><a name="l00162"></a><span class="lineno"> 162</span>  </div>
<div class="line"><a name="l00163"></a><span class="lineno"> 163</span> <span class="comment">/* generates a random number on (0,1)-real-interval */</span></div>
<div class="line"><a name="l00164"></a><span class="lineno"><a class="line" href="mt19937ar_8h.html#ab1a90aa68ebfcd712cb05ed9061ecf44"> 164</a></span> <span class="keywordtype">double</span> <a class="code" href="mt19937ar_8c.html#ab1a90aa68ebfcd712cb05ed9061ecf44">genrand_real3</a>(<span class="keywordtype">void</span>)</div>
<div class="line"><a name="l00165"></a><span class="lineno"> 165</span> {</div>
<div class="line"><a name="l00166"></a><span class="lineno"> 166</span>  <span class="keywordflow">return</span> (((<span class="keywordtype">double</span>)<a class="code" href="mt19937ar_8c.html#a2b30ec504bc40c51320d14da9dfab43b">genrand_int32</a>()) + 0.5)*(1.0/4294967296.0); </div>
<div class="line"><a name="l00167"></a><span class="lineno"> 167</span>  <span class="comment">/* divided by 2^32 */</span></div>
<div class="line"><a name="l00168"></a><span class="lineno"> 168</span> }</div>
<div class="line"><a name="l00169"></a><span class="lineno"> 169</span>  </div>
<div class="line"><a name="l00170"></a><span class="lineno"> 170</span> <span class="comment">/* generates a random number on [0,1) with 53-bit resolution*/</span></div>
<div class="line"><a name="l00171"></a><span class="lineno"><a class="line" href="mt19937ar_8h.html#ac821d41970276e53e85bde08b24536b8"> 171</a></span> <span class="keywordtype">double</span> <a class="code" href="mt19937ar_8c.html#ac821d41970276e53e85bde08b24536b8">genrand_res53</a>(<span class="keywordtype">void</span>) </div>
<div class="line"><a name="l00172"></a><span class="lineno"> 172</span> { </div>
<div class="line"><a name="l00173"></a><span class="lineno"> 173</span>  <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> a=<a class="code" href="mt19937ar_8c.html#a2b30ec504bc40c51320d14da9dfab43b">genrand_int32</a>()>>5, b=<a class="code" href="mt19937ar_8c.html#a2b30ec504bc40c51320d14da9dfab43b">genrand_int32</a>()>>6; </div>
<div class="line"><a name="l00174"></a><span class="lineno"> 174</span>  <span class="keywordflow">return</span>(a*67108864.0+b)*(1.0/9007199254740992.0); </div>
<div class="line"><a name="l00175"></a><span class="lineno"> 175</span> } </div>
<div class="line"><a name="l00176"></a><span class="lineno"> 176</span> <span class="comment">/* These real versions are due to Isaku Wada, 2002/01/09 added */</span></div>
<div class="line"><a name="l00177"></a><span class="lineno"> 177</span>  </div>
<div class="line"><a name="l00178"></a><span class="lineno"> 178</span> <span class="preprocessor">#ifdef __cplusplus</span></div>
<div class="line"><a name="l00179"></a><span class="lineno"> 179</span> }</div>
<div class="line"><a name="l00180"></a><span class="lineno"> 180</span> <span class="preprocessor">#endif</span></div>
</div><!-- fragment --></div><!-- contents -->
<div class="ttc" id="amt19937ar_8c_html_ac821d41970276e53e85bde08b24536b8"><div class="ttname"><a href="mt19937ar_8c.html#ac821d41970276e53e85bde08b24536b8">genrand_res53</a></div><div class="ttdeci">double genrand_res53(void)</div><div class="ttdef"><b>Definition:</b> <a href="mt19937ar_8c_source.html#l00171">mt19937ar.c:171</a></div></div>
<div class="ttc" id="amt19937ar_8c_html_ac1283f9b1ed571332f5ffe53545ffc16"><div class="ttname"><a href="mt19937ar_8c.html#ac1283f9b1ed571332f5ffe53545ffc16">init_by_array</a></div><div class="ttdeci">void init_by_array(unsigned long init_key[], int key_length)</div><div class="ttdef"><b>Definition:</b> <a href="mt19937ar_8c_source.html#l00080">mt19937ar.c:80</a></div></div>
<div class="ttc" id="amt19937ar_8c_html_a2b30ec504bc40c51320d14da9dfab43b"><div class="ttname"><a href="mt19937ar_8c.html#a2b30ec504bc40c51320d14da9dfab43b">genrand_int32</a></div><div class="ttdeci">unsigned long genrand_int32(void)</div><div class="ttdef"><b>Definition:</b> <a href="mt19937ar_8c_source.html#l00106">mt19937ar.c:106</a></div></div>
<div class="ttc" id="amt19937ar_8c_html_a57af1d02a3fb56a949fb4c258f0bc066"><div class="ttname"><a href="mt19937ar_8c.html#a57af1d02a3fb56a949fb4c258f0bc066">init_genrand</a></div><div class="ttdeci">void init_genrand(unsigned long s)</div><div class="ttdef"><b>Definition:</b> <a href="mt19937ar_8c_source.html#l00061">mt19937ar.c:61</a></div></div>
<div class="ttc" id="amt19937ar_8c_html_ab1a90aa68ebfcd712cb05ed9061ecf44"><div class="ttname"><a href="mt19937ar_8c.html#ab1a90aa68ebfcd712cb05ed9061ecf44">genrand_real3</a></div><div class="ttdeci">double genrand_real3(void)</div><div class="ttdef"><b>Definition:</b> <a href="mt19937ar_8c_source.html#l00164">mt19937ar.c:164</a></div></div>
<div class="ttc" id="amt19937ar_8c_html_a52037c938e3c1b126c6277da5ca689d0"><div class="ttname"><a href="mt19937ar_8c.html#a52037c938e3c1b126c6277da5ca689d0">M</a></div><div class="ttdeci">#define M</div><div class="ttdef"><b>Definition:</b> <a href="mt19937ar_8c_source.html#l00048">mt19937ar.c:48</a></div></div>
<div class="ttc" id="amt19937ar_8c_html_a376c3581bae3c2367fc9ce694e5a8949"><div class="ttname"><a href="mt19937ar_8c.html#a376c3581bae3c2367fc9ce694e5a8949">MATRIX_A</a></div><div class="ttdeci">#define MATRIX_A</div><div class="ttdef"><b>Definition:</b> <a href="mt19937ar_8c_source.html#l00049">mt19937ar.c:49</a></div></div>
<div class="ttc" id="amt19937ar_8c_html_aff3cefd0011b487c57a7af7cb3bc499f"><div class="ttname"><a href="mt19937ar_8c.html#aff3cefd0011b487c57a7af7cb3bc499f">mt</a></div><div class="ttdeci">static unsigned long mt[N]</div><div class="ttdef"><b>Definition:</b> <a href="mt19937ar_8c_source.html#l00057">mt19937ar.c:57</a></div></div>
<div class="ttc" id="amt19937ar_8c_html_a0893639c022032e006e5b13378f7b4b2"><div class="ttname"><a href="mt19937ar_8c.html#a0893639c022032e006e5b13378f7b4b2">mti</a></div><div class="ttdeci">static int mti</div><div class="ttdef"><b>Definition:</b> <a href="mt19937ar_8c_source.html#l00058">mt19937ar.c:58</a></div></div>
<div class="ttc" id="amt19937ar_8c_html_a6339fb46fb539f173518a6367f6616bd"><div class="ttname"><a href="mt19937ar_8c.html#a6339fb46fb539f173518a6367f6616bd">genrand_int31</a></div><div class="ttdeci">long genrand_int31(void)</div><div class="ttdef"><b>Definition:</b> <a href="mt19937ar_8c_source.html#l00144">mt19937ar.c:144</a></div></div>
<div class="ttc" id="amt19937ar_8c_html_ac94ab75771800274ed1a2bedeca86f04"><div class="ttname"><a href="mt19937ar_8c.html#ac94ab75771800274ed1a2bedeca86f04">genrand_real1</a></div><div class="ttdeci">double genrand_real1(void)</div><div class="ttdef"><b>Definition:</b> <a href="mt19937ar_8c_source.html#l00150">mt19937ar.c:150</a></div></div>
<div class="ttc" id="amt19937ar_8c_html_a0240ac851181b84ac374872dc5434ee4"><div class="ttname"><a href="mt19937ar_8c.html#a0240ac851181b84ac374872dc5434ee4">N</a></div><div class="ttdeci">#define N</div><div class="ttdef"><b>Definition:</b> <a href="mt19937ar_8c_source.html#l00047">mt19937ar.c:47</a></div></div>
<div class="ttc" id="amt19937ar_8c_html_a39bc458849360f8f371b54c4365d397f"><div class="ttname"><a href="mt19937ar_8c.html#a39bc458849360f8f371b54c4365d397f">UPPER_MASK</a></div><div class="ttdeci">#define UPPER_MASK</div><div class="ttdef"><b>Definition:</b> <a href="mt19937ar_8c_source.html#l00050">mt19937ar.c:50</a></div></div>
<div class="ttc" id="amt19937ar_8c_html_a4ddd8cab3564b7a86a4b0e52ba08f70e"><div class="ttname"><a href="mt19937ar_8c.html#a4ddd8cab3564b7a86a4b0e52ba08f70e">LOWER_MASK</a></div><div class="ttdeci">#define LOWER_MASK</div><div class="ttdef"><b>Definition:</b> <a href="mt19937ar_8c_source.html#l00051">mt19937ar.c:51</a></div></div>
<div class="ttc" id="amt19937ar_8c_html_a4ee58afbdf91669ff8a15fc19e627bea"><div class="ttname"><a href="mt19937ar_8c.html#a4ee58afbdf91669ff8a15fc19e627bea">genrand_real2</a></div><div class="ttdeci">double genrand_real2(void)</div><div class="ttdef"><b>Definition:</b> <a href="mt19937ar_8c_source.html#l00157">mt19937ar.c:157</a></div></div>
<!-- HTML footer for doxygen 1.8.8-->
<!-- start footer part -->
</div>
</div>
</div>
</div>
</div>
</body>
<script type="text/javascript" src="boot.js"></script>
</html>
