blob: fece86c2ac0b86a30593be5f4887d53b845a2cf0 [file] [log] [blame]
<!DOCTYPE html><html lang="en"><head><meta charset="utf-8"><meta name="viewport" content="width=device-width, initial-scale=1.0"><meta name="generator" content="rustdoc"><meta name="description" content="Source of the Rust file `&#x2F;home&#x2F;runner&#x2F;.cargo&#x2F;registry&#x2F;src&#x2F;github.com-1ecc6299db9ec823&#x2F;libm-0.2.1&#x2F;src&#x2F;math&#x2F;lgammaf_r.rs`."><meta name="keywords" content="rust, rustlang, rust-lang"><title>lgammaf_r.rs - source</title><link rel="preload" as="font" type="font/woff2" crossorigin href="../../../SourceSerif4-Regular.ttf.woff2"><link rel="preload" as="font" type="font/woff2" crossorigin href="../../../FiraSans-Regular.woff2"><link rel="preload" as="font" type="font/woff2" crossorigin href="../../../FiraSans-Medium.woff2"><link rel="preload" as="font" type="font/woff2" crossorigin href="../../../SourceCodePro-Regular.ttf.woff2"><link rel="preload" as="font" type="font/woff2" crossorigin href="../../../SourceSerif4-Bold.ttf.woff2"><link rel="preload" as="font" type="font/woff2" crossorigin href="../../../SourceCodePro-Semibold.ttf.woff2"><link rel="stylesheet" type="text/css" href="../../../normalize.css"><link rel="stylesheet" type="text/css" href="../../../rustdoc.css" id="mainThemeStyle"><link rel="stylesheet" type="text/css" href="../../../ayu.css" disabled><link rel="stylesheet" type="text/css" href="../../../dark.css" disabled><link rel="stylesheet" type="text/css" href="../../../light.css" id="themeStyle"><script id="default-settings" ></script><script src="../../../storage.js"></script><script src="../../../crates.js"></script><script defer src="../../../main.js"></script><script defer src="../../../source-script.js"></script><script defer src="../../../source-files.js"></script>
<noscript><link rel="stylesheet" href="../../../noscript.css"></noscript><link rel="alternate icon" type="image/png" href="../../../favicon-16x16.png"><link rel="alternate icon" type="image/png" href="../../../favicon-32x32.png"><link rel="icon" type="image/svg+xml" href="../../../favicon.svg"></head><body class="rustdoc source"><!--[if lte IE 11]><div class="warning">This old browser is unsupported and will most likely display funky things.</div><![endif]--><nav class="sidebar"><div class="sidebar-menu" role="button">&#9776;</div><a class="sidebar-logo" href="../../../libm/index.html"><div class="logo-container"><img class="rust-logo" src="../../../rust-logo.png" alt="logo"></div>
</a></nav><main><div class="width-limiter"><div class="sub-container"><a class="sub-logo-container" href="../../../libm/index.html"><img class="rust-logo" src="../../../rust-logo.png" alt="logo"></a><nav class="sub"><div class="theme-picker"><button id="theme-picker" aria-label="Pick another theme!" aria-haspopup="menu" title="themes"><img width="18" height="18" alt="Pick another theme!" src="../../../brush.svg"></button><div id="theme-choices" role="menu"></div></div><form class="search-form"><div class="search-container"><div>
<input class="search-input" name="search" autocomplete="off" spellcheck="false" placeholder="Click or press ‘S’ to search, ‘?’ for more options…" type="search"></div><button type="button" id="help-button" title="help">?</button><a id="settings-menu" href="../../../settings.html" title="settings"><img width="18" height="18" alt="Change settings" src="../../../wheel.svg"></a></div></form></nav></div><section id="main-content" class="content"><div class="example-wrap"><pre class="line-numbers"><span id="1"> 1</span>
<span id="2"> 2</span>
<span id="3"> 3</span>
<span id="4"> 4</span>
<span id="5"> 5</span>
<span id="6"> 6</span>
<span id="7"> 7</span>
<span id="8"> 8</span>
<span id="9"> 9</span>
<span id="10"> 10</span>
<span id="11"> 11</span>
<span id="12"> 12</span>
<span id="13"> 13</span>
<span id="14"> 14</span>
<span id="15"> 15</span>
<span id="16"> 16</span>
<span id="17"> 17</span>
<span id="18"> 18</span>
<span id="19"> 19</span>
<span id="20"> 20</span>
<span id="21"> 21</span>
<span id="22"> 22</span>
<span id="23"> 23</span>
<span id="24"> 24</span>
<span id="25"> 25</span>
<span id="26"> 26</span>
<span id="27"> 27</span>
<span id="28"> 28</span>
<span id="29"> 29</span>
<span id="30"> 30</span>
<span id="31"> 31</span>
<span id="32"> 32</span>
<span id="33"> 33</span>
<span id="34"> 34</span>
<span id="35"> 35</span>
<span id="36"> 36</span>
<span id="37"> 37</span>
<span id="38"> 38</span>
<span id="39"> 39</span>
<span id="40"> 40</span>
<span id="41"> 41</span>
<span id="42"> 42</span>
<span id="43"> 43</span>
<span id="44"> 44</span>
<span id="45"> 45</span>
<span id="46"> 46</span>
<span id="47"> 47</span>
<span id="48"> 48</span>
<span id="49"> 49</span>
<span id="50"> 50</span>
<span id="51"> 51</span>
<span id="52"> 52</span>
<span id="53"> 53</span>
<span id="54"> 54</span>
<span id="55"> 55</span>
<span id="56"> 56</span>
<span id="57"> 57</span>
<span id="58"> 58</span>
<span id="59"> 59</span>
<span id="60"> 60</span>
<span id="61"> 61</span>
<span id="62"> 62</span>
<span id="63"> 63</span>
<span id="64"> 64</span>
<span id="65"> 65</span>
<span id="66"> 66</span>
<span id="67"> 67</span>
<span id="68"> 68</span>
<span id="69"> 69</span>
<span id="70"> 70</span>
<span id="71"> 71</span>
<span id="72"> 72</span>
<span id="73"> 73</span>
<span id="74"> 74</span>
<span id="75"> 75</span>
<span id="76"> 76</span>
<span id="77"> 77</span>
<span id="78"> 78</span>
<span id="79"> 79</span>
<span id="80"> 80</span>
<span id="81"> 81</span>
<span id="82"> 82</span>
<span id="83"> 83</span>
<span id="84"> 84</span>
<span id="85"> 85</span>
<span id="86"> 86</span>
<span id="87"> 87</span>
<span id="88"> 88</span>
<span id="89"> 89</span>
<span id="90"> 90</span>
<span id="91"> 91</span>
<span id="92"> 92</span>
<span id="93"> 93</span>
<span id="94"> 94</span>
<span id="95"> 95</span>
<span id="96"> 96</span>
<span id="97"> 97</span>
<span id="98"> 98</span>
<span id="99"> 99</span>
<span id="100">100</span>
<span id="101">101</span>
<span id="102">102</span>
<span id="103">103</span>
<span id="104">104</span>
<span id="105">105</span>
<span id="106">106</span>
<span id="107">107</span>
<span id="108">108</span>
<span id="109">109</span>
<span id="110">110</span>
<span id="111">111</span>
<span id="112">112</span>
<span id="113">113</span>
<span id="114">114</span>
<span id="115">115</span>
<span id="116">116</span>
<span id="117">117</span>
<span id="118">118</span>
<span id="119">119</span>
<span id="120">120</span>
<span id="121">121</span>
<span id="122">122</span>
<span id="123">123</span>
<span id="124">124</span>
<span id="125">125</span>
<span id="126">126</span>
<span id="127">127</span>
<span id="128">128</span>
<span id="129">129</span>
<span id="130">130</span>
<span id="131">131</span>
<span id="132">132</span>
<span id="133">133</span>
<span id="134">134</span>
<span id="135">135</span>
<span id="136">136</span>
<span id="137">137</span>
<span id="138">138</span>
<span id="139">139</span>
<span id="140">140</span>
<span id="141">141</span>
<span id="142">142</span>
<span id="143">143</span>
<span id="144">144</span>
<span id="145">145</span>
<span id="146">146</span>
<span id="147">147</span>
<span id="148">148</span>
<span id="149">149</span>
<span id="150">150</span>
<span id="151">151</span>
<span id="152">152</span>
<span id="153">153</span>
<span id="154">154</span>
<span id="155">155</span>
<span id="156">156</span>
<span id="157">157</span>
<span id="158">158</span>
<span id="159">159</span>
<span id="160">160</span>
<span id="161">161</span>
<span id="162">162</span>
<span id="163">163</span>
<span id="164">164</span>
<span id="165">165</span>
<span id="166">166</span>
<span id="167">167</span>
<span id="168">168</span>
<span id="169">169</span>
<span id="170">170</span>
<span id="171">171</span>
<span id="172">172</span>
<span id="173">173</span>
<span id="174">174</span>
<span id="175">175</span>
<span id="176">176</span>
<span id="177">177</span>
<span id="178">178</span>
<span id="179">179</span>
<span id="180">180</span>
<span id="181">181</span>
<span id="182">182</span>
<span id="183">183</span>
<span id="184">184</span>
<span id="185">185</span>
<span id="186">186</span>
<span id="187">187</span>
<span id="188">188</span>
<span id="189">189</span>
<span id="190">190</span>
<span id="191">191</span>
<span id="192">192</span>
<span id="193">193</span>
<span id="194">194</span>
<span id="195">195</span>
<span id="196">196</span>
<span id="197">197</span>
<span id="198">198</span>
<span id="199">199</span>
<span id="200">200</span>
<span id="201">201</span>
<span id="202">202</span>
<span id="203">203</span>
<span id="204">204</span>
<span id="205">205</span>
<span id="206">206</span>
<span id="207">207</span>
<span id="208">208</span>
<span id="209">209</span>
<span id="210">210</span>
<span id="211">211</span>
<span id="212">212</span>
<span id="213">213</span>
<span id="214">214</span>
<span id="215">215</span>
<span id="216">216</span>
<span id="217">217</span>
<span id="218">218</span>
<span id="219">219</span>
<span id="220">220</span>
<span id="221">221</span>
<span id="222">222</span>
<span id="223">223</span>
<span id="224">224</span>
<span id="225">225</span>
<span id="226">226</span>
<span id="227">227</span>
<span id="228">228</span>
<span id="229">229</span>
<span id="230">230</span>
<span id="231">231</span>
<span id="232">232</span>
<span id="233">233</span>
<span id="234">234</span>
<span id="235">235</span>
<span id="236">236</span>
<span id="237">237</span>
<span id="238">238</span>
<span id="239">239</span>
<span id="240">240</span>
<span id="241">241</span>
<span id="242">242</span>
<span id="243">243</span>
<span id="244">244</span>
<span id="245">245</span>
<span id="246">246</span>
<span id="247">247</span>
<span id="248">248</span>
<span id="249">249</span>
<span id="250">250</span>
<span id="251">251</span>
<span id="252">252</span>
<span id="253">253</span>
<span id="254">254</span>
</pre><pre class="rust"><code><span class="comment">/* origin: FreeBSD /usr/src/lib/msun/src/e_lgammaf_r.c */</span>
<span class="comment">/*
* Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
*/</span>
<span class="comment">/*
* ====================================================
* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
*
* Developed at SunPro, a Sun Microsystems, Inc. business.
* Permission to use, copy, modify, and distribute this
* software is freely granted, provided that this notice
* is preserved.
* ====================================================
*/</span>
<span class="kw">use</span> <span class="kw">super</span>::{<span class="ident">floorf</span>, <span class="ident">k_cosf</span>, <span class="ident">k_sinf</span>, <span class="ident">logf</span>};
<span class="kw">const</span> <span class="ident">PI</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">3.1415927410e+00</span>; <span class="comment">/* 0x40490fdb */</span>
<span class="kw">const</span> <span class="ident">A0</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">7.7215664089e-02</span>; <span class="comment">/* 0x3d9e233f */</span>
<span class="kw">const</span> <span class="ident">A1</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">3.2246702909e-01</span>; <span class="comment">/* 0x3ea51a66 */</span>
<span class="kw">const</span> <span class="ident">A2</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">6.7352302372e-02</span>; <span class="comment">/* 0x3d89f001 */</span>
<span class="kw">const</span> <span class="ident">A3</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">2.0580807701e-02</span>; <span class="comment">/* 0x3ca89915 */</span>
<span class="kw">const</span> <span class="ident">A4</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">7.3855509982e-03</span>; <span class="comment">/* 0x3bf2027e */</span>
<span class="kw">const</span> <span class="ident">A5</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">2.8905137442e-03</span>; <span class="comment">/* 0x3b3d6ec6 */</span>
<span class="kw">const</span> <span class="ident">A6</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">1.1927076848e-03</span>; <span class="comment">/* 0x3a9c54a1 */</span>
<span class="kw">const</span> <span class="ident">A7</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">5.1006977446e-04</span>; <span class="comment">/* 0x3a05b634 */</span>
<span class="kw">const</span> <span class="ident">A8</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">2.2086278477e-04</span>; <span class="comment">/* 0x39679767 */</span>
<span class="kw">const</span> <span class="ident">A9</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">1.0801156895e-04</span>; <span class="comment">/* 0x38e28445 */</span>
<span class="kw">const</span> <span class="ident">A10</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">2.5214456400e-05</span>; <span class="comment">/* 0x37d383a2 */</span>
<span class="kw">const</span> <span class="ident">A11</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">4.4864096708e-05</span>; <span class="comment">/* 0x383c2c75 */</span>
<span class="kw">const</span> <span class="ident">TC</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">1.4616321325e+00</span>; <span class="comment">/* 0x3fbb16c3 */</span>
<span class="kw">const</span> <span class="ident">TF</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="op">-</span><span class="number">1.2148628384e-01</span>; <span class="comment">/* 0xbdf8cdcd */</span>
<span class="comment">/* TT = -(tail of TF) */</span>
<span class="kw">const</span> <span class="ident">TT</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">6.6971006518e-09</span>; <span class="comment">/* 0x31e61c52 */</span>
<span class="kw">const</span> <span class="ident">T0</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">4.8383611441e-01</span>; <span class="comment">/* 0x3ef7b95e */</span>
<span class="kw">const</span> <span class="ident">T1</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="op">-</span><span class="number">1.4758771658e-01</span>; <span class="comment">/* 0xbe17213c */</span>
<span class="kw">const</span> <span class="ident">T2</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">6.4624942839e-02</span>; <span class="comment">/* 0x3d845a15 */</span>
<span class="kw">const</span> <span class="ident">T3</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="op">-</span><span class="number">3.2788541168e-02</span>; <span class="comment">/* 0xbd064d47 */</span>
<span class="kw">const</span> <span class="ident">T4</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">1.7970675603e-02</span>; <span class="comment">/* 0x3c93373d */</span>
<span class="kw">const</span> <span class="ident">T5</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="op">-</span><span class="number">1.0314224288e-02</span>; <span class="comment">/* 0xbc28fcfe */</span>
<span class="kw">const</span> <span class="ident">T6</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">6.1005386524e-03</span>; <span class="comment">/* 0x3bc7e707 */</span>
<span class="kw">const</span> <span class="ident">T7</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="op">-</span><span class="number">3.6845202558e-03</span>; <span class="comment">/* 0xbb7177fe */</span>
<span class="kw">const</span> <span class="ident">T8</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">2.2596477065e-03</span>; <span class="comment">/* 0x3b141699 */</span>
<span class="kw">const</span> <span class="ident">T9</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="op">-</span><span class="number">1.4034647029e-03</span>; <span class="comment">/* 0xbab7f476 */</span>
<span class="kw">const</span> <span class="ident">T10</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">8.8108185446e-04</span>; <span class="comment">/* 0x3a66f867 */</span>
<span class="kw">const</span> <span class="ident">T11</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="op">-</span><span class="number">5.3859531181e-04</span>; <span class="comment">/* 0xba0d3085 */</span>
<span class="kw">const</span> <span class="ident">T12</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">3.1563205994e-04</span>; <span class="comment">/* 0x39a57b6b */</span>
<span class="kw">const</span> <span class="ident">T13</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="op">-</span><span class="number">3.1275415677e-04</span>; <span class="comment">/* 0xb9a3f927 */</span>
<span class="kw">const</span> <span class="ident">T14</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">3.3552918467e-04</span>; <span class="comment">/* 0x39afe9f7 */</span>
<span class="kw">const</span> <span class="ident">U0</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="op">-</span><span class="number">7.7215664089e-02</span>; <span class="comment">/* 0xbd9e233f */</span>
<span class="kw">const</span> <span class="ident">U1</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">6.3282704353e-01</span>; <span class="comment">/* 0x3f2200f4 */</span>
<span class="kw">const</span> <span class="ident">U2</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">1.4549225569e+00</span>; <span class="comment">/* 0x3fba3ae7 */</span>
<span class="kw">const</span> <span class="ident">U3</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">9.7771751881e-01</span>; <span class="comment">/* 0x3f7a4bb2 */</span>
<span class="kw">const</span> <span class="ident">U4</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">2.2896373272e-01</span>; <span class="comment">/* 0x3e6a7578 */</span>
<span class="kw">const</span> <span class="ident">U5</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">1.3381091878e-02</span>; <span class="comment">/* 0x3c5b3c5e */</span>
<span class="kw">const</span> <span class="ident">V1</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">2.4559779167e+00</span>; <span class="comment">/* 0x401d2ebe */</span>
<span class="kw">const</span> <span class="ident">V2</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">2.1284897327e+00</span>; <span class="comment">/* 0x4008392d */</span>
<span class="kw">const</span> <span class="ident">V3</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">7.6928514242e-01</span>; <span class="comment">/* 0x3f44efdf */</span>
<span class="kw">const</span> <span class="ident">V4</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">1.0422264785e-01</span>; <span class="comment">/* 0x3dd572af */</span>
<span class="kw">const</span> <span class="ident">V5</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">3.2170924824e-03</span>; <span class="comment">/* 0x3b52d5db */</span>
<span class="kw">const</span> <span class="ident">S0</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="op">-</span><span class="number">7.7215664089e-02</span>; <span class="comment">/* 0xbd9e233f */</span>
<span class="kw">const</span> <span class="ident">S1</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">2.1498242021e-01</span>; <span class="comment">/* 0x3e5c245a */</span>
<span class="kw">const</span> <span class="ident">S2</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">3.2577878237e-01</span>; <span class="comment">/* 0x3ea6cc7a */</span>
<span class="kw">const</span> <span class="ident">S3</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">1.4635047317e-01</span>; <span class="comment">/* 0x3e15dce6 */</span>
<span class="kw">const</span> <span class="ident">S4</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">2.6642270386e-02</span>; <span class="comment">/* 0x3cda40e4 */</span>
<span class="kw">const</span> <span class="ident">S5</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">1.8402845599e-03</span>; <span class="comment">/* 0x3af135b4 */</span>
<span class="kw">const</span> <span class="ident">S6</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">3.1947532989e-05</span>; <span class="comment">/* 0x3805ff67 */</span>
<span class="kw">const</span> <span class="ident">R1</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">1.3920053244e+00</span>; <span class="comment">/* 0x3fb22d3b */</span>
<span class="kw">const</span> <span class="ident">R2</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">7.2193557024e-01</span>; <span class="comment">/* 0x3f38d0c5 */</span>
<span class="kw">const</span> <span class="ident">R3</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">1.7193385959e-01</span>; <span class="comment">/* 0x3e300f6e */</span>
<span class="kw">const</span> <span class="ident">R4</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">1.8645919859e-02</span>; <span class="comment">/* 0x3c98bf54 */</span>
<span class="kw">const</span> <span class="ident">R5</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">7.7794247773e-04</span>; <span class="comment">/* 0x3a4beed6 */</span>
<span class="kw">const</span> <span class="ident">R6</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">7.3266842264e-06</span>; <span class="comment">/* 0x36f5d7bd */</span>
<span class="kw">const</span> <span class="ident">W0</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">4.1893854737e-01</span>; <span class="comment">/* 0x3ed67f1d */</span>
<span class="kw">const</span> <span class="ident">W1</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">8.3333335817e-02</span>; <span class="comment">/* 0x3daaaaab */</span>
<span class="kw">const</span> <span class="ident">W2</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="op">-</span><span class="number">2.7777778450e-03</span>; <span class="comment">/* 0xbb360b61 */</span>
<span class="kw">const</span> <span class="ident">W3</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">7.9365057172e-04</span>; <span class="comment">/* 0x3a500cfd */</span>
<span class="kw">const</span> <span class="ident">W4</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="op">-</span><span class="number">5.9518753551e-04</span>; <span class="comment">/* 0xba1c065c */</span>
<span class="kw">const</span> <span class="ident">W5</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="number">8.3633989561e-04</span>; <span class="comment">/* 0x3a5b3dd2 */</span>
<span class="kw">const</span> <span class="ident">W6</span>: <span class="ident">f32</span> <span class="op">=</span> <span class="op">-</span><span class="number">1.6309292987e-03</span>; <span class="comment">/* 0xbad5c4e8 */</span>
<span class="comment">/* sin(PI*x) assuming x &gt; 2^-100, if sin(PI*x)==0 the sign is arbitrary */</span>
<span class="kw">fn</span> <span class="ident">sin_pi</span>(<span class="kw-2">mut</span> <span class="ident">x</span>: <span class="ident">f32</span>) -&gt; <span class="ident">f32</span> {
<span class="kw">let</span> <span class="kw-2">mut</span> <span class="ident">y</span>: <span class="ident">f64</span>;
<span class="kw">let</span> <span class="kw-2">mut</span> <span class="ident">n</span>: <span class="ident">isize</span>;
<span class="comment">/* spurious inexact if odd int */</span>
<span class="ident">x</span> <span class="op">=</span> <span class="number">2.0</span> <span class="op">*</span> (<span class="ident">x</span> <span class="op">*</span> <span class="number">0.5</span> <span class="op">-</span> <span class="ident">floorf</span>(<span class="ident">x</span> <span class="op">*</span> <span class="number">0.5</span>)); <span class="comment">/* x mod 2.0 */</span>
<span class="ident">n</span> <span class="op">=</span> (<span class="ident">x</span> <span class="op">*</span> <span class="number">4.0</span>) <span class="kw">as</span> <span class="ident">isize</span>;
<span class="ident">n</span> <span class="op">=</span> (<span class="ident">n</span> <span class="op">+</span> <span class="number">1</span>) <span class="op">/</span> <span class="number">2</span>;
<span class="ident">y</span> <span class="op">=</span> (<span class="ident">x</span> <span class="kw">as</span> <span class="ident">f64</span>) <span class="op">-</span> (<span class="ident">n</span> <span class="kw">as</span> <span class="ident">f64</span>) <span class="op">*</span> <span class="number">0.5</span>;
<span class="ident">y</span> <span class="kw-2">*</span><span class="op">=</span> <span class="number">3.14159265358979323846</span>;
<span class="kw">match</span> <span class="ident">n</span> {
<span class="number">1</span> =&gt; <span class="ident">k_cosf</span>(<span class="ident">y</span>),
<span class="number">2</span> =&gt; <span class="ident">k_sinf</span>(<span class="op">-</span><span class="ident">y</span>),
<span class="number">3</span> =&gt; <span class="op">-</span><span class="ident">k_cosf</span>(<span class="ident">y</span>),
<span class="number">0</span> <span class="op">|</span> <span class="kw">_</span> =&gt; <span class="ident">k_sinf</span>(<span class="ident">y</span>),
}
}
<span class="kw">pub</span> <span class="kw">fn</span> <span class="ident">lgammaf_r</span>(<span class="kw-2">mut</span> <span class="ident">x</span>: <span class="ident">f32</span>) -&gt; (<span class="ident">f32</span>, <span class="ident">i32</span>) {
<span class="kw">let</span> <span class="ident">u</span> <span class="op">=</span> <span class="ident">x</span>.<span class="ident">to_bits</span>();
<span class="kw">let</span> <span class="kw-2">mut</span> <span class="ident">t</span>: <span class="ident">f32</span>;
<span class="kw">let</span> <span class="ident">y</span>: <span class="ident">f32</span>;
<span class="kw">let</span> <span class="kw-2">mut</span> <span class="ident">z</span>: <span class="ident">f32</span>;
<span class="kw">let</span> <span class="ident">nadj</span>: <span class="ident">f32</span>;
<span class="kw">let</span> <span class="ident">p</span>: <span class="ident">f32</span>;
<span class="kw">let</span> <span class="ident">p1</span>: <span class="ident">f32</span>;
<span class="kw">let</span> <span class="ident">p2</span>: <span class="ident">f32</span>;
<span class="kw">let</span> <span class="ident">p3</span>: <span class="ident">f32</span>;
<span class="kw">let</span> <span class="ident">q</span>: <span class="ident">f32</span>;
<span class="kw">let</span> <span class="kw-2">mut</span> <span class="ident">r</span>: <span class="ident">f32</span>;
<span class="kw">let</span> <span class="ident">w</span>: <span class="ident">f32</span>;
<span class="kw">let</span> <span class="ident">ix</span>: <span class="ident">u32</span>;
<span class="kw">let</span> <span class="ident">i</span>: <span class="ident">i32</span>;
<span class="kw">let</span> <span class="ident">sign</span>: <span class="ident">bool</span>;
<span class="kw">let</span> <span class="kw-2">mut</span> <span class="ident">signgam</span>: <span class="ident">i32</span>;
<span class="comment">/* purge off +-inf, NaN, +-0, tiny and negative arguments */</span>
<span class="ident">signgam</span> <span class="op">=</span> <span class="number">1</span>;
<span class="ident">sign</span> <span class="op">=</span> (<span class="ident">u</span> <span class="op">&gt;</span><span class="op">&gt;</span> <span class="number">31</span>) <span class="op">!</span><span class="op">=</span> <span class="number">0</span>;
<span class="ident">ix</span> <span class="op">=</span> <span class="ident">u</span> <span class="op">&amp;</span> <span class="number">0x7fffffff</span>;
<span class="kw">if</span> <span class="ident">ix</span> <span class="op">&gt;</span><span class="op">=</span> <span class="number">0x7f800000</span> {
<span class="kw">return</span> (<span class="ident">x</span> <span class="op">*</span> <span class="ident">x</span>, <span class="ident">signgam</span>);
}
<span class="kw">if</span> <span class="ident">ix</span> <span class="op">&lt;</span> <span class="number">0x35000000</span> {
<span class="comment">/* |x| &lt; 2**-21, return -log(|x|) */</span>
<span class="kw">if</span> <span class="ident">sign</span> {
<span class="ident">signgam</span> <span class="op">=</span> <span class="op">-</span><span class="number">1</span>;
<span class="ident">x</span> <span class="op">=</span> <span class="op">-</span><span class="ident">x</span>;
}
<span class="kw">return</span> (<span class="op">-</span><span class="ident">logf</span>(<span class="ident">x</span>), <span class="ident">signgam</span>);
}
<span class="kw">if</span> <span class="ident">sign</span> {
<span class="ident">x</span> <span class="op">=</span> <span class="op">-</span><span class="ident">x</span>;
<span class="ident">t</span> <span class="op">=</span> <span class="ident">sin_pi</span>(<span class="ident">x</span>);
<span class="kw">if</span> <span class="ident">t</span> <span class="op">==</span> <span class="number">0.0</span> {
<span class="comment">/* -integer */</span>
<span class="kw">return</span> (<span class="number">1.0</span> <span class="op">/</span> (<span class="ident">x</span> <span class="op">-</span> <span class="ident">x</span>), <span class="ident">signgam</span>);
}
<span class="kw">if</span> <span class="ident">t</span> <span class="op">&gt;</span> <span class="number">0.0</span> {
<span class="ident">signgam</span> <span class="op">=</span> <span class="op">-</span><span class="number">1</span>;
} <span class="kw">else</span> {
<span class="ident">t</span> <span class="op">=</span> <span class="op">-</span><span class="ident">t</span>;
}
<span class="ident">nadj</span> <span class="op">=</span> <span class="ident">logf</span>(<span class="ident">PI</span> <span class="op">/</span> (<span class="ident">t</span> <span class="op">*</span> <span class="ident">x</span>));
} <span class="kw">else</span> {
<span class="ident">nadj</span> <span class="op">=</span> <span class="number">0.0</span>;
}
<span class="comment">/* purge off 1 and 2 */</span>
<span class="kw">if</span> <span class="ident">ix</span> <span class="op">==</span> <span class="number">0x3f800000</span> <span class="op">|</span><span class="op">|</span> <span class="ident">ix</span> <span class="op">==</span> <span class="number">0x40000000</span> {
<span class="ident">r</span> <span class="op">=</span> <span class="number">0.0</span>;
}
<span class="comment">/* for x &lt; 2.0 */</span>
<span class="kw">else</span> <span class="kw">if</span> <span class="ident">ix</span> <span class="op">&lt;</span> <span class="number">0x40000000</span> {
<span class="kw">if</span> <span class="ident">ix</span> <span class="op">&lt;</span><span class="op">=</span> <span class="number">0x3f666666</span> {
<span class="comment">/* lgamma(x) = lgamma(x+1)-log(x) */</span>
<span class="ident">r</span> <span class="op">=</span> <span class="op">-</span><span class="ident">logf</span>(<span class="ident">x</span>);
<span class="kw">if</span> <span class="ident">ix</span> <span class="op">&gt;</span><span class="op">=</span> <span class="number">0x3f3b4a20</span> {
<span class="ident">y</span> <span class="op">=</span> <span class="number">1.0</span> <span class="op">-</span> <span class="ident">x</span>;
<span class="ident">i</span> <span class="op">=</span> <span class="number">0</span>;
} <span class="kw">else</span> <span class="kw">if</span> <span class="ident">ix</span> <span class="op">&gt;</span><span class="op">=</span> <span class="number">0x3e6d3308</span> {
<span class="ident">y</span> <span class="op">=</span> <span class="ident">x</span> <span class="op">-</span> (<span class="ident">TC</span> <span class="op">-</span> <span class="number">1.0</span>);
<span class="ident">i</span> <span class="op">=</span> <span class="number">1</span>;
} <span class="kw">else</span> {
<span class="ident">y</span> <span class="op">=</span> <span class="ident">x</span>;
<span class="ident">i</span> <span class="op">=</span> <span class="number">2</span>;
}
} <span class="kw">else</span> {
<span class="ident">r</span> <span class="op">=</span> <span class="number">0.0</span>;
<span class="kw">if</span> <span class="ident">ix</span> <span class="op">&gt;</span><span class="op">=</span> <span class="number">0x3fdda618</span> {
<span class="comment">/* [1.7316,2] */</span>
<span class="ident">y</span> <span class="op">=</span> <span class="number">2.0</span> <span class="op">-</span> <span class="ident">x</span>;
<span class="ident">i</span> <span class="op">=</span> <span class="number">0</span>;
} <span class="kw">else</span> <span class="kw">if</span> <span class="ident">ix</span> <span class="op">&gt;</span><span class="op">=</span> <span class="number">0x3F9da620</span> {
<span class="comment">/* [1.23,1.73] */</span>
<span class="ident">y</span> <span class="op">=</span> <span class="ident">x</span> <span class="op">-</span> <span class="ident">TC</span>;
<span class="ident">i</span> <span class="op">=</span> <span class="number">1</span>;
} <span class="kw">else</span> {
<span class="ident">y</span> <span class="op">=</span> <span class="ident">x</span> <span class="op">-</span> <span class="number">1.0</span>;
<span class="ident">i</span> <span class="op">=</span> <span class="number">2</span>;
}
}
<span class="kw">match</span> <span class="ident">i</span> {
<span class="number">0</span> =&gt; {
<span class="ident">z</span> <span class="op">=</span> <span class="ident">y</span> <span class="op">*</span> <span class="ident">y</span>;
<span class="ident">p1</span> <span class="op">=</span> <span class="ident">A0</span> <span class="op">+</span> <span class="ident">z</span> <span class="op">*</span> (<span class="ident">A2</span> <span class="op">+</span> <span class="ident">z</span> <span class="op">*</span> (<span class="ident">A4</span> <span class="op">+</span> <span class="ident">z</span> <span class="op">*</span> (<span class="ident">A6</span> <span class="op">+</span> <span class="ident">z</span> <span class="op">*</span> (<span class="ident">A8</span> <span class="op">+</span> <span class="ident">z</span> <span class="op">*</span> <span class="ident">A10</span>))));
<span class="ident">p2</span> <span class="op">=</span> <span class="ident">z</span> <span class="op">*</span> (<span class="ident">A1</span> <span class="op">+</span> <span class="ident">z</span> <span class="op">*</span> (<span class="ident">A3</span> <span class="op">+</span> <span class="ident">z</span> <span class="op">*</span> (<span class="ident">A5</span> <span class="op">+</span> <span class="ident">z</span> <span class="op">*</span> (<span class="ident">A7</span> <span class="op">+</span> <span class="ident">z</span> <span class="op">*</span> (<span class="ident">A9</span> <span class="op">+</span> <span class="ident">z</span> <span class="op">*</span> <span class="ident">A11</span>)))));
<span class="ident">p</span> <span class="op">=</span> <span class="ident">y</span> <span class="op">*</span> <span class="ident">p1</span> <span class="op">+</span> <span class="ident">p2</span>;
<span class="ident">r</span> <span class="op">+</span><span class="op">=</span> <span class="ident">p</span> <span class="op">-</span> <span class="number">0.5</span> <span class="op">*</span> <span class="ident">y</span>;
}
<span class="number">1</span> =&gt; {
<span class="ident">z</span> <span class="op">=</span> <span class="ident">y</span> <span class="op">*</span> <span class="ident">y</span>;
<span class="ident">w</span> <span class="op">=</span> <span class="ident">z</span> <span class="op">*</span> <span class="ident">y</span>;
<span class="ident">p1</span> <span class="op">=</span> <span class="ident">T0</span> <span class="op">+</span> <span class="ident">w</span> <span class="op">*</span> (<span class="ident">T3</span> <span class="op">+</span> <span class="ident">w</span> <span class="op">*</span> (<span class="ident">T6</span> <span class="op">+</span> <span class="ident">w</span> <span class="op">*</span> (<span class="ident">T9</span> <span class="op">+</span> <span class="ident">w</span> <span class="op">*</span> <span class="ident">T12</span>))); <span class="comment">/* parallel comp */</span>
<span class="ident">p2</span> <span class="op">=</span> <span class="ident">T1</span> <span class="op">+</span> <span class="ident">w</span> <span class="op">*</span> (<span class="ident">T4</span> <span class="op">+</span> <span class="ident">w</span> <span class="op">*</span> (<span class="ident">T7</span> <span class="op">+</span> <span class="ident">w</span> <span class="op">*</span> (<span class="ident">T10</span> <span class="op">+</span> <span class="ident">w</span> <span class="op">*</span> <span class="ident">T13</span>)));
<span class="ident">p3</span> <span class="op">=</span> <span class="ident">T2</span> <span class="op">+</span> <span class="ident">w</span> <span class="op">*</span> (<span class="ident">T5</span> <span class="op">+</span> <span class="ident">w</span> <span class="op">*</span> (<span class="ident">T8</span> <span class="op">+</span> <span class="ident">w</span> <span class="op">*</span> (<span class="ident">T11</span> <span class="op">+</span> <span class="ident">w</span> <span class="op">*</span> <span class="ident">T14</span>)));
<span class="ident">p</span> <span class="op">=</span> <span class="ident">z</span> <span class="op">*</span> <span class="ident">p1</span> <span class="op">-</span> (<span class="ident">TT</span> <span class="op">-</span> <span class="ident">w</span> <span class="op">*</span> (<span class="ident">p2</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> <span class="ident">p3</span>));
<span class="ident">r</span> <span class="op">+</span><span class="op">=</span> <span class="ident">TF</span> <span class="op">+</span> <span class="ident">p</span>;
}
<span class="number">2</span> =&gt; {
<span class="ident">p1</span> <span class="op">=</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">U0</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">U1</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">U2</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">U3</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">U4</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> <span class="ident">U5</span>)))));
<span class="ident">p2</span> <span class="op">=</span> <span class="number">1.0</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">V1</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">V2</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">V3</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">V4</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> <span class="ident">V5</span>))));
<span class="ident">r</span> <span class="op">+</span><span class="op">=</span> <span class="op">-</span><span class="number">0.5</span> <span class="op">*</span> <span class="ident">y</span> <span class="op">+</span> <span class="ident">p1</span> <span class="op">/</span> <span class="ident">p2</span>;
}
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">debug_assertions</span>)]</span>
<span class="kw">_</span> =&gt; <span class="macro">unreachable!</span>(),
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">not</span>(<span class="ident">debug_assertions</span>))]</span>
<span class="kw">_</span> =&gt; {}
}
} <span class="kw">else</span> <span class="kw">if</span> <span class="ident">ix</span> <span class="op">&lt;</span> <span class="number">0x41000000</span> {
<span class="comment">/* x &lt; 8.0 */</span>
<span class="ident">i</span> <span class="op">=</span> <span class="ident">x</span> <span class="kw">as</span> <span class="ident">i32</span>;
<span class="ident">y</span> <span class="op">=</span> <span class="ident">x</span> <span class="op">-</span> (<span class="ident">i</span> <span class="kw">as</span> <span class="ident">f32</span>);
<span class="ident">p</span> <span class="op">=</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">S0</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">S1</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">S2</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">S3</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">S4</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">S5</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> <span class="ident">S6</span>))))));
<span class="ident">q</span> <span class="op">=</span> <span class="number">1.0</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">R1</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">R2</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">R3</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">R4</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">R5</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> <span class="ident">R6</span>)))));
<span class="ident">r</span> <span class="op">=</span> <span class="number">0.5</span> <span class="op">*</span> <span class="ident">y</span> <span class="op">+</span> <span class="ident">p</span> <span class="op">/</span> <span class="ident">q</span>;
<span class="ident">z</span> <span class="op">=</span> <span class="number">1.0</span>; <span class="comment">/* lgamma(1+s) = log(s) + lgamma(s) */</span>
<span class="comment">// TODO: In C, this was implemented using switch jumps with fallthrough.</span>
<span class="comment">// Does this implementation have performance problems?</span>
<span class="kw">if</span> <span class="ident">i</span> <span class="op">&gt;</span><span class="op">=</span> <span class="number">7</span> {
<span class="ident">z</span> <span class="kw-2">*</span><span class="op">=</span> <span class="ident">y</span> <span class="op">+</span> <span class="number">6.0</span>;
}
<span class="kw">if</span> <span class="ident">i</span> <span class="op">&gt;</span><span class="op">=</span> <span class="number">6</span> {
<span class="ident">z</span> <span class="kw-2">*</span><span class="op">=</span> <span class="ident">y</span> <span class="op">+</span> <span class="number">5.0</span>;
}
<span class="kw">if</span> <span class="ident">i</span> <span class="op">&gt;</span><span class="op">=</span> <span class="number">5</span> {
<span class="ident">z</span> <span class="kw-2">*</span><span class="op">=</span> <span class="ident">y</span> <span class="op">+</span> <span class="number">4.0</span>;
}
<span class="kw">if</span> <span class="ident">i</span> <span class="op">&gt;</span><span class="op">=</span> <span class="number">4</span> {
<span class="ident">z</span> <span class="kw-2">*</span><span class="op">=</span> <span class="ident">y</span> <span class="op">+</span> <span class="number">3.0</span>;
}
<span class="kw">if</span> <span class="ident">i</span> <span class="op">&gt;</span><span class="op">=</span> <span class="number">3</span> {
<span class="ident">z</span> <span class="kw-2">*</span><span class="op">=</span> <span class="ident">y</span> <span class="op">+</span> <span class="number">2.0</span>;
<span class="ident">r</span> <span class="op">+</span><span class="op">=</span> <span class="ident">logf</span>(<span class="ident">z</span>);
}
} <span class="kw">else</span> <span class="kw">if</span> <span class="ident">ix</span> <span class="op">&lt;</span> <span class="number">0x5c800000</span> {
<span class="comment">/* 8.0 &lt;= x &lt; 2**58 */</span>
<span class="ident">t</span> <span class="op">=</span> <span class="ident">logf</span>(<span class="ident">x</span>);
<span class="ident">z</span> <span class="op">=</span> <span class="number">1.0</span> <span class="op">/</span> <span class="ident">x</span>;
<span class="ident">y</span> <span class="op">=</span> <span class="ident">z</span> <span class="op">*</span> <span class="ident">z</span>;
<span class="ident">w</span> <span class="op">=</span> <span class="ident">W0</span> <span class="op">+</span> <span class="ident">z</span> <span class="op">*</span> (<span class="ident">W1</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">W2</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">W3</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">W4</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> (<span class="ident">W5</span> <span class="op">+</span> <span class="ident">y</span> <span class="op">*</span> <span class="ident">W6</span>)))));
<span class="ident">r</span> <span class="op">=</span> (<span class="ident">x</span> <span class="op">-</span> <span class="number">0.5</span>) <span class="op">*</span> (<span class="ident">t</span> <span class="op">-</span> <span class="number">1.0</span>) <span class="op">+</span> <span class="ident">w</span>;
} <span class="kw">else</span> {
<span class="comment">/* 2**58 &lt;= x &lt;= inf */</span>
<span class="ident">r</span> <span class="op">=</span> <span class="ident">x</span> <span class="op">*</span> (<span class="ident">logf</span>(<span class="ident">x</span>) <span class="op">-</span> <span class="number">1.0</span>);
}
<span class="kw">if</span> <span class="ident">sign</span> {
<span class="ident">r</span> <span class="op">=</span> <span class="ident">nadj</span> <span class="op">-</span> <span class="ident">r</span>;
}
<span class="kw">return</span> (<span class="ident">r</span>, <span class="ident">signgam</span>);
}
</code></pre></div>
</section><section id="search" class="content hidden"></section></div></main><div id="rustdoc-vars" data-root-path="../../../" data-current-crate="libm" data-themes="ayu,dark,light" data-resource-suffix="" data-rustdoc-version="1.60.0-nightly (1bd4fdc94 2022-01-12)" ></div>
</body></html>