From b01c7c306be0ef4d8c544654c59dc41bc8ae6a3f Mon Sep 17 00:00:00 2001 From: Francois Coppens Date: Mon, 27 Feb 2023 12:04:04 +0100 Subject: [PATCH] Done with splitting doc. --- org/qmckl_sherman_morrison_woodbury.org | 24 +++++++++++------------- 1 file changed, 11 insertions(+), 13 deletions(-) diff --git a/org/qmckl_sherman_morrison_woodbury.org b/org/qmckl_sherman_morrison_woodbury.org index efe10fc..4ddd949 100644 --- a/org/qmckl_sherman_morrison_woodbury.org +++ b/org/qmckl_sherman_morrison_woodbury.org @@ -371,7 +371,7 @@ include situations where one wants to apply updates to a square submatrix of the full matrix. It takes advantage of memory aligned data and assumes no data dependencies inside the loops. The loops are fully vectorised whenever ~Dim~ is an integer -multiple of ~SIMD_LEGTH~. +multiple of ~SIMD_LENGTH~. #+begin_src c :tangle (eval c) :comments org qmckl_exit_code qmckl_sm_naive_hpc( const qmckl_context context, @@ -525,9 +525,9 @@ text=""" result = [] for Dim in <>: Dim=str(Dim) - result.append(text.replace("{Dim}",Dim) ) + result.append(text.replace("{Dim}",Dim)) -return '\n'.join(result) +return ''.join(result) #+end_src Python script that generated C switch cases that call individual kernel instances. @@ -541,14 +541,13 @@ case {Dim}: Updates_index, breakdown, Slater_inv, - determinant); -""" + determinant);""" result = [] for Dim in <>: Dim=str(Dim) - result.append(text.replace("{Dim}",Dim) ) + result.append(text.replace("{Dim}",Dim)) -return '\n'.join(result) +return ''.join(result) #+end_src #+begin_src c :tangle (eval c) :comments org :noweb yes @@ -1225,7 +1224,7 @@ for Dim in <>: Dim=str(Dim) result.append(text.replace("{Dim}",Dim) ) -return '\n'.join(result) +return ''.join(result) #+end_src #+NAME:slagel_splitting_switch-case_generator @@ -1244,14 +1243,13 @@ case {Dim}: { later, determinant); break; -} -""" +}""" result = [] for Dim in <>: Dim=str(Dim) result.append(text.replace("{Dim}",Dim) ) -return '\n'.join(result) +return ''.join(result) #+end_src #+begin_src c :tangle (eval c) :comments org :noweb yes @@ -1603,10 +1601,10 @@ qmckl_exit_code qmckl_sm_splitting ( double* determinant ); #+end_src -#+CALL: generate_c_header(table=qmckl_sm_splitting_args,rettyp=get_value("CRetType"),fname="qmckl_sm_splitting_hpc") +#+CALL: generate_private_c_header(table=qmckl_sm_splitting_args,rettyp=get_value("CRetType"),fname="qmckl_sm_splitting_hpc") #+RESULTS: -#+begin_src c :tangle (eval h_func) :comments org +#+begin_src c :tangle (eval h_private_func) :comments org qmckl_exit_code qmckl_sm_splitting_hpc ( const qmckl_context context, const uint64_t LDS,