mirror of
https://github.com/TREX-CoE/qmckl.git
synced 2024-08-19 03:41:44 +02:00
73 lines
1.7 KiB
Org Mode
73 lines
1.7 KiB
Org Mode
#+TITLE: Sherman-Morrison-Woodbury
|
|
#+SETUPFILE: ../tools/theme.setup
|
|
#+INCLUDE: ../tools/lib.org
|
|
|
|
[TODO: FMJC] Please add some intro.
|
|
|
|
* Headers
|
|
#+begin_src elisp :noexport :results none
|
|
(org-babel-lob-ingest "../tools/lib.org")
|
|
#+end_src
|
|
|
|
#+begin_src c :comments link :tangle (eval c_test) :noweb yes
|
|
#include "qmckl.h"
|
|
#include "assert.h"
|
|
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
int main() {
|
|
qmckl_context context;
|
|
context = qmckl_context_create();
|
|
|
|
#+end_src
|
|
|
|
* Sherman Morrison
|
|
|
|
[TODO: FMJC] Add general doc for Naive SM.
|
|
|
|
** ~qmckl_sherman_morrison~
|
|
:PROPERTIES:
|
|
:Name: qmckl_sherman_morrison
|
|
:CRetType: qmckl_exit_code
|
|
:FRetType: qmckl_exit_code
|
|
:END:
|
|
|
|
[TODO: FMJC] Add some detailed description. Including formulae etc.
|
|
|
|
#+NAME: qmckl_sherman_morrison_args
|
|
| qmckl_context | context | in | Global state |
|
|
|
|
*** Requirements
|
|
|
|
[TODO: FMJC] Add description of the input variables. (see for e.g. qmckl_distance.org)
|
|
|
|
*** C header
|
|
|
|
#+CALL: generate_c_header(table=qmckl_sherman_morrison_args,rettyp=get_value("CRetType"),fname=get_value("Name"))
|
|
|
|
*** Source
|
|
*** Performance
|
|
|
|
** C interface :noexport:
|
|
|
|
#+CALL: generate_c_interface(table=qmckl_sherman_morrison_args,rettyp=get_value("FRetType"),fname=get_value("Name"))
|
|
|
|
#+CALL: generate_f_interface(table=qmckl_sherman_morrison_args,rettyp=get_value("FRetType"),fname=get_value("Name"))
|
|
|
|
*** Test :noexport:
|
|
|
|
[TODO: FMJC] Write tests for the Sherman-Morrison part.
|
|
|
|
* End of files
|
|
|
|
#+begin_src c :comments link :tangle (eval c_test)
|
|
assert (qmckl_context_destroy(context) == QMCKL_SUCCESS);
|
|
return 0;
|
|
}
|
|
|
|
#+end_src
|
|
|
|
|
|
# -*- mode: org -*-
|
|
# vim: syntax=c
|