mirror of
https://gitlab.com/scemama/QCaml.git
synced 2024-11-18 12:03:40 +01:00
Modifs for M1
This commit is contained in:
parent
44e99fe252
commit
9d3f1ef05a
@ -16,7 +16,7 @@
|
||||
util
|
||||
)
|
||||
(c_flags (:standard)
|
||||
-Ofast -march=native -fPIC
|
||||
-Ofast -mtune=native -fPIC
|
||||
)
|
||||
)
|
||||
|
||||
|
@ -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>
|
||||
|
@ -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>
|
||||
|
@ -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
|
||||
|
@ -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 *)
|
||||
|
Loading…
Reference in New Issue
Block a user