<!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 `/home/sangenya/.cargo/registry/src/github.com-1ecc6299db9ec823/ndarray-0.10.14/src/linalg/impl_linalg.rs`."><meta name="keywords" content="rust, rustlang, rust-lang"><title>impl_linalg.rs - source</title><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="../../../light.css" id="themeStyle"><link rel="stylesheet" type="text/css" href="../../../dark.css" disabled ><link rel="stylesheet" type="text/css" href="../../../ayu.css" disabled ><script id="default-settings"></script><script src="../../../storage.js"></script><script src="../../../crates.js"></script><noscript><link rel="stylesheet" href="../../../noscript.css"></noscript><link rel="icon" type="image/svg+xml" href="../../../favicon.svg">
<link rel="alternate icon" type="image/png" href="../../../favicon-16x16.png">
<link rel="alternate icon" type="image/png" href="../../../favicon-32x32.png"><style type="text/css">#crate-search{background-image:url("../../../down-arrow.svg");}</style></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">☰</div><a href='../../../ndarray/index.html'><div class='logo-container rust-logo'><img src='../../../rust-logo.png' alt='logo'></div></a></nav><div class="theme-picker"><button id="theme-picker" aria-label="Pick another theme!" aria-haspopup="menu" title="themes"><img src="../../../brush.svg" width="18" height="18" alt="Pick another theme!"></button><div id="theme-choices" role="menu"></div></div><nav class="sub"><form class="search-form"><div class="search-container"><div><select id="crate-search"><option value="All crates">All crates</option></select><input class="search-input" name="search" disabled 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 src="../../../wheel.svg" width="18" height="18" alt="Change settings"></a></div></form></nav><section id="main" 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>
<span id="255">255</span>
<span id="256">256</span>
<span id="257">257</span>
<span id="258">258</span>
<span id="259">259</span>
<span id="260">260</span>
<span id="261">261</span>
<span id="262">262</span>
<span id="263">263</span>
<span id="264">264</span>
<span id="265">265</span>
<span id="266">266</span>
<span id="267">267</span>
<span id="268">268</span>
<span id="269">269</span>
<span id="270">270</span>
<span id="271">271</span>
<span id="272">272</span>
<span id="273">273</span>
<span id="274">274</span>
<span id="275">275</span>
<span id="276">276</span>
<span id="277">277</span>
<span id="278">278</span>
<span id="279">279</span>
<span id="280">280</span>
<span id="281">281</span>
<span id="282">282</span>
<span id="283">283</span>
<span id="284">284</span>
<span id="285">285</span>
<span id="286">286</span>
<span id="287">287</span>
<span id="288">288</span>
<span id="289">289</span>
<span id="290">290</span>
<span id="291">291</span>
<span id="292">292</span>
<span id="293">293</span>
<span id="294">294</span>
<span id="295">295</span>
<span id="296">296</span>
<span id="297">297</span>
<span id="298">298</span>
<span id="299">299</span>
<span id="300">300</span>
<span id="301">301</span>
<span id="302">302</span>
<span id="303">303</span>
<span id="304">304</span>
<span id="305">305</span>
<span id="306">306</span>
<span id="307">307</span>
<span id="308">308</span>
<span id="309">309</span>
<span id="310">310</span>
<span id="311">311</span>
<span id="312">312</span>
<span id="313">313</span>
<span id="314">314</span>
<span id="315">315</span>
<span id="316">316</span>
<span id="317">317</span>
<span id="318">318</span>
<span id="319">319</span>
<span id="320">320</span>
<span id="321">321</span>
<span id="322">322</span>
<span id="323">323</span>
<span id="324">324</span>
<span id="325">325</span>
<span id="326">326</span>
<span id="327">327</span>
<span id="328">328</span>
<span id="329">329</span>
<span id="330">330</span>
<span id="331">331</span>
<span id="332">332</span>
<span id="333">333</span>
<span id="334">334</span>
<span id="335">335</span>
<span id="336">336</span>
<span id="337">337</span>
<span id="338">338</span>
<span id="339">339</span>
<span id="340">340</span>
<span id="341">341</span>
<span id="342">342</span>
<span id="343">343</span>
<span id="344">344</span>
<span id="345">345</span>
<span id="346">346</span>
<span id="347">347</span>
<span id="348">348</span>
<span id="349">349</span>
<span id="350">350</span>
<span id="351">351</span>
<span id="352">352</span>
<span id="353">353</span>
<span id="354">354</span>
<span id="355">355</span>
<span id="356">356</span>
<span id="357">357</span>
<span id="358">358</span>
<span id="359">359</span>
<span id="360">360</span>
<span id="361">361</span>
<span id="362">362</span>
<span id="363">363</span>
<span id="364">364</span>
<span id="365">365</span>
<span id="366">366</span>
<span id="367">367</span>
<span id="368">368</span>
<span id="369">369</span>
<span id="370">370</span>
<span id="371">371</span>
<span id="372">372</span>
<span id="373">373</span>
<span id="374">374</span>
<span id="375">375</span>
<span id="376">376</span>
<span id="377">377</span>
<span id="378">378</span>
<span id="379">379</span>
<span id="380">380</span>
<span id="381">381</span>
<span id="382">382</span>
<span id="383">383</span>
<span id="384">384</span>
<span id="385">385</span>
<span id="386">386</span>
<span id="387">387</span>
<span id="388">388</span>
<span id="389">389</span>
<span id="390">390</span>
<span id="391">391</span>
<span id="392">392</span>
<span id="393">393</span>
<span id="394">394</span>
<span id="395">395</span>
<span id="396">396</span>
<span id="397">397</span>
<span id="398">398</span>
<span id="399">399</span>
<span id="400">400</span>
<span id="401">401</span>
<span id="402">402</span>
<span id="403">403</span>
<span id="404">404</span>
<span id="405">405</span>
<span id="406">406</span>
<span id="407">407</span>
<span id="408">408</span>
<span id="409">409</span>
<span id="410">410</span>
<span id="411">411</span>
<span id="412">412</span>
<span id="413">413</span>
<span id="414">414</span>
<span id="415">415</span>
<span id="416">416</span>
<span id="417">417</span>
<span id="418">418</span>
<span id="419">419</span>
<span id="420">420</span>
<span id="421">421</span>
<span id="422">422</span>
<span id="423">423</span>
<span id="424">424</span>
<span id="425">425</span>
<span id="426">426</span>
<span id="427">427</span>
<span id="428">428</span>
<span id="429">429</span>
<span id="430">430</span>
<span id="431">431</span>
<span id="432">432</span>
<span id="433">433</span>
<span id="434">434</span>
<span id="435">435</span>
<span id="436">436</span>
<span id="437">437</span>
<span id="438">438</span>
<span id="439">439</span>
<span id="440">440</span>
<span id="441">441</span>
<span id="442">442</span>
<span id="443">443</span>
<span id="444">444</span>
<span id="445">445</span>
<span id="446">446</span>
<span id="447">447</span>
<span id="448">448</span>
<span id="449">449</span>
<span id="450">450</span>
<span id="451">451</span>
<span id="452">452</span>
<span id="453">453</span>
<span id="454">454</span>
<span id="455">455</span>
<span id="456">456</span>
<span id="457">457</span>
<span id="458">458</span>
<span id="459">459</span>
<span id="460">460</span>
<span id="461">461</span>
<span id="462">462</span>
<span id="463">463</span>
<span id="464">464</span>
<span id="465">465</span>
<span id="466">466</span>
<span id="467">467</span>
<span id="468">468</span>
<span id="469">469</span>
<span id="470">470</span>
<span id="471">471</span>
<span id="472">472</span>
<span id="473">473</span>
<span id="474">474</span>
<span id="475">475</span>
<span id="476">476</span>
<span id="477">477</span>
<span id="478">478</span>
<span id="479">479</span>
<span id="480">480</span>
<span id="481">481</span>
<span id="482">482</span>
<span id="483">483</span>
<span id="484">484</span>
<span id="485">485</span>
<span id="486">486</span>
<span id="487">487</span>
<span id="488">488</span>
<span id="489">489</span>
<span id="490">490</span>
<span id="491">491</span>
<span id="492">492</span>
<span id="493">493</span>
<span id="494">494</span>
<span id="495">495</span>
<span id="496">496</span>
<span id="497">497</span>
<span id="498">498</span>
<span id="499">499</span>
<span id="500">500</span>
<span id="501">501</span>
<span id="502">502</span>
<span id="503">503</span>
<span id="504">504</span>
<span id="505">505</span>
<span id="506">506</span>
<span id="507">507</span>
<span id="508">508</span>
<span id="509">509</span>
<span id="510">510</span>
<span id="511">511</span>
<span id="512">512</span>
<span id="513">513</span>
<span id="514">514</span>
<span id="515">515</span>
<span id="516">516</span>
<span id="517">517</span>
<span id="518">518</span>
<span id="519">519</span>
<span id="520">520</span>
<span id="521">521</span>
<span id="522">522</span>
<span id="523">523</span>
<span id="524">524</span>
<span id="525">525</span>
<span id="526">526</span>
<span id="527">527</span>
<span id="528">528</span>
<span id="529">529</span>
<span id="530">530</span>
<span id="531">531</span>
<span id="532">532</span>
<span id="533">533</span>
<span id="534">534</span>
<span id="535">535</span>
<span id="536">536</span>
<span id="537">537</span>
<span id="538">538</span>
<span id="539">539</span>
<span id="540">540</span>
<span id="541">541</span>
<span id="542">542</span>
<span id="543">543</span>
<span id="544">544</span>
<span id="545">545</span>
<span id="546">546</span>
<span id="547">547</span>
<span id="548">548</span>
<span id="549">549</span>
<span id="550">550</span>
<span id="551">551</span>
<span id="552">552</span>
<span id="553">553</span>
<span id="554">554</span>
<span id="555">555</span>
<span id="556">556</span>
<span id="557">557</span>
<span id="558">558</span>
<span id="559">559</span>
<span id="560">560</span>
<span id="561">561</span>
<span id="562">562</span>
<span id="563">563</span>
<span id="564">564</span>
<span id="565">565</span>
<span id="566">566</span>
<span id="567">567</span>
<span id="568">568</span>
<span id="569">569</span>
<span id="570">570</span>
<span id="571">571</span>
<span id="572">572</span>
<span id="573">573</span>
<span id="574">574</span>
<span id="575">575</span>
<span id="576">576</span>
<span id="577">577</span>
<span id="578">578</span>
<span id="579">579</span>
<span id="580">580</span>
<span id="581">581</span>
<span id="582">582</span>
<span id="583">583</span>
<span id="584">584</span>
<span id="585">585</span>
<span id="586">586</span>
<span id="587">587</span>
<span id="588">588</span>
<span id="589">589</span>
<span id="590">590</span>
<span id="591">591</span>
<span id="592">592</span>
<span id="593">593</span>
<span id="594">594</span>
<span id="595">595</span>
<span id="596">596</span>
<span id="597">597</span>
<span id="598">598</span>
<span id="599">599</span>
<span id="600">600</span>
<span id="601">601</span>
<span id="602">602</span>
<span id="603">603</span>
<span id="604">604</span>
<span id="605">605</span>
<span id="606">606</span>
<span id="607">607</span>
<span id="608">608</span>
<span id="609">609</span>
<span id="610">610</span>
<span id="611">611</span>
<span id="612">612</span>
<span id="613">613</span>
<span id="614">614</span>
<span id="615">615</span>
<span id="616">616</span>
<span id="617">617</span>
<span id="618">618</span>
<span id="619">619</span>
<span id="620">620</span>
<span id="621">621</span>
<span id="622">622</span>
<span id="623">623</span>
<span id="624">624</span>
<span id="625">625</span>
<span id="626">626</span>
<span id="627">627</span>
<span id="628">628</span>
<span id="629">629</span>
<span id="630">630</span>
<span id="631">631</span>
<span id="632">632</span>
<span id="633">633</span>
<span id="634">634</span>
<span id="635">635</span>
<span id="636">636</span>
<span id="637">637</span>
<span id="638">638</span>
<span id="639">639</span>
<span id="640">640</span>
<span id="641">641</span>
<span id="642">642</span>
<span id="643">643</span>
<span id="644">644</span>
<span id="645">645</span>
<span id="646">646</span>
<span id="647">647</span>
<span id="648">648</span>
<span id="649">649</span>
<span id="650">650</span>
<span id="651">651</span>
<span id="652">652</span>
<span id="653">653</span>
<span id="654">654</span>
<span id="655">655</span>
<span id="656">656</span>
<span id="657">657</span>
<span id="658">658</span>
<span id="659">659</span>
<span id="660">660</span>
<span id="661">661</span>
<span id="662">662</span>
<span id="663">663</span>
<span id="664">664</span>
<span id="665">665</span>
<span id="666">666</span>
<span id="667">667</span>
<span id="668">668</span>
<span id="669">669</span>
<span id="670">670</span>
<span id="671">671</span>
<span id="672">672</span>
<span id="673">673</span>
<span id="674">674</span>
<span id="675">675</span>
<span id="676">676</span>
<span id="677">677</span>
<span id="678">678</span>
<span id="679">679</span>
<span id="680">680</span>
<span id="681">681</span>
<span id="682">682</span>
<span id="683">683</span>
<span id="684">684</span>
<span id="685">685</span>
<span id="686">686</span>
<span id="687">687</span>
<span id="688">688</span>
<span id="689">689</span>
<span id="690">690</span>
<span id="691">691</span>
<span id="692">692</span>
<span id="693">693</span>
<span id="694">694</span>
<span id="695">695</span>
<span id="696">696</span>
<span id="697">697</span>
<span id="698">698</span>
<span id="699">699</span>
<span id="700">700</span>
<span id="701">701</span>
<span id="702">702</span>
<span id="703">703</span>
<span id="704">704</span>
<span id="705">705</span>
<span id="706">706</span>
<span id="707">707</span>
<span id="708">708</span>
<span id="709">709</span>
<span id="710">710</span>
<span id="711">711</span>
<span id="712">712</span>
<span id="713">713</span>
<span id="714">714</span>
<span id="715">715</span>
<span id="716">716</span>
<span id="717">717</span>
<span id="718">718</span>
<span id="719">719</span>
<span id="720">720</span>
<span id="721">721</span>
<span id="722">722</span>
<span id="723">723</span>
<span id="724">724</span>
<span id="725">725</span>
<span id="726">726</span>
<span id="727">727</span>
<span id="728">728</span>
<span id="729">729</span>
<span id="730">730</span>
<span id="731">731</span>
<span id="732">732</span>
<span id="733">733</span>
<span id="734">734</span>
<span id="735">735</span>
<span id="736">736</span>
<span id="737">737</span>
<span id="738">738</span>
<span id="739">739</span>
<span id="740">740</span>
<span id="741">741</span>
<span id="742">742</span>
<span id="743">743</span>
</pre><pre class="rust">
<span class="comment">// Copyright 2014-2016 bluss and ndarray developers.</span>
<span class="comment">//</span>
<span class="comment">// Licensed under the Apache License, Version 2.0 <LICENSE-APACHE or</span>
<span class="comment">// http://www.apache.org/licenses/LICENSE-2.0> or the MIT license</span>
<span class="comment">// <LICENSE-MIT or http://opensource.org/licenses/MIT>, at your</span>
<span class="comment">// option. This file may not be copied, modified, or distributed</span>
<span class="comment">// except according to those terms.</span>
<span class="kw">use</span> <span class="ident">imp_prelude</span>::<span class="kw-2">*</span>;
<span class="kw">use</span> <span class="ident">numeric_util</span>;
<span class="kw">use</span> {
<span class="ident">LinalgScalar</span>,
<span class="ident">Zip</span>,
};
<span class="kw">use</span> <span class="ident">std::any::TypeId</span>;
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">feature</span><span class="op">=</span><span class="string">"blas"</span>)]</span>
<span class="kw">use</span> <span class="ident">std::cmp</span>;
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">feature</span><span class="op">=</span><span class="string">"blas"</span>)]</span>
<span class="kw">use</span> <span class="ident">std::mem::swap</span>;
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">feature</span><span class="op">=</span><span class="string">"blas"</span>)]</span>
<span class="kw">use</span> <span class="ident">std::os::raw::c_int</span>;
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">feature</span><span class="op">=</span><span class="string">"blas"</span>)]</span>
<span class="kw">use</span> <span class="ident">blas_sys::c</span>::{<span class="ident">CblasNoTrans</span>, <span class="ident">CblasTrans</span>, <span class="ident">CblasRowMajor</span>};
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">feature</span><span class="op">=</span><span class="string">"blas"</span>)]</span>
<span class="kw">use</span> <span class="ident">blas_sys</span>;
<span class="doccomment">/// len of vector before we use blas</span>
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">feature</span><span class="op">=</span><span class="string">"blas"</span>)]</span>
<span class="kw">const</span> <span class="ident">DOT_BLAS_CUTOFF</span>: <span class="ident">usize</span> <span class="op">=</span> <span class="number">32</span>;
<span class="doccomment">/// side of matrix before we use blas</span>
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">feature</span><span class="op">=</span><span class="string">"blas"</span>)]</span>
<span class="kw">const</span> <span class="ident">GEMM_BLAS_CUTOFF</span>: <span class="ident">usize</span> <span class="op">=</span> <span class="number">7</span>;
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">feature</span><span class="op">=</span><span class="string">"blas"</span>)]</span>
<span class="attribute">#[<span class="ident">allow</span>(<span class="ident">non_camel_case_types</span>)]</span>
<span class="kw">type</span> <span class="ident">blas_index</span> <span class="op">=</span> <span class="ident">c_int</span>; <span class="comment">// blas index type</span>
<span class="kw">impl</span><span class="op"><</span><span class="ident">A</span>, <span class="ident">S</span><span class="op">></span> <span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S</span>, <span class="ident">Ix1</span><span class="op">></span>
<span class="kw">where</span> <span class="ident">S</span>: <span class="ident">Data</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
{
<span class="doccomment">/// Perform dot product or matrix multiplication of arrays `self` and `rhs`.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// `Rhs` may be either a one-dimensional or a two-dimensional array.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// If `Rhs` is one-dimensional, then the operation is a vector dot</span>
<span class="doccomment">/// product, which is the sum of the elementwise products (no conjugation</span>
<span class="doccomment">/// of complex operands, and thus not their inner product). In this case,</span>
<span class="doccomment">/// `self` and `rhs` must be the same length.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// If `Rhs` is two-dimensional, then the operation is matrix</span>
<span class="doccomment">/// multiplication, where `self` is treated as a row vector. In this case,</span>
<span class="doccomment">/// if `self` is shape *M*, then `rhs` is shape *M* × *N* and the result is</span>
<span class="doccomment">/// shape *N*.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// **Panics** if the array shapes are incompatible.<br></span>
<span class="doccomment">/// *Note:* If enabled, uses blas `dot` for elements of `f32, f64` when memory</span>
<span class="doccomment">/// layout allows.</span>
<span class="kw">pub</span> <span class="kw">fn</span> <span class="ident">dot</span><span class="op"><</span><span class="ident">Rhs</span><span class="op">></span>(<span class="kw-2">&</span><span class="self">self</span>, <span class="ident">rhs</span>: <span class="kw-2">&</span><span class="ident">Rhs</span>) <span class="op">-</span><span class="op">></span> <span class="op"><</span><span class="self">Self</span> <span class="kw">as</span> <span class="ident">Dot</span><span class="op"><</span><span class="ident">Rhs</span><span class="op">></span><span class="op">></span><span class="ident">::Output</span>
<span class="kw">where</span> <span class="self">Self</span>: <span class="ident">Dot</span><span class="op"><</span><span class="ident">Rhs</span><span class="op">></span>
{
<span class="ident">Dot::dot</span>(<span class="self">self</span>, <span class="ident">rhs</span>)
}
<span class="kw">fn</span> <span class="ident">dot_generic</span><span class="op"><</span><span class="ident">S2</span><span class="op">></span>(<span class="kw-2">&</span><span class="self">self</span>, <span class="ident">rhs</span>: <span class="kw-2">&</span><span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S2</span>, <span class="ident">Ix1</span><span class="op">></span>) <span class="op">-</span><span class="op">></span> <span class="ident">A</span>
<span class="kw">where</span> <span class="ident">S2</span>: <span class="ident">Data</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">A</span>: <span class="ident">LinalgScalar</span>,
{
<span class="macro">debug_assert_eq!</span>(<span class="self">self</span>.<span class="ident">len</span>(), <span class="ident">rhs</span>.<span class="ident">len</span>());
<span class="macro">assert!</span>(<span class="self">self</span>.<span class="ident">len</span>() <span class="op">=</span><span class="op">=</span> <span class="ident">rhs</span>.<span class="ident">len</span>());
<span class="kw">if</span> <span class="kw">let</span> <span class="prelude-val">Some</span>(<span class="ident">self_s</span>) <span class="op">=</span> <span class="self">self</span>.<span class="ident">as_slice</span>() {
<span class="kw">if</span> <span class="kw">let</span> <span class="prelude-val">Some</span>(<span class="ident">rhs_s</span>) <span class="op">=</span> <span class="ident">rhs</span>.<span class="ident">as_slice</span>() {
<span class="kw">return</span> <span class="ident">numeric_util::unrolled_dot</span>(<span class="ident">self_s</span>, <span class="ident">rhs_s</span>);
}
}
<span class="kw">let</span> <span class="kw-2">mut</span> <span class="ident">sum</span> <span class="op">=</span> <span class="ident">A::zero</span>();
<span class="kw">for</span> <span class="ident">i</span> <span class="kw">in</span> <span class="number">0</span>..<span class="self">self</span>.<span class="ident">len</span>() {
<span class="kw">unsafe</span> {
<span class="ident">sum</span> <span class="op">=</span> <span class="ident">sum</span>.<span class="ident">clone</span>() <span class="op">+</span> <span class="self">self</span>.<span class="ident">uget</span>(<span class="ident">i</span>).<span class="ident">clone</span>() <span class="op">*</span> <span class="ident">rhs</span>.<span class="ident">uget</span>(<span class="ident">i</span>).<span class="ident">clone</span>();
}
}
<span class="ident">sum</span>
}
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">not</span>(<span class="ident">feature</span><span class="op">=</span><span class="string">"blas"</span>))]</span>
<span class="kw">fn</span> <span class="ident">dot_impl</span><span class="op"><</span><span class="ident">S2</span><span class="op">></span>(<span class="kw-2">&</span><span class="self">self</span>, <span class="ident">rhs</span>: <span class="kw-2">&</span><span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S2</span>, <span class="ident">Ix1</span><span class="op">></span>) <span class="op">-</span><span class="op">></span> <span class="ident">A</span>
<span class="kw">where</span> <span class="ident">S2</span>: <span class="ident">Data</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">A</span>: <span class="ident">LinalgScalar</span>,
{
<span class="self">self</span>.<span class="ident">dot_generic</span>(<span class="ident">rhs</span>)
}
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">feature</span><span class="op">=</span><span class="string">"blas"</span>)]</span>
<span class="kw">fn</span> <span class="ident">dot_impl</span><span class="op"><</span><span class="ident">S2</span><span class="op">></span>(<span class="kw-2">&</span><span class="self">self</span>, <span class="ident">rhs</span>: <span class="kw-2">&</span><span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S2</span>, <span class="ident">Ix1</span><span class="op">></span>) <span class="op">-</span><span class="op">></span> <span class="ident">A</span>
<span class="kw">where</span> <span class="ident">S2</span>: <span class="ident">Data</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">A</span>: <span class="ident">LinalgScalar</span>,
{
<span class="comment">// Use only if the vector is large enough to be worth it</span>
<span class="kw">if</span> <span class="self">self</span>.<span class="ident">len</span>() <span class="op">></span><span class="op">=</span> <span class="ident">DOT_BLAS_CUTOFF</span> {
<span class="macro">debug_assert_eq!</span>(<span class="self">self</span>.<span class="ident">len</span>(), <span class="ident">rhs</span>.<span class="ident">len</span>());
<span class="macro">assert!</span>(<span class="self">self</span>.<span class="ident">len</span>() <span class="op">=</span><span class="op">=</span> <span class="ident">rhs</span>.<span class="ident">len</span>());
<span class="macro">macro_rules!</span> <span class="ident">dot</span> {
(<span class="macro-nonterminal">$</span><span class="macro-nonterminal">ty</span>:<span class="ident">ty</span>, <span class="macro-nonterminal">$</span><span class="macro-nonterminal">func</span>:<span class="ident">ident</span>) <span class="op">=</span><span class="op">></span> {{
<span class="kw">if</span> <span class="ident">blas_compat_1d</span>::<span class="op"><</span><span class="macro-nonterminal">$</span><span class="macro-nonterminal">ty</span>, <span class="kw">_</span><span class="op">></span>(<span class="self">self</span>) <span class="op">&&</span> <span class="ident">blas_compat_1d</span>::<span class="op"><</span><span class="macro-nonterminal">$</span><span class="macro-nonterminal">ty</span>, <span class="kw">_</span><span class="op">></span>(<span class="ident">rhs</span>) {
<span class="kw">unsafe</span> {
<span class="kw">let</span> (<span class="ident">lhs_ptr</span>, <span class="ident">n</span>, <span class="ident">incx</span>) <span class="op">=</span> <span class="ident">blas_1d_params</span>(<span class="self">self</span>.<span class="ident">ptr</span>,
<span class="self">self</span>.<span class="ident">len</span>(),
<span class="self">self</span>.<span class="ident">strides</span>()[<span class="number">0</span>]);
<span class="kw">let</span> (<span class="ident">rhs_ptr</span>, <span class="kw">_</span>, <span class="ident">incy</span>) <span class="op">=</span> <span class="ident">blas_1d_params</span>(<span class="ident">rhs</span>.<span class="ident">ptr</span>,
<span class="ident">rhs</span>.<span class="ident">len</span>(),
<span class="ident">rhs</span>.<span class="ident">strides</span>()[<span class="number">0</span>]);
<span class="kw">let</span> <span class="ident">ret</span> <span class="op">=</span> <span class="ident">blas_sys::c</span>::<span class="macro-nonterminal">$</span><span class="macro-nonterminal">func</span>(
<span class="ident">n</span>,
<span class="ident">lhs_ptr</span> <span class="kw">as</span> <span class="kw-2">*</span><span class="kw">const</span> <span class="macro-nonterminal">$</span><span class="macro-nonterminal">ty</span>,
<span class="ident">incx</span>,
<span class="ident">rhs_ptr</span> <span class="kw">as</span> <span class="kw-2">*</span><span class="kw">const</span> <span class="macro-nonterminal">$</span><span class="macro-nonterminal">ty</span>,
<span class="ident">incy</span>);
<span class="kw">return</span> <span class="ident">cast_as</span>::<span class="op"><</span><span class="macro-nonterminal">$</span><span class="macro-nonterminal">ty</span>, <span class="ident">A</span><span class="op">></span>(<span class="kw-2">&</span><span class="ident">ret</span>);
}
}
}}
}
<span class="macro">dot!</span>{<span class="ident">f32</span>, <span class="ident">cblas_sdot</span>};
<span class="macro">dot!</span>{<span class="ident">f64</span>, <span class="ident">cblas_ddot</span>};
}
<span class="self">self</span>.<span class="ident">dot_generic</span>(<span class="ident">rhs</span>)
}
}
<span class="doccomment">/// Return a pointer to the starting element in BLAS's view.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// BLAS wants a pointer to the element with lowest address,</span>
<span class="doccomment">/// which agrees with our pointer for non-negative strides, but</span>
<span class="doccomment">/// is at the opposite end for negative strides.</span>
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">feature</span><span class="op">=</span><span class="string">"blas"</span>)]</span>
<span class="kw">unsafe</span> <span class="kw">fn</span> <span class="ident">blas_1d_params</span><span class="op"><</span><span class="ident">A</span><span class="op">></span>(<span class="ident">ptr</span>: <span class="kw-2">*</span><span class="kw">const</span> <span class="ident">A</span>, <span class="ident">len</span>: <span class="ident">usize</span>, <span class="ident">stride</span>: <span class="ident">isize</span>)
<span class="op">-</span><span class="op">></span> (<span class="kw-2">*</span><span class="kw">const</span> <span class="ident">A</span>, <span class="ident">blas_index</span>, <span class="ident">blas_index</span>)
{
<span class="comment">// [x x x x]</span>
<span class="comment">// ^--ptr</span>
<span class="comment">// stride = -1</span>
<span class="comment">// ^--blas_ptr = ptr + (len - 1) * stride</span>
<span class="kw">if</span> <span class="ident">stride</span> <span class="op">></span><span class="op">=</span> <span class="number">0</span> <span class="op">|</span><span class="op">|</span> <span class="ident">len</span> <span class="op">=</span><span class="op">=</span> <span class="number">0</span> {
(<span class="ident">ptr</span>, <span class="ident">len</span> <span class="kw">as</span> <span class="ident">blas_index</span>, <span class="ident">stride</span> <span class="kw">as</span> <span class="ident">blas_index</span>)
} <span class="kw">else</span> {
<span class="kw">let</span> <span class="ident">ptr</span> <span class="op">=</span> <span class="ident">ptr</span>.<span class="ident">offset</span>((<span class="ident">len</span> <span class="op">-</span> <span class="number">1</span>) <span class="kw">as</span> <span class="ident">isize</span> <span class="op">*</span> <span class="ident">stride</span>);
(<span class="ident">ptr</span>, <span class="ident">len</span> <span class="kw">as</span> <span class="ident">blas_index</span>, <span class="ident">stride</span> <span class="kw">as</span> <span class="ident">blas_index</span>)
}
}
<span class="doccomment">/// Matrix Multiplication</span>
<span class="doccomment">///</span>
<span class="doccomment">/// For two-dimensional arrays, the dot method computes the matrix</span>
<span class="doccomment">/// multiplication.</span>
<span class="kw">pub</span> <span class="kw">trait</span> <span class="ident">Dot</span><span class="op"><</span><span class="ident">Rhs</span><span class="op">></span> {
<span class="doccomment">/// The result of the operation.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// For two-dimensional arrays: a rectangular array.</span>
<span class="kw">type</span> <span class="ident">Output</span>;
<span class="kw">fn</span> <span class="ident">dot</span>(<span class="kw-2">&</span><span class="self">self</span>, <span class="ident">rhs</span>: <span class="kw-2">&</span><span class="ident">Rhs</span>) <span class="op">-</span><span class="op">></span> <span class="self">Self</span><span class="ident">::Output</span>;
}
<span class="kw">impl</span><span class="op"><</span><span class="ident">A</span>, <span class="ident">S</span>, <span class="ident">S2</span><span class="op">></span> <span class="ident">Dot</span><span class="op"><</span><span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S2</span>, <span class="ident">Ix1</span><span class="op">></span><span class="op">></span> <span class="kw">for</span> <span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S</span>, <span class="ident">Ix1</span><span class="op">></span>
<span class="kw">where</span> <span class="ident">S</span>: <span class="ident">Data</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">S2</span>: <span class="ident">Data</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">A</span>: <span class="ident">LinalgScalar</span>,
{
<span class="kw">type</span> <span class="ident">Output</span> <span class="op">=</span> <span class="ident">A</span>;
<span class="doccomment">/// Compute the dot product of one-dimensional arrays.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// The dot product is a sum of the elementwise products (no conjugation</span>
<span class="doccomment">/// of complex operands, and thus not their inner product).</span>
<span class="doccomment">///</span>
<span class="doccomment">/// **Panics** if the arrays are not of the same length.<br></span>
<span class="doccomment">/// *Note:* If enabled, uses blas `dot` for elements of `f32, f64` when memory</span>
<span class="doccomment">/// layout allows.</span>
<span class="kw">fn</span> <span class="ident">dot</span>(<span class="kw-2">&</span><span class="self">self</span>, <span class="ident">rhs</span>: <span class="kw-2">&</span><span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S2</span>, <span class="ident">Ix1</span><span class="op">></span>) <span class="op">-</span><span class="op">></span> <span class="ident">A</span>
{
<span class="self">self</span>.<span class="ident">dot_impl</span>(<span class="ident">rhs</span>)
}
}
<span class="kw">impl</span><span class="op"><</span><span class="ident">A</span>, <span class="ident">S</span>, <span class="ident">S2</span><span class="op">></span> <span class="ident">Dot</span><span class="op"><</span><span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S2</span>, <span class="ident">Ix2</span><span class="op">></span><span class="op">></span> <span class="kw">for</span> <span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S</span>, <span class="ident">Ix1</span><span class="op">></span>
<span class="kw">where</span> <span class="ident">S</span>: <span class="ident">Data</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">S2</span>: <span class="ident">Data</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">A</span>: <span class="ident">LinalgScalar</span>,
{
<span class="kw">type</span> <span class="ident">Output</span> <span class="op">=</span> <span class="ident">Array</span><span class="op"><</span><span class="ident">A</span>, <span class="ident">Ix1</span><span class="op">></span>;
<span class="doccomment">/// Perform the matrix multiplication of the row vector `self` and</span>
<span class="doccomment">/// rectangular matrix `rhs`.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// The array shapes must agree in the way that</span>
<span class="doccomment">/// if `self` is *M*, then `rhs` is *M* × *N*.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// Return a result array with shape *N*.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// **Panics** if shapes are incompatible.</span>
<span class="kw">fn</span> <span class="ident">dot</span>(<span class="kw-2">&</span><span class="self">self</span>, <span class="ident">rhs</span>: <span class="kw-2">&</span><span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S2</span>, <span class="ident">Ix2</span><span class="op">></span>) <span class="op">-</span><span class="op">></span> <span class="ident">Array</span><span class="op"><</span><span class="ident">A</span>, <span class="ident">Ix1</span><span class="op">></span>
{
<span class="ident">rhs</span>.<span class="ident">t</span>().<span class="ident">dot</span>(<span class="self">self</span>)
}
}
<span class="kw">impl</span><span class="op"><</span><span class="ident">A</span>, <span class="ident">S</span><span class="op">></span> <span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S</span>, <span class="ident">Ix2</span><span class="op">></span>
<span class="kw">where</span> <span class="ident">S</span>: <span class="ident">Data</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
{
<span class="doccomment">/// Perform matrix multiplication of rectangular arrays `self` and `rhs`.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// `Rhs` may be either a one-dimensional or a two-dimensional array.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// If Rhs is two-dimensional, they array shapes must agree in the way that</span>
<span class="doccomment">/// if `self` is *M* × *N*, then `rhs` is *N* × *K*.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// Return a result array with shape *M* × *K*.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// **Panics** if shapes are incompatible.<br></span>
<span class="doccomment">/// *Note:* If enabled, uses blas `gemv/gemm` for elements of `f32, f64`</span>
<span class="doccomment">/// when memory layout allows. The default matrixmultiply backend</span>
<span class="doccomment">/// is otherwise used for `f32, f64` for all memory layouts.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// ```</span>
<span class="doccomment">/// use ndarray::arr2;</span>
<span class="doccomment">///</span>
<span class="doccomment">/// let a = arr2(&[[1., 2.],</span>
<span class="doccomment">/// [0., 1.]]);</span>
<span class="doccomment">/// let b = arr2(&[[1., 2.],</span>
<span class="doccomment">/// [2., 3.]]);</span>
<span class="doccomment">///</span>
<span class="doccomment">/// assert!(</span>
<span class="doccomment">/// a.dot(&b) == arr2(&[[5., 8.],</span>
<span class="doccomment">/// [2., 3.]])</span>
<span class="doccomment">/// );</span>
<span class="doccomment">/// ```</span>
<span class="kw">pub</span> <span class="kw">fn</span> <span class="ident">dot</span><span class="op"><</span><span class="ident">Rhs</span><span class="op">></span>(<span class="kw-2">&</span><span class="self">self</span>, <span class="ident">rhs</span>: <span class="kw-2">&</span><span class="ident">Rhs</span>) <span class="op">-</span><span class="op">></span> <span class="op"><</span><span class="self">Self</span> <span class="kw">as</span> <span class="ident">Dot</span><span class="op"><</span><span class="ident">Rhs</span><span class="op">></span><span class="op">></span><span class="ident">::Output</span>
<span class="kw">where</span> <span class="self">Self</span>: <span class="ident">Dot</span><span class="op"><</span><span class="ident">Rhs</span><span class="op">></span>
{
<span class="ident">Dot::dot</span>(<span class="self">self</span>, <span class="ident">rhs</span>)
}
}
<span class="kw">impl</span><span class="op"><</span><span class="ident">A</span>, <span class="ident">S</span>, <span class="ident">S2</span><span class="op">></span> <span class="ident">Dot</span><span class="op"><</span><span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S2</span>, <span class="ident">Ix2</span><span class="op">></span><span class="op">></span> <span class="kw">for</span> <span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S</span>, <span class="ident">Ix2</span><span class="op">></span>
<span class="kw">where</span> <span class="ident">S</span>: <span class="ident">Data</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">S2</span>: <span class="ident">Data</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">A</span>: <span class="ident">LinalgScalar</span>,
{
<span class="kw">type</span> <span class="ident">Output</span> <span class="op">=</span> <span class="ident">Array2</span><span class="op"><</span><span class="ident">A</span><span class="op">></span>;
<span class="kw">fn</span> <span class="ident">dot</span>(<span class="kw-2">&</span><span class="self">self</span>, <span class="ident">b</span>: <span class="kw-2">&</span><span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S2</span>, <span class="ident">Ix2</span><span class="op">></span>) <span class="op">-</span><span class="op">></span> <span class="ident">Array2</span><span class="op"><</span><span class="ident">A</span><span class="op">></span>
{
<span class="kw">let</span> <span class="ident">a</span> <span class="op">=</span> <span class="self">self</span>.<span class="ident">view</span>();
<span class="kw">let</span> <span class="ident">b</span> <span class="op">=</span> <span class="ident">b</span>.<span class="ident">view</span>();
<span class="kw">let</span> ((<span class="ident">m</span>, <span class="ident">k</span>), (<span class="ident">k2</span>, <span class="ident">n</span>)) <span class="op">=</span> (<span class="ident">a</span>.<span class="ident">dim</span>(), <span class="ident">b</span>.<span class="ident">dim</span>());
<span class="kw">if</span> <span class="ident">k</span> <span class="op">!</span><span class="op">=</span> <span class="ident">k2</span> <span class="op">|</span><span class="op">|</span> <span class="ident">m</span>.<span class="ident">checked_mul</span>(<span class="ident">n</span>).<span class="ident">is_none</span>() {
<span class="ident">dot_shape_error</span>(<span class="ident">m</span>, <span class="ident">k</span>, <span class="ident">k2</span>, <span class="ident">n</span>);
}
<span class="kw">let</span> <span class="ident">lhs_s0</span> <span class="op">=</span> <span class="ident">a</span>.<span class="ident">strides</span>()[<span class="number">0</span>];
<span class="kw">let</span> <span class="ident">rhs_s0</span> <span class="op">=</span> <span class="ident">b</span>.<span class="ident">strides</span>()[<span class="number">0</span>];
<span class="kw">let</span> <span class="ident">column_major</span> <span class="op">=</span> <span class="ident">lhs_s0</span> <span class="op">=</span><span class="op">=</span> <span class="number">1</span> <span class="op">&&</span> <span class="ident">rhs_s0</span> <span class="op">=</span><span class="op">=</span> <span class="number">1</span>;
<span class="comment">// A is Copy so this is safe</span>
<span class="kw">let</span> <span class="kw-2">mut</span> <span class="ident">v</span> <span class="op">=</span> <span class="ident">Vec::with_capacity</span>(<span class="ident">m</span> <span class="op">*</span> <span class="ident">n</span>);
<span class="kw">let</span> <span class="kw-2">mut</span> <span class="ident">c</span>;
<span class="kw">unsafe</span> {
<span class="ident">v</span>.<span class="ident">set_len</span>(<span class="ident">m</span> <span class="op">*</span> <span class="ident">n</span>);
<span class="ident">c</span> <span class="op">=</span> <span class="ident">Array::from_shape_vec_unchecked</span>((<span class="ident">m</span>, <span class="ident">n</span>).<span class="ident">set_f</span>(<span class="ident">column_major</span>), <span class="ident">v</span>);
}
<span class="ident">mat_mul_impl</span>(<span class="ident">A::one</span>(), <span class="kw-2">&</span><span class="ident">a</span>, <span class="kw-2">&</span><span class="ident">b</span>, <span class="ident">A::zero</span>(), <span class="kw-2">&</span><span class="kw-2">mut</span> <span class="ident">c</span>.<span class="ident">view_mut</span>());
<span class="ident">c</span>
}
}
<span class="attribute">#[<span class="ident">cold</span>]</span>
<span class="attribute">#[<span class="ident">inline</span>(<span class="ident">never</span>)]</span>
<span class="kw">fn</span> <span class="ident">dot_shape_error</span>(<span class="ident">m</span>: <span class="ident">usize</span>, <span class="ident">k</span>: <span class="ident">usize</span>, <span class="ident">k2</span>: <span class="ident">usize</span>, <span class="ident">n</span>: <span class="ident">usize</span>) <span class="op">-</span><span class="op">></span> <span class="op">!</span> {
<span class="kw">if</span> <span class="ident">m</span>.<span class="ident">checked_mul</span>(<span class="ident">n</span>).<span class="ident">is_none</span>() {
<span class="macro">panic!</span>(<span class="string">"ndarray: shape {} × {} overflows type range"</span>, <span class="ident">m</span>, <span class="ident">n</span>);
}
<span class="macro">panic!</span>(<span class="string">"ndarray: inputs {} × {} and {} × {} are not compatible for matrix multiplication"</span>,
<span class="ident">m</span>, <span class="ident">k</span>, <span class="ident">k2</span>, <span class="ident">n</span>);
}
<span class="attribute">#[<span class="ident">cold</span>]</span>
<span class="attribute">#[<span class="ident">inline</span>(<span class="ident">never</span>)]</span>
<span class="kw">fn</span> <span class="ident">general_dot_shape_error</span>(<span class="ident">m</span>: <span class="ident">usize</span>, <span class="ident">k</span>: <span class="ident">usize</span>, <span class="ident">k2</span>: <span class="ident">usize</span>, <span class="ident">n</span>: <span class="ident">usize</span>, <span class="ident">c1</span>: <span class="ident">usize</span>, <span class="ident">c2</span>: <span class="ident">usize</span>) <span class="op">-</span><span class="op">></span> <span class="op">!</span> {
<span class="macro">panic!</span>(<span class="string">"ndarray: inputs {} × {}, {} × {}, and output {} × {} are not compatible for matrix multiplication"</span>,
<span class="ident">m</span>, <span class="ident">k</span>, <span class="ident">k2</span>, <span class="ident">n</span>, <span class="ident">c1</span>, <span class="ident">c2</span>);
}
<span class="doccomment">/// Perform the matrix multiplication of the rectangular array `self` and</span>
<span class="doccomment">/// column vector `rhs`.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// The array shapes must agree in the way that</span>
<span class="doccomment">/// if `self` is *M* × *N*, then `rhs` is *N*.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// Return a result array with shape *M*.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// **Panics** if shapes are incompatible.</span>
<span class="kw">impl</span><span class="op"><</span><span class="ident">A</span>, <span class="ident">S</span>, <span class="ident">S2</span><span class="op">></span> <span class="ident">Dot</span><span class="op"><</span><span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S2</span>, <span class="ident">Ix1</span><span class="op">></span><span class="op">></span> <span class="kw">for</span> <span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S</span>, <span class="ident">Ix2</span><span class="op">></span>
<span class="kw">where</span> <span class="ident">S</span>: <span class="ident">Data</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">S2</span>: <span class="ident">Data</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">A</span>: <span class="ident">LinalgScalar</span>,
{
<span class="kw">type</span> <span class="ident">Output</span> <span class="op">=</span> <span class="ident">Array</span><span class="op"><</span><span class="ident">A</span>, <span class="ident">Ix1</span><span class="op">></span>;
<span class="kw">fn</span> <span class="ident">dot</span>(<span class="kw-2">&</span><span class="self">self</span>, <span class="ident">rhs</span>: <span class="kw-2">&</span><span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S2</span>, <span class="ident">Ix1</span><span class="op">></span>) <span class="op">-</span><span class="op">></span> <span class="ident">Array</span><span class="op"><</span><span class="ident">A</span>, <span class="ident">Ix1</span><span class="op">></span>
{
<span class="kw">let</span> ((<span class="ident">m</span>, <span class="ident">a</span>), <span class="ident">n</span>) <span class="op">=</span> (<span class="self">self</span>.<span class="ident">dim</span>(), <span class="ident">rhs</span>.<span class="ident">dim</span>());
<span class="kw">if</span> <span class="ident">a</span> <span class="op">!</span><span class="op">=</span> <span class="ident">n</span> {
<span class="ident">dot_shape_error</span>(<span class="ident">m</span>, <span class="ident">a</span>, <span class="ident">n</span>, <span class="number">1</span>);
}
<span class="comment">// Avoid initializing the memory in vec -- set it during iteration</span>
<span class="kw">unsafe</span> {
<span class="kw">let</span> <span class="kw-2">mut</span> <span class="ident">c</span> <span class="op">=</span> <span class="ident">Array::uninitialized</span>(<span class="ident">m</span>);
<span class="ident">general_mat_vec_mul</span>(<span class="ident">A::one</span>(), <span class="self">self</span>, <span class="ident">rhs</span>, <span class="ident">A::zero</span>(), <span class="kw-2">&</span><span class="kw-2">mut</span> <span class="ident">c</span>);
<span class="ident">c</span>
}
}
}
<span class="kw">impl</span><span class="op"><</span><span class="ident">A</span>, <span class="ident">S</span>, <span class="ident">D</span><span class="op">></span> <span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S</span>, <span class="ident">D</span><span class="op">></span>
<span class="kw">where</span> <span class="ident">S</span>: <span class="ident">Data</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">D</span>: <span class="ident">Dimension</span>,
{
<span class="doccomment">/// Perform the operation `self += alpha * rhs` efficiently, where</span>
<span class="doccomment">/// `alpha` is a scalar and `rhs` is another array. This operation is</span>
<span class="doccomment">/// also known as `axpy` in BLAS.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// If their shapes disagree, `rhs` is broadcast to the shape of `self`.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// **Panics** if broadcasting isn’t possible.</span>
<span class="kw">pub</span> <span class="kw">fn</span> <span class="ident">scaled_add</span><span class="op"><</span><span class="ident">S2</span>, <span class="ident">E</span><span class="op">></span>(<span class="kw-2">&</span><span class="kw-2">mut</span> <span class="self">self</span>, <span class="ident">alpha</span>: <span class="ident">A</span>, <span class="ident">rhs</span>: <span class="kw-2">&</span><span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S2</span>, <span class="ident">E</span><span class="op">></span>)
<span class="kw">where</span> <span class="ident">S</span>: <span class="ident">DataMut</span>,
<span class="ident">S2</span>: <span class="ident">Data</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">A</span>: <span class="ident">LinalgScalar</span>,
<span class="ident">E</span>: <span class="ident">Dimension</span>,
{
<span class="self">self</span>.<span class="ident">zip_mut_with</span>(<span class="ident">rhs</span>, <span class="kw">move</span> <span class="op">|</span><span class="ident">y</span>, <span class="kw-2">&</span><span class="ident">x</span><span class="op">|</span> <span class="kw-2">*</span><span class="ident">y</span> <span class="op">=</span> <span class="kw-2">*</span><span class="ident">y</span> <span class="op">+</span> (<span class="ident">alpha</span> <span class="op">*</span> <span class="ident">x</span>));
}
}
<span class="comment">// mat_mul_impl uses ArrayView arguments to send all array kinds into</span>
<span class="comment">// the same instantiated implementation.</span>
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">not</span>(<span class="ident">feature</span><span class="op">=</span><span class="string">"blas"</span>))]</span>
<span class="kw">use</span> <span class="self">self</span><span class="ident">::mat_mul_general</span> <span class="kw">as</span> <span class="ident">mat_mul_impl</span>;
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">feature</span><span class="op">=</span><span class="string">"blas"</span>)]</span>
<span class="kw">fn</span> <span class="ident">mat_mul_impl</span><span class="op"><</span><span class="ident">A</span><span class="op">></span>(<span class="ident">alpha</span>: <span class="ident">A</span>,
<span class="ident">lhs</span>: <span class="kw-2">&</span><span class="ident">ArrayView2</span><span class="op"><</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">rhs</span>: <span class="kw-2">&</span><span class="ident">ArrayView2</span><span class="op"><</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">beta</span>: <span class="ident">A</span>,
<span class="ident">c</span>: <span class="kw-2">&</span><span class="kw-2">mut</span> <span class="ident">ArrayViewMut2</span><span class="op"><</span><span class="ident">A</span><span class="op">></span>)
<span class="kw">where</span> <span class="ident">A</span>: <span class="ident">LinalgScalar</span>,
{
<span class="comment">// size cutoff for using BLAS</span>
<span class="kw">let</span> <span class="ident">cut</span> <span class="op">=</span> <span class="ident">GEMM_BLAS_CUTOFF</span>;
<span class="kw">let</span> ((<span class="kw-2">mut</span> <span class="ident">m</span>, <span class="ident">a</span>), (<span class="kw">_</span>, <span class="kw-2">mut</span> <span class="ident">n</span>)) <span class="op">=</span> (<span class="ident">lhs</span>.<span class="ident">dim</span>(), <span class="ident">rhs</span>.<span class="ident">dim</span>());
<span class="kw">if</span> <span class="op">!</span>(<span class="ident">m</span> <span class="op">></span> <span class="ident">cut</span> <span class="op">|</span><span class="op">|</span> <span class="ident">n</span> <span class="op">></span> <span class="ident">cut</span> <span class="op">|</span><span class="op">|</span> <span class="ident">a</span> <span class="op">></span> <span class="ident">cut</span>) <span class="op">|</span><span class="op">|</span>
<span class="op">!</span>(<span class="ident">same_type</span>::<span class="op"><</span><span class="ident">A</span>, <span class="ident">f32</span><span class="op">></span>() <span class="op">|</span><span class="op">|</span> <span class="ident">same_type</span>::<span class="op"><</span><span class="ident">A</span>, <span class="ident">f64</span><span class="op">></span>()) {
<span class="kw">return</span> <span class="ident">mat_mul_general</span>(<span class="ident">alpha</span>, <span class="ident">lhs</span>, <span class="ident">rhs</span>, <span class="ident">beta</span>, <span class="ident">c</span>);
}
{
<span class="comment">// Use `c` for c-order and `f` for an f-order matrix</span>
<span class="comment">// We can handle c * c, f * f generally and</span>
<span class="comment">// c * f and f * c if the `f` matrix is square.</span>
<span class="kw">let</span> <span class="kw-2">mut</span> <span class="ident">lhs_</span> <span class="op">=</span> <span class="ident">lhs</span>.<span class="ident">view</span>();
<span class="kw">let</span> <span class="kw-2">mut</span> <span class="ident">rhs_</span> <span class="op">=</span> <span class="ident">rhs</span>.<span class="ident">view</span>();
<span class="kw">let</span> <span class="kw-2">mut</span> <span class="ident">c_</span> <span class="op">=</span> <span class="ident">c</span>.<span class="ident">view_mut</span>();
<span class="kw">let</span> <span class="ident">lhs_s0</span> <span class="op">=</span> <span class="ident">lhs_</span>.<span class="ident">strides</span>()[<span class="number">0</span>];
<span class="kw">let</span> <span class="ident">rhs_s0</span> <span class="op">=</span> <span class="ident">rhs_</span>.<span class="ident">strides</span>()[<span class="number">0</span>];
<span class="kw">let</span> <span class="ident">both_f</span> <span class="op">=</span> <span class="ident">lhs_s0</span> <span class="op">=</span><span class="op">=</span> <span class="number">1</span> <span class="op">&&</span> <span class="ident">rhs_s0</span> <span class="op">=</span><span class="op">=</span> <span class="number">1</span>;
<span class="kw">let</span> <span class="kw-2">mut</span> <span class="ident">lhs_trans</span> <span class="op">=</span> <span class="ident">CblasNoTrans</span>;
<span class="kw">let</span> <span class="kw-2">mut</span> <span class="ident">rhs_trans</span> <span class="op">=</span> <span class="ident">CblasNoTrans</span>;
<span class="kw">if</span> <span class="ident">both_f</span> {
<span class="comment">// A^t B^t = C^t => B A = C</span>
<span class="kw">let</span> <span class="ident">lhs_t</span> <span class="op">=</span> <span class="ident">lhs_</span>.<span class="ident">reversed_axes</span>();
<span class="ident">lhs_</span> <span class="op">=</span> <span class="ident">rhs_</span>.<span class="ident">reversed_axes</span>();
<span class="ident">rhs_</span> <span class="op">=</span> <span class="ident">lhs_t</span>;
<span class="ident">c_</span> <span class="op">=</span> <span class="ident">c_</span>.<span class="ident">reversed_axes</span>();
<span class="ident">swap</span>(<span class="kw-2">&</span><span class="kw-2">mut</span> <span class="ident">m</span>, <span class="kw-2">&</span><span class="kw-2">mut</span> <span class="ident">n</span>);
} <span class="kw">else</span> <span class="kw">if</span> <span class="ident">lhs_s0</span> <span class="op">=</span><span class="op">=</span> <span class="number">1</span> <span class="op">&&</span> <span class="ident">m</span> <span class="op">=</span><span class="op">=</span> <span class="ident">a</span> {
<span class="ident">lhs_</span> <span class="op">=</span> <span class="ident">lhs_</span>.<span class="ident">reversed_axes</span>();
<span class="ident">lhs_trans</span> <span class="op">=</span> <span class="ident">CblasTrans</span>;
} <span class="kw">else</span> <span class="kw">if</span> <span class="ident">rhs_s0</span> <span class="op">=</span><span class="op">=</span> <span class="number">1</span> <span class="op">&&</span> <span class="ident">a</span> <span class="op">=</span><span class="op">=</span> <span class="ident">n</span> {
<span class="ident">rhs_</span> <span class="op">=</span> <span class="ident">rhs_</span>.<span class="ident">reversed_axes</span>();
<span class="ident">rhs_trans</span> <span class="op">=</span> <span class="ident">CblasTrans</span>;
}
<span class="macro">macro_rules!</span> <span class="ident">gemm</span> {
(<span class="macro-nonterminal">$</span><span class="macro-nonterminal">ty</span>:<span class="ident">ty</span>, <span class="macro-nonterminal">$</span><span class="macro-nonterminal">gemm</span>:<span class="ident">ident</span>) <span class="op">=</span><span class="op">></span> {
<span class="kw">if</span> <span class="ident">blas_row_major_2d</span>::<span class="op"><</span><span class="macro-nonterminal">$</span><span class="macro-nonterminal">ty</span>, <span class="kw">_</span><span class="op">></span>(<span class="kw-2">&</span><span class="ident">lhs_</span>)
<span class="op">&&</span> <span class="ident">blas_row_major_2d</span>::<span class="op"><</span><span class="macro-nonterminal">$</span><span class="macro-nonterminal">ty</span>, <span class="kw">_</span><span class="op">></span>(<span class="kw-2">&</span><span class="ident">rhs_</span>)
<span class="op">&&</span> <span class="ident">blas_row_major_2d</span>::<span class="op"><</span><span class="macro-nonterminal">$</span><span class="macro-nonterminal">ty</span>, <span class="kw">_</span><span class="op">></span>(<span class="kw-2">&</span><span class="ident">c_</span>)
{
<span class="kw">let</span> (<span class="ident">m</span>, <span class="ident">k</span>) <span class="op">=</span> <span class="kw">match</span> <span class="ident">lhs_trans</span> {
<span class="ident">CblasNoTrans</span> <span class="op">=</span><span class="op">></span> <span class="ident">lhs_</span>.<span class="ident">dim</span>(),
<span class="kw">_</span> <span class="op">=</span><span class="op">></span> {
<span class="kw">let</span> (<span class="ident">rows</span>, <span class="ident">cols</span>) <span class="op">=</span> <span class="ident">lhs_</span>.<span class="ident">dim</span>();
(<span class="ident">cols</span>, <span class="ident">rows</span>)
}
};
<span class="kw">let</span> <span class="ident">n</span> <span class="op">=</span> <span class="kw">match</span> <span class="ident">rhs_trans</span> {
<span class="ident">CblasNoTrans</span> <span class="op">=</span><span class="op">></span> <span class="ident">rhs_</span>.<span class="ident">raw_dim</span>()[<span class="number">1</span>],
<span class="kw">_</span> <span class="op">=</span><span class="op">></span> <span class="ident">rhs_</span>.<span class="ident">raw_dim</span>()[<span class="number">0</span>],
};
<span class="comment">// adjust strides, these may [1, 1] for column matrices</span>
<span class="kw">let</span> <span class="ident">lhs_stride</span> <span class="op">=</span> <span class="ident">cmp::max</span>(<span class="ident">lhs_</span>.<span class="ident">strides</span>()[<span class="number">0</span>] <span class="kw">as</span> <span class="ident">blas_index</span>, <span class="ident">k</span> <span class="kw">as</span> <span class="ident">blas_index</span>);
<span class="kw">let</span> <span class="ident">rhs_stride</span> <span class="op">=</span> <span class="ident">cmp::max</span>(<span class="ident">rhs_</span>.<span class="ident">strides</span>()[<span class="number">0</span>] <span class="kw">as</span> <span class="ident">blas_index</span>, <span class="ident">n</span> <span class="kw">as</span> <span class="ident">blas_index</span>);
<span class="kw">let</span> <span class="ident">c_stride</span> <span class="op">=</span> <span class="ident">cmp::max</span>(<span class="ident">c_</span>.<span class="ident">strides</span>()[<span class="number">0</span>] <span class="kw">as</span> <span class="ident">blas_index</span>, <span class="ident">n</span> <span class="kw">as</span> <span class="ident">blas_index</span>);
<span class="comment">// gemm is C ← αA^Op B^Op + βC</span>
<span class="comment">// Where Op is notrans/trans/conjtrans</span>
<span class="kw">unsafe</span> {
<span class="ident">blas_sys::c</span>::<span class="macro-nonterminal">$</span><span class="macro-nonterminal">gemm</span>(
<span class="ident">CblasRowMajor</span>,
<span class="ident">lhs_trans</span>,
<span class="ident">rhs_trans</span>,
<span class="ident">m</span> <span class="kw">as</span> <span class="ident">blas_index</span>, <span class="comment">// m, rows of Op(a)</span>
<span class="ident">n</span> <span class="kw">as</span> <span class="ident">blas_index</span>, <span class="comment">// n, cols of Op(b)</span>
<span class="ident">k</span> <span class="kw">as</span> <span class="ident">blas_index</span>, <span class="comment">// k, cols of Op(a)</span>
<span class="ident">cast_as</span>(<span class="kw-2">&</span><span class="ident">alpha</span>), <span class="comment">// alpha</span>
<span class="ident">lhs_</span>.<span class="ident">ptr</span> <span class="kw">as</span> <span class="kw-2">*</span><span class="kw">const</span> <span class="kw">_</span>, <span class="comment">// a</span>
<span class="ident">lhs_stride</span>, <span class="comment">// lda</span>
<span class="ident">rhs_</span>.<span class="ident">ptr</span> <span class="kw">as</span> <span class="kw-2">*</span><span class="kw">const</span> <span class="kw">_</span>, <span class="comment">// b</span>
<span class="ident">rhs_stride</span>, <span class="comment">// ldb</span>
<span class="ident">cast_as</span>(<span class="kw-2">&</span><span class="ident">beta</span>), <span class="comment">// beta</span>
<span class="ident">c_</span>.<span class="ident">ptr</span> <span class="kw">as</span> <span class="kw-2">*</span><span class="kw-2">mut</span> <span class="kw">_</span>, <span class="comment">// c</span>
<span class="ident">c_stride</span>, <span class="comment">// ldc</span>
);
}
<span class="kw">return</span>;
}
}
}
<span class="macro">gemm!</span>(<span class="ident">f32</span>, <span class="ident">cblas_sgemm</span>);
<span class="macro">gemm!</span>(<span class="ident">f64</span>, <span class="ident">cblas_dgemm</span>);
}
<span class="ident">mat_mul_general</span>(<span class="ident">alpha</span>, <span class="ident">lhs</span>, <span class="ident">rhs</span>, <span class="ident">beta</span>, <span class="ident">c</span>)
}
<span class="doccomment">/// C ← α A B + β C</span>
<span class="kw">fn</span> <span class="ident">mat_mul_general</span><span class="op"><</span><span class="ident">A</span><span class="op">></span>(<span class="ident">alpha</span>: <span class="ident">A</span>,
<span class="ident">lhs</span>: <span class="kw-2">&</span><span class="ident">ArrayView2</span><span class="op"><</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">rhs</span>: <span class="kw-2">&</span><span class="ident">ArrayView2</span><span class="op"><</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">beta</span>: <span class="ident">A</span>,
<span class="ident">c</span>: <span class="kw-2">&</span><span class="kw-2">mut</span> <span class="ident">ArrayViewMut2</span><span class="op"><</span><span class="ident">A</span><span class="op">></span>)
<span class="kw">where</span> <span class="ident">A</span>: <span class="ident">LinalgScalar</span>,
{
<span class="kw">let</span> ((<span class="ident">m</span>, <span class="ident">k</span>), (<span class="kw">_</span>, <span class="ident">n</span>)) <span class="op">=</span> (<span class="ident">lhs</span>.<span class="ident">dim</span>(), <span class="ident">rhs</span>.<span class="ident">dim</span>());
<span class="comment">// common parameters for gemm</span>
<span class="kw">let</span> <span class="ident">ap</span> <span class="op">=</span> <span class="ident">lhs</span>.<span class="ident">as_ptr</span>();
<span class="kw">let</span> <span class="ident">bp</span> <span class="op">=</span> <span class="ident">rhs</span>.<span class="ident">as_ptr</span>();
<span class="kw">let</span> <span class="ident">cp</span> <span class="op">=</span> <span class="ident">c</span>.<span class="ident">as_mut_ptr</span>();
<span class="kw">let</span> (<span class="ident">rsc</span>, <span class="ident">csc</span>) <span class="op">=</span> (<span class="ident">c</span>.<span class="ident">strides</span>()[<span class="number">0</span>], <span class="ident">c</span>.<span class="ident">strides</span>()[<span class="number">1</span>]);
<span class="kw">if</span> <span class="ident">same_type</span>::<span class="op"><</span><span class="ident">A</span>, <span class="ident">f32</span><span class="op">></span>() {
<span class="kw">unsafe</span> {
<span class="ident">::matrixmultiply::sgemm</span>(
<span class="ident">m</span>, <span class="ident">k</span>, <span class="ident">n</span>,
<span class="ident">cast_as</span>(<span class="kw-2">&</span><span class="ident">alpha</span>),
<span class="ident">ap</span> <span class="kw">as</span> <span class="kw-2">*</span><span class="kw">const</span> <span class="kw">_</span>,
<span class="ident">lhs</span>.<span class="ident">strides</span>()[<span class="number">0</span>],
<span class="ident">lhs</span>.<span class="ident">strides</span>()[<span class="number">1</span>],
<span class="ident">bp</span> <span class="kw">as</span> <span class="kw-2">*</span><span class="kw">const</span> <span class="kw">_</span>,
<span class="ident">rhs</span>.<span class="ident">strides</span>()[<span class="number">0</span>],
<span class="ident">rhs</span>.<span class="ident">strides</span>()[<span class="number">1</span>],
<span class="ident">cast_as</span>(<span class="kw-2">&</span><span class="ident">beta</span>),
<span class="ident">cp</span> <span class="kw">as</span> <span class="kw-2">*</span><span class="kw-2">mut</span> <span class="kw">_</span>,
<span class="ident">rsc</span>, <span class="ident">csc</span>
);
}
} <span class="kw">else</span> <span class="kw">if</span> <span class="ident">same_type</span>::<span class="op"><</span><span class="ident">A</span>, <span class="ident">f64</span><span class="op">></span>() {
<span class="kw">unsafe</span> {
<span class="ident">::matrixmultiply::dgemm</span>(
<span class="ident">m</span>, <span class="ident">k</span>, <span class="ident">n</span>,
<span class="ident">cast_as</span>(<span class="kw-2">&</span><span class="ident">alpha</span>),
<span class="ident">ap</span> <span class="kw">as</span> <span class="kw-2">*</span><span class="kw">const</span> <span class="kw">_</span>,
<span class="ident">lhs</span>.<span class="ident">strides</span>()[<span class="number">0</span>],
<span class="ident">lhs</span>.<span class="ident">strides</span>()[<span class="number">1</span>],
<span class="ident">bp</span> <span class="kw">as</span> <span class="kw-2">*</span><span class="kw">const</span> <span class="kw">_</span>,
<span class="ident">rhs</span>.<span class="ident">strides</span>()[<span class="number">0</span>],
<span class="ident">rhs</span>.<span class="ident">strides</span>()[<span class="number">1</span>],
<span class="ident">cast_as</span>(<span class="kw-2">&</span><span class="ident">beta</span>),
<span class="ident">cp</span> <span class="kw">as</span> <span class="kw-2">*</span><span class="kw-2">mut</span> <span class="kw">_</span>,
<span class="ident">rsc</span>, <span class="ident">csc</span>
);
}
} <span class="kw">else</span> {
<span class="comment">// It's a no-op if `c` has zero length.</span>
<span class="kw">if</span> <span class="ident">c</span>.<span class="ident">len</span>() <span class="op">=</span><span class="op">=</span> <span class="number">0</span> {
<span class="kw">return</span>;
}
<span class="comment">// initialize memory if beta is zero</span>
<span class="kw">if</span> <span class="ident">beta</span>.<span class="ident">is_zero</span>() {
<span class="ident">c</span>.<span class="ident">fill</span>(<span class="ident">beta</span>);
}
<span class="kw">let</span> <span class="kw-2">mut</span> <span class="ident">i</span> <span class="op">=</span> <span class="number">0</span>;
<span class="kw">let</span> <span class="kw-2">mut</span> <span class="ident">j</span> <span class="op">=</span> <span class="number">0</span>;
<span class="kw">loop</span> {
<span class="kw">unsafe</span> {
<span class="kw">let</span> <span class="ident">elt</span> <span class="op">=</span> <span class="ident">c</span>.<span class="ident">uget_mut</span>((<span class="ident">i</span>, <span class="ident">j</span>));
<span class="kw-2">*</span><span class="ident">elt</span> <span class="op">=</span> <span class="kw-2">*</span><span class="ident">elt</span> <span class="op">*</span> <span class="ident">beta</span> <span class="op">+</span> <span class="ident">alpha</span> <span class="op">*</span> (<span class="number">0</span>..<span class="ident">k</span>).<span class="ident">fold</span>(<span class="ident">A::zero</span>(),
<span class="kw">move</span> <span class="op">|</span><span class="ident">s</span>, <span class="ident">x</span><span class="op">|</span> <span class="ident">s</span> <span class="op">+</span> <span class="kw-2">*</span><span class="ident">lhs</span>.<span class="ident">uget</span>((<span class="ident">i</span>, <span class="ident">x</span>)) <span class="op">*</span> <span class="kw-2">*</span><span class="ident">rhs</span>.<span class="ident">uget</span>((<span class="ident">x</span>, <span class="ident">j</span>)));
}
<span class="ident">j</span> <span class="op">+</span><span class="op">=</span> <span class="number">1</span>;
<span class="kw">if</span> <span class="ident">j</span> <span class="op">=</span><span class="op">=</span> <span class="ident">n</span> {
<span class="ident">j</span> <span class="op">=</span> <span class="number">0</span>;
<span class="ident">i</span> <span class="op">+</span><span class="op">=</span> <span class="number">1</span>;
<span class="kw">if</span> <span class="ident">i</span> <span class="op">=</span><span class="op">=</span> <span class="ident">m</span> {
<span class="kw">break</span>;
}
}
}
}
}
<span class="doccomment">/// General matrix-matrix multiplication.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// Compute C ← α A B + β C</span>
<span class="doccomment">///</span>
<span class="doccomment">/// The array shapes must agree in the way that</span>
<span class="doccomment">/// if `a` is *M* × *N*, then `b` is *N* × *K* and `c` is *M* × *K*.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// ***Panics*** if array shapes are not compatible<br></span>
<span class="doccomment">/// *Note:* If enabled, uses blas `gemm` for elements of `f32, f64` when memory</span>
<span class="doccomment">/// layout allows. The default matrixmultiply backend is otherwise used for</span>
<span class="doccomment">/// `f32, f64` for all memory layouts.</span>
<span class="kw">pub</span> <span class="kw">fn</span> <span class="ident">general_mat_mul</span><span class="op"><</span><span class="ident">A</span>, <span class="ident">S1</span>, <span class="ident">S2</span>, <span class="ident">S3</span><span class="op">></span>(<span class="ident">alpha</span>: <span class="ident">A</span>,
<span class="ident">a</span>: <span class="kw-2">&</span><span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S1</span>, <span class="ident">Ix2</span><span class="op">></span>,
<span class="ident">b</span>: <span class="kw-2">&</span><span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S2</span>, <span class="ident">Ix2</span><span class="op">></span>,
<span class="ident">beta</span>: <span class="ident">A</span>,
<span class="ident">c</span>: <span class="kw-2">&</span><span class="kw-2">mut</span> <span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S3</span>, <span class="ident">Ix2</span><span class="op">></span>)
<span class="kw">where</span> <span class="ident">S1</span>: <span class="ident">Data</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">S2</span>: <span class="ident">Data</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">S3</span>: <span class="ident">DataMut</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">A</span>: <span class="ident">LinalgScalar</span>,
{
<span class="kw">let</span> ((<span class="ident">m</span>, <span class="ident">k</span>), (<span class="ident">k2</span>, <span class="ident">n</span>)) <span class="op">=</span> (<span class="ident">a</span>.<span class="ident">dim</span>(), <span class="ident">b</span>.<span class="ident">dim</span>());
<span class="kw">let</span> (<span class="ident">m2</span>, <span class="ident">n2</span>) <span class="op">=</span> <span class="ident">c</span>.<span class="ident">dim</span>();
<span class="kw">if</span> <span class="ident">k</span> <span class="op">!</span><span class="op">=</span> <span class="ident">k2</span> <span class="op">|</span><span class="op">|</span> <span class="ident">m</span> <span class="op">!</span><span class="op">=</span> <span class="ident">m2</span> <span class="op">|</span><span class="op">|</span> <span class="ident">n</span> <span class="op">!</span><span class="op">=</span> <span class="ident">n2</span> {
<span class="ident">general_dot_shape_error</span>(<span class="ident">m</span>, <span class="ident">k</span>, <span class="ident">k2</span>, <span class="ident">n</span>, <span class="ident">m2</span>, <span class="ident">n2</span>);
} <span class="kw">else</span> {
<span class="ident">mat_mul_impl</span>(<span class="ident">alpha</span>, <span class="kw-2">&</span><span class="ident">a</span>.<span class="ident">view</span>(), <span class="kw-2">&</span><span class="ident">b</span>.<span class="ident">view</span>(), <span class="ident">beta</span>, <span class="kw-2">&</span><span class="kw-2">mut</span> <span class="ident">c</span>.<span class="ident">view_mut</span>());
}
}
<span class="doccomment">/// General matrix-vector multiplication.</span>
<span class="doccomment">///</span>
<span class="doccomment">/// Compute y ← α A x + β y</span>
<span class="doccomment">///</span>
<span class="doccomment">/// where A is a *M* × *N* matrix and x is an *N*-element column vector and</span>
<span class="doccomment">/// y an *M*-element column vector (one dimensional arrays).</span>
<span class="doccomment">///</span>
<span class="doccomment">/// ***Panics*** if array shapes are not compatible<br></span>
<span class="doccomment">/// *Note:* If enabled, uses blas `gemv` for elements of `f32, f64` when memory</span>
<span class="doccomment">/// layout allows.</span>
<span class="kw">pub</span> <span class="kw">fn</span> <span class="ident">general_mat_vec_mul</span><span class="op"><</span><span class="ident">A</span>, <span class="ident">S1</span>, <span class="ident">S2</span>, <span class="ident">S3</span><span class="op">></span>(<span class="ident">alpha</span>: <span class="ident">A</span>,
<span class="ident">a</span>: <span class="kw-2">&</span><span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S1</span>, <span class="ident">Ix2</span><span class="op">></span>,
<span class="ident">x</span>: <span class="kw-2">&</span><span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S2</span>, <span class="ident">Ix1</span><span class="op">></span>,
<span class="ident">beta</span>: <span class="ident">A</span>,
<span class="ident">y</span>: <span class="kw-2">&</span><span class="kw-2">mut</span> <span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S3</span>, <span class="ident">Ix1</span><span class="op">></span>)
<span class="kw">where</span> <span class="ident">S1</span>: <span class="ident">Data</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">S2</span>: <span class="ident">Data</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">S3</span>: <span class="ident">DataMut</span><span class="op"><</span><span class="ident">Elem</span><span class="op">=</span><span class="ident">A</span><span class="op">></span>,
<span class="ident">A</span>: <span class="ident">LinalgScalar</span>,
{
<span class="kw">let</span> ((<span class="ident">m</span>, <span class="ident">k</span>), <span class="ident">k2</span>) <span class="op">=</span> (<span class="ident">a</span>.<span class="ident">dim</span>(), <span class="ident">x</span>.<span class="ident">dim</span>());
<span class="kw">let</span> <span class="ident">m2</span> <span class="op">=</span> <span class="ident">y</span>.<span class="ident">dim</span>();
<span class="kw">if</span> <span class="ident">k</span> <span class="op">!</span><span class="op">=</span> <span class="ident">k2</span> <span class="op">|</span><span class="op">|</span> <span class="ident">m</span> <span class="op">!</span><span class="op">=</span> <span class="ident">m2</span> {
<span class="ident">general_dot_shape_error</span>(<span class="ident">m</span>, <span class="ident">k</span>, <span class="ident">k2</span>, <span class="number">1</span>, <span class="ident">m2</span>, <span class="number">1</span>);
} <span class="kw">else</span> {
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">feature</span> <span class="op">=</span> <span class="string">"blas"</span>)]</span>
<span class="macro">macro_rules!</span> <span class="ident">gemv</span> {
(<span class="macro-nonterminal">$</span><span class="macro-nonterminal">ty</span>:<span class="ident">ty</span>, <span class="macro-nonterminal">$</span><span class="macro-nonterminal">gemv</span>:<span class="ident">ident</span>) <span class="op">=</span><span class="op">></span> {
<span class="kw">if</span> <span class="ident">blas_row_major_2d</span>::<span class="op"><</span><span class="macro-nonterminal">$</span><span class="macro-nonterminal">ty</span>, <span class="kw">_</span><span class="op">></span>(<span class="kw-2">&</span><span class="ident">a</span>)
<span class="op">&&</span> <span class="ident">blas_compat_1d</span>::<span class="op"><</span><span class="macro-nonterminal">$</span><span class="macro-nonterminal">ty</span>, <span class="kw">_</span><span class="op">></span>(<span class="kw-2">&</span><span class="ident">x</span>)
<span class="op">&&</span> <span class="ident">blas_compat_1d</span>::<span class="op"><</span><span class="macro-nonterminal">$</span><span class="macro-nonterminal">ty</span>, <span class="kw">_</span><span class="op">></span>(<span class="kw-2">&</span><span class="ident">y</span>)
{
<span class="kw">let</span> <span class="kw-2">mut</span> <span class="ident">a_trans</span> <span class="op">=</span> <span class="ident">CblasNoTrans</span>;
<span class="kw">let</span> <span class="kw-2">mut</span> <span class="ident">a</span> <span class="op">=</span> <span class="ident">a</span>.<span class="ident">view</span>();
<span class="kw">let</span> <span class="ident">a_s0</span> <span class="op">=</span> <span class="ident">a</span>.<span class="ident">strides</span>()[<span class="number">0</span>];
<span class="kw">if</span> <span class="ident">a_s0</span> <span class="op">=</span><span class="op">=</span> <span class="number">1</span> <span class="op">&&</span> <span class="ident">m</span> <span class="op">=</span><span class="op">=</span> <span class="ident">k</span> {
<span class="ident">a</span> <span class="op">=</span> <span class="ident">a</span>.<span class="ident">reversed_axes</span>();
<span class="ident">a_trans</span> <span class="op">=</span> <span class="ident">CblasTrans</span>;
}
<span class="comment">// adjust strides, these may [1, 1] for column matrices</span>
<span class="kw">let</span> <span class="ident">a_stride</span> <span class="op">=</span> <span class="ident">cmp::max</span>(<span class="ident">a</span>.<span class="ident">strides</span>()[<span class="number">0</span>] <span class="kw">as</span> <span class="ident">blas_index</span>, <span class="ident">k</span> <span class="kw">as</span> <span class="ident">blas_index</span>);
<span class="kw">let</span> <span class="ident">x_stride</span> <span class="op">=</span> <span class="ident">x</span>.<span class="ident">strides</span>()[<span class="number">0</span>] <span class="kw">as</span> <span class="ident">blas_index</span>;
<span class="kw">let</span> <span class="ident">y_stride</span> <span class="op">=</span> <span class="ident">y</span>.<span class="ident">strides</span>()[<span class="number">0</span>] <span class="kw">as</span> <span class="ident">blas_index</span>;
<span class="kw">unsafe</span> {
<span class="ident">blas_sys::c</span>::<span class="macro-nonterminal">$</span><span class="macro-nonterminal">gemv</span>(
<span class="ident">CblasRowMajor</span>,
<span class="ident">a_trans</span>,
<span class="ident">m</span> <span class="kw">as</span> <span class="ident">blas_index</span>, <span class="comment">// m, rows of Op(a)</span>
<span class="ident">k</span> <span class="kw">as</span> <span class="ident">blas_index</span>, <span class="comment">// n, cols of Op(a)</span>
<span class="ident">cast_as</span>(<span class="kw-2">&</span><span class="ident">alpha</span>), <span class="comment">// alpha</span>
<span class="ident">a</span>.<span class="ident">ptr</span> <span class="kw">as</span> <span class="kw-2">*</span><span class="kw">const</span> <span class="kw">_</span>, <span class="comment">// a</span>
<span class="ident">a_stride</span>, <span class="comment">// lda</span>
<span class="ident">x</span>.<span class="ident">ptr</span> <span class="kw">as</span> <span class="kw-2">*</span><span class="kw">const</span> <span class="kw">_</span>, <span class="comment">// x</span>
<span class="ident">x_stride</span>,
<span class="ident">cast_as</span>(<span class="kw-2">&</span><span class="ident">beta</span>), <span class="comment">// beta</span>
<span class="ident">y</span>.<span class="ident">ptr</span> <span class="kw">as</span> <span class="kw-2">*</span><span class="kw-2">mut</span> <span class="kw">_</span>, <span class="comment">// x</span>
<span class="ident">y_stride</span>,
);
}
<span class="kw">return</span>;
}
}
}
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">feature</span> <span class="op">=</span> <span class="string">"blas"</span>)]</span>
<span class="macro">gemv!</span>(<span class="ident">f32</span>, <span class="ident">cblas_sgemv</span>);
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">feature</span> <span class="op">=</span> <span class="string">"blas"</span>)]</span>
<span class="macro">gemv!</span>(<span class="ident">f64</span>, <span class="ident">cblas_dgemv</span>);
<span class="comment">/* general */</span>
<span class="kw">if</span> <span class="ident">beta</span>.<span class="ident">is_zero</span>() {
<span class="ident">Zip::from</span>(<span class="ident">a</span>.<span class="ident">outer_iter</span>())
.<span class="ident">and</span>(<span class="ident">y</span>)
.<span class="ident">apply</span>(<span class="op">|</span><span class="ident">row</span>, <span class="ident">elt</span><span class="op">|</span> {
<span class="kw-2">*</span><span class="ident">elt</span> <span class="op">=</span> <span class="ident">row</span>.<span class="ident">dot</span>(<span class="ident">x</span>) <span class="op">*</span> <span class="ident">alpha</span>;
});
} <span class="kw">else</span> {
<span class="ident">Zip::from</span>(<span class="ident">a</span>.<span class="ident">outer_iter</span>())
.<span class="ident">and</span>(<span class="ident">y</span>)
.<span class="ident">apply</span>(<span class="op">|</span><span class="ident">row</span>, <span class="ident">elt</span><span class="op">|</span> {
<span class="kw-2">*</span><span class="ident">elt</span> <span class="op">=</span> <span class="kw-2">*</span><span class="ident">elt</span> <span class="op">*</span> <span class="ident">beta</span> <span class="op">+</span> <span class="ident">row</span>.<span class="ident">dot</span>(<span class="ident">x</span>) <span class="op">*</span> <span class="ident">alpha</span>;
});
}
}
}
<span class="attribute">#[<span class="ident">inline</span>(<span class="ident">always</span>)]</span>
<span class="doccomment">/// Return `true` if `A` and `B` are the same type</span>
<span class="kw">fn</span> <span class="ident">same_type</span><span class="op"><</span><span class="ident">A</span>: <span class="lifetime">'static</span>, <span class="ident">B</span>: <span class="lifetime">'static</span><span class="op">></span>() <span class="op">-</span><span class="op">></span> <span class="ident">bool</span> {
<span class="ident">TypeId::of</span>::<span class="op"><</span><span class="ident">A</span><span class="op">></span>() <span class="op">=</span><span class="op">=</span> <span class="ident">TypeId::of</span>::<span class="op"><</span><span class="ident">B</span><span class="op">></span>()
}
<span class="comment">// Read pointer to type `A` as type `B`.</span>
<span class="comment">//</span>
<span class="comment">// **Panics** if `A` and `B` are not the same type</span>
<span class="kw">fn</span> <span class="ident">cast_as</span><span class="op"><</span><span class="ident">A</span>: <span class="lifetime">'static</span> <span class="op">+</span> <span class="ident">Copy</span>, <span class="ident">B</span>: <span class="lifetime">'static</span> <span class="op">+</span> <span class="ident">Copy</span><span class="op">></span>(<span class="ident">a</span>: <span class="kw-2">&</span><span class="ident">A</span>) <span class="op">-</span><span class="op">></span> <span class="ident">B</span> {
<span class="macro">assert!</span>(<span class="ident">same_type</span>::<span class="op"><</span><span class="ident">A</span>, <span class="ident">B</span><span class="op">></span>());
<span class="kw">unsafe</span> {
<span class="ident">::std::ptr::read</span>(<span class="ident">a</span> <span class="kw">as</span> <span class="kw-2">*</span><span class="kw">const</span> <span class="kw">_</span> <span class="kw">as</span> <span class="kw-2">*</span><span class="kw">const</span> <span class="ident">B</span>)
}
}
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">feature</span><span class="op">=</span><span class="string">"blas"</span>)]</span>
<span class="kw">fn</span> <span class="ident">blas_compat_1d</span><span class="op"><</span><span class="ident">A</span>, <span class="ident">S</span><span class="op">></span>(<span class="ident">a</span>: <span class="kw-2">&</span><span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S</span>, <span class="ident">Ix1</span><span class="op">></span>) <span class="op">-</span><span class="op">></span> <span class="ident">bool</span>
<span class="kw">where</span> <span class="ident">S</span>: <span class="ident">Data</span>,
<span class="ident">A</span>: <span class="lifetime">'static</span>,
<span class="ident">S::Elem</span>: <span class="lifetime">'static</span>,
{
<span class="kw">if</span> <span class="op">!</span><span class="ident">same_type</span>::<span class="op"><</span><span class="ident">A</span>, <span class="ident">S::Elem</span><span class="op">></span>() {
<span class="kw">return</span> <span class="bool-val">false</span>;
}
<span class="kw">if</span> <span class="ident">a</span>.<span class="ident">len</span>() <span class="op">></span> <span class="ident">blas_index::max_value</span>() <span class="kw">as</span> <span class="ident">usize</span> {
<span class="kw">return</span> <span class="bool-val">false</span>;
}
<span class="kw">let</span> <span class="ident">stride</span> <span class="op">=</span> <span class="ident">a</span>.<span class="ident">strides</span>()[<span class="number">0</span>];
<span class="kw">if</span> <span class="ident">stride</span> <span class="op">></span> <span class="ident">blas_index::max_value</span>() <span class="kw">as</span> <span class="ident">isize</span> <span class="op">|</span><span class="op">|</span>
<span class="ident">stride</span> <span class="op"><</span> <span class="ident">blas_index::min_value</span>() <span class="kw">as</span> <span class="ident">isize</span> {
<span class="kw">return</span> <span class="bool-val">false</span>;
}
<span class="bool-val">true</span>
}
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">feature</span><span class="op">=</span><span class="string">"blas"</span>)]</span>
<span class="kw">fn</span> <span class="ident">blas_row_major_2d</span><span class="op"><</span><span class="ident">A</span>, <span class="ident">S</span><span class="op">></span>(<span class="ident">a</span>: <span class="kw-2">&</span><span class="ident">ArrayBase</span><span class="op"><</span><span class="ident">S</span>, <span class="ident">Ix2</span><span class="op">></span>) <span class="op">-</span><span class="op">></span> <span class="ident">bool</span>
<span class="kw">where</span> <span class="ident">S</span>: <span class="ident">Data</span>,
<span class="ident">A</span>: <span class="lifetime">'static</span>,
<span class="ident">S::Elem</span>: <span class="lifetime">'static</span>,
{
<span class="kw">if</span> <span class="op">!</span><span class="ident">same_type</span>::<span class="op"><</span><span class="ident">A</span>, <span class="ident">S::Elem</span><span class="op">></span>() {
<span class="kw">return</span> <span class="bool-val">false</span>;
}
<span class="kw">let</span> (<span class="ident">m</span>, <span class="ident">n</span>) <span class="op">=</span> <span class="ident">a</span>.<span class="ident">dim</span>();
<span class="kw">let</span> <span class="ident">s0</span> <span class="op">=</span> <span class="ident">a</span>.<span class="ident">strides</span>()[<span class="number">0</span>];
<span class="kw">let</span> <span class="ident">s1</span> <span class="op">=</span> <span class="ident">a</span>.<span class="ident">strides</span>()[<span class="number">1</span>];
<span class="kw">if</span> <span class="op">!</span>(<span class="ident">s1</span> <span class="op">=</span><span class="op">=</span> <span class="number">1</span> <span class="op">|</span><span class="op">|</span> <span class="ident">n</span> <span class="op">=</span><span class="op">=</span> <span class="number">1</span>) {
<span class="kw">return</span> <span class="bool-val">false</span>;
}
<span class="kw">if</span> <span class="ident">s0</span> <span class="op"><</span> <span class="number">1</span> <span class="op">|</span><span class="op">|</span> <span class="ident">s1</span> <span class="op"><</span> <span class="number">1</span> {
<span class="kw">return</span> <span class="bool-val">false</span>;
}
<span class="kw">if</span> (<span class="ident">s0</span> <span class="op">></span> <span class="ident">blas_index::max_value</span>() <span class="kw">as</span> <span class="ident">isize</span> <span class="op">|</span><span class="op">|</span> <span class="ident">s0</span> <span class="op"><</span> <span class="ident">blas_index::min_value</span>() <span class="kw">as</span> <span class="ident">isize</span>) <span class="op">|</span><span class="op">|</span>
(<span class="ident">s1</span> <span class="op">></span> <span class="ident">blas_index::max_value</span>() <span class="kw">as</span> <span class="ident">isize</span> <span class="op">|</span><span class="op">|</span> <span class="ident">s1</span> <span class="op"><</span> <span class="ident">blas_index::min_value</span>() <span class="kw">as</span> <span class="ident">isize</span>)
{
<span class="kw">return</span> <span class="bool-val">false</span>;
}
<span class="kw">if</span> <span class="ident">m</span> <span class="op">></span> <span class="ident">blas_index::max_value</span>() <span class="kw">as</span> <span class="ident">usize</span> <span class="op">|</span><span class="op">|</span>
<span class="ident">n</span> <span class="op">></span> <span class="ident">blas_index::max_value</span>() <span class="kw">as</span> <span class="ident">usize</span>
{
<span class="kw">return</span> <span class="bool-val">false</span>;
}
<span class="bool-val">true</span>
}
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">test</span>)]</span>
<span class="attribute">#[<span class="ident">cfg</span>(<span class="ident">feature</span><span class="op">=</span><span class="string">"blas"</span>)]</span>
<span class="kw">mod</span> <span class="ident">blas_tests</span> {
<span class="kw">use</span> <span class="kw">super</span>::<span class="kw-2">*</span>;
<span class="attribute">#[<span class="ident">test</span>]</span>
<span class="kw">fn</span> <span class="ident">blas_row_major_2d_normal_matrix</span>() {
<span class="kw">let</span> <span class="ident">m</span>: <span class="ident">Array2</span><span class="op"><</span><span class="ident">f32</span><span class="op">></span> <span class="op">=</span> <span class="ident">Array2::zeros</span>((<span class="number">3</span>, <span class="number">5</span>));
<span class="macro">assert!</span>(<span class="ident">blas_row_major_2d</span>::<span class="op"><</span><span class="ident">f32</span>, <span class="kw">_</span><span class="op">></span>(<span class="kw-2">&</span><span class="ident">m</span>));
}
<span class="attribute">#[<span class="ident">test</span>]</span>
<span class="kw">fn</span> <span class="ident">blas_row_major_2d_row_matrix</span>() {
<span class="kw">let</span> <span class="ident">m</span>: <span class="ident">Array2</span><span class="op"><</span><span class="ident">f32</span><span class="op">></span> <span class="op">=</span> <span class="ident">Array2::zeros</span>((<span class="number">1</span>, <span class="number">5</span>));
<span class="macro">assert!</span>(<span class="ident">blas_row_major_2d</span>::<span class="op"><</span><span class="ident">f32</span>, <span class="kw">_</span><span class="op">></span>(<span class="kw-2">&</span><span class="ident">m</span>));
}
<span class="attribute">#[<span class="ident">test</span>]</span>
<span class="kw">fn</span> <span class="ident">blas_row_major_2d_column_matrix</span>() {
<span class="kw">let</span> <span class="ident">m</span>: <span class="ident">Array2</span><span class="op"><</span><span class="ident">f32</span><span class="op">></span> <span class="op">=</span> <span class="ident">Array2::zeros</span>((<span class="number">5</span>, <span class="number">1</span>));
<span class="macro">assert!</span>(<span class="ident">blas_row_major_2d</span>::<span class="op"><</span><span class="ident">f32</span>, <span class="kw">_</span><span class="op">></span>(<span class="kw-2">&</span><span class="ident">m</span>));
}
<span class="attribute">#[<span class="ident">test</span>]</span>
<span class="kw">fn</span> <span class="ident">blas_row_major_2d_transposed_row_matrix</span>() {
<span class="kw">let</span> <span class="ident">m</span>: <span class="ident">Array2</span><span class="op"><</span><span class="ident">f32</span><span class="op">></span> <span class="op">=</span> <span class="ident">Array2::zeros</span>((<span class="number">1</span>, <span class="number">5</span>));
<span class="kw">let</span> <span class="ident">m_t</span> <span class="op">=</span> <span class="ident">m</span>.<span class="ident">t</span>();
<span class="macro">assert!</span>(<span class="ident">blas_row_major_2d</span>::<span class="op"><</span><span class="ident">f32</span>, <span class="kw">_</span><span class="op">></span>(<span class="kw-2">&</span><span class="ident">m_t</span>));
}
<span class="attribute">#[<span class="ident">test</span>]</span>
<span class="kw">fn</span> <span class="ident">blas_row_major_2d_transposed_column_matrix</span>() {
<span class="kw">let</span> <span class="ident">m</span>: <span class="ident">Array2</span><span class="op"><</span><span class="ident">f32</span><span class="op">></span> <span class="op">=</span> <span class="ident">Array2::zeros</span>((<span class="number">5</span>, <span class="number">1</span>));
<span class="kw">let</span> <span class="ident">m_t</span> <span class="op">=</span> <span class="ident">m</span>.<span class="ident">t</span>();
<span class="macro">assert!</span>(<span class="ident">blas_row_major_2d</span>::<span class="op"><</span><span class="ident">f32</span>, <span class="kw">_</span><span class="op">></span>(<span class="kw-2">&</span><span class="ident">m_t</span>));
}
}
</pre></div>
</section><section id="search" class="content hidden"></section><div id="rustdoc-vars" data-root-path="../../../" data-current-crate="ndarray" data-search-index-js="../../../search-index.js" data-search-js="../../../search.js"></div><script src="../../../main.js"></script><script src="../../../source-script.js"></script><script src="../../../source-files.js"></script></body></html>