Modifs for M1

This commit is contained in:
Anthony Scemama 2022-12-13 10:55:47 +01:00
parent 44e99fe252
commit 9d3f1ef05a
5 changed files with 15 additions and 11 deletions

View File

@ -16,7 +16,7 @@
util
)
(c_flags (:standard)
-Ofast -march=native -fPIC
-Ofast -mtune=native -fPIC
)
)

View File

@ -3,7 +3,7 @@
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="en" xml:lang="en">
<head>
<!-- 2021-10-19 Tue 16:20 -->
<!-- 2022-12-13 Tue 10:55 -->
<meta http-equiv="Content-Type" content="text/html;charset=utf-8" />
<meta name="viewport" content="width=device-width, initial-scale=1" />
<title>Linear Algebra</title>
@ -250,18 +250,18 @@ org_html_manager.setup(); // activate after the parameters are set
<h2>Table of Contents</h2>
<div id="text-table-of-contents">
<ul>
<li><a href="#org4e0185b">1. Summary</a></li>
<li><a href="#orgb899d84">1. Summary</a></li>
</ul>
</div>
</div>
<div id="outline-container-org4e0185b" class="outline-2">
<h2 id="org4e0185b"><span class="section-number-2">1</span> Summary</h2>
<div id="outline-container-orgb899d84" class="outline-2">
<h2 id="orgb899d84"><span class="section-number-2">1</span> Summary</h2>
</div>
</div>
<div id="postamble" class="status">
<p class="author">Author: Anthony Scemama</p>
<p class="date">Created: 2021-10-19 Tue 16:20</p>
<p class="date">Created: 2022-12-13 Tue 10:55</p>
<p class="validation"><a href="https://validator.w3.org/check?uri=referer">Validate</a></p>
</div>
</body>

View File

@ -3,7 +3,7 @@
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="en" xml:lang="en">
<head>
<!-- 2022-12-12 Mon 18:12 -->
<!-- 2022-12-13 Tue 10:55 -->
<meta http-equiv="Content-Type" content="text/html;charset=utf-8" />
<meta name="viewport" content="width=device-width, initial-scale=1" />
<title>Top-level</title>
@ -250,18 +250,18 @@ org_html_manager.setup(); // activate after the parameters are set
<h2>Table of Contents</h2>
<div id="text-table-of-contents">
<ul>
<li><a href="#orgaff48c7">1. Summary</a></li>
<li><a href="#org4f42024">1. Summary</a></li>
</ul>
</div>
</div>
<div id="outline-container-orgaff48c7" class="outline-2">
<h2 id="orgaff48c7"><span class="section-number-2">1</span> Summary</h2>
<div id="outline-container-org4f42024" class="outline-2">
<h2 id="org4f42024"><span class="section-number-2">1</span> Summary</h2>
</div>
</div>
<div id="postamble" class="status">
<p class="author">Author: Anthony Scemama</p>
<p class="date">Created: 2022-12-12 Mon 18:12</p>
<p class="date">Created: 2022-12-13 Tue 10:55</p>
<p class="validation"><a href="https://validator.w3.org/check?uri=referer">Validate</a></p>
</div>
</body>

View File

@ -30,6 +30,7 @@ let sub_inplace ~c a b = ignore @@ Mat.sub ~c a b
let mul_inplace ~c a b = ignore @@ Mat.mul ~c a b
let div_inplace ~c a b = ignore @@ Mat.div ~c a b
(*
let add_const_diag_inplace x a =
Mat.add_const_diag x a
@ -38,6 +39,7 @@ let add_const_diag x a =
let add_const_inplace x a =
ignore @@ Mat.add_const x ~b:a a
*)
let add_const x a =
Mat.add_const x a

View File

@ -42,6 +42,7 @@ val diag: ('a,'a) t -> 'a Vector.t
val fill_inplace: ('a,'b) t -> float -> unit
(** Fills the matrix with the give value. *)
(*
val add_const_diag : float -> ('a,'b) t -> ('a,'b) t
(** Adds a constant to the diagonal *)
@ -50,6 +51,7 @@ val add_const_diag_inplace : float -> ('a,'b) t -> unit
val add_const_inplace : float -> ('a,'b) t -> unit
(** Adds a constant to the diagonal *)
*)
val add_const : float -> ('a,'b) t -> ('a,'b) t
(** Adds a constant to the diagonal *)