module.h

Go to the documentation of this file.

#if !defined(INC_OSKI_CSR_MODULE_H)

#define INC_OSKI_CSR_MODULE_H

#include <oski/matmodexport.h>

#if defined(DO_NAME_MANGLING)

#define oski_WrapCSR  MANGLE_MOD_(oski_WrapCSR)
#define oski_CheckCSR  MANGLE_MOD_(oski_CheckCSR)
#define oski_StreamMatRepr  MANGLE_MOD_(oski_StreamMatRepr)
#define oski_SortIndices  MANGLE_MOD_(oski_SortIndices)
#define oski_ExpandCSRToFull  MANGLE_MOD_(oski_ExpandCSRToFull)
#define oski_ConditionallyExpandCSRToFull  \
    MANGLE_MOD_(oski_ConditionallyExpandCSRToFull)
#define oski_ChangeIndexBase  MANGLE_MOD_(oski_ChangeIndexBase)
#define oski_TransposeCSR  MANGLE_MOD_(oski_TransposeCSR)
#define oski_CountZeroRowsCSR  MANGLE_MOD_(oski_CountZeroRowsCSR)

#endif

int oski_CheckCSR (const oski_index_t * ptr, const oski_index_t * ind,
           oski_index_t m, oski_index_t n,
           oski_inmatpropset_t * props);

double oski_StreamMatRepr (const void *mat, const oski_matcommon_t * props);

oski_matCSR_t *oski_ExpandCSRToFull (const oski_matCSR_t * S,
                     const oski_matcommon_t * props);

int oski_ConditionallyExpandCSRToFull (const oski_matCSR_t * S,
                       const oski_matcommon_t * props,
                       oski_matCSR_t ** p_mat_full);

void oski_ChangeIndexBase (oski_matCSR_t * A,
               const oski_matcommon_t * props,
               const oski_index_t new_base);

int oski_SortIndices (oski_matCSR_t * A, oski_index_t m);

oski_matCSR_t *oski_TransposeCSR (const oski_matCSR_t * A,
                  const oski_matcommon_t * props);

oski_index_t oski_CountZeroRowsCSR (const oski_matCSR_t * A,
                    const oski_matcommon_t * props);


oski_matCSR_t *oski_WrapCSR (oski_matcommon_t * out_props,
                 oski_index_t * Aptr, oski_index_t * Aind,
                 oski_value_t * Aval, oski_index_t num_rows,
                 oski_index_t num_cols,
                 oski_inmatpropset_t * props,
                 oski_copymode_t mode);
#if defined(DO_NAME_MANGLING)

#define CSR_MatTrisolveLower MANGLE_(CSR_MatTrisolveLower)
#define CSR_MatTransTrisolveLower MANGLE_(CSR_MatTransTrisolveLower)
#define CSR_MatConjTrisolveLower MANGLE_(CSR_MatConjTrisolveLower)
#define CSR_MatConjTransTrisolveLower MANGLE_(CSR_MatConjTransTrisolveLower)
#define CSR_MatTrisolveUpper MANGLE_(CSR_MatTrisolveUpper)
#define CSR_MatTransTrisolveUpper MANGLE_(CSR_MatTransTrisolveUpper)
#define CSR_MatConjTrisolveUpper MANGLE_(CSR_MatConjTrisolveUpper)
#define CSR_MatConjTransTrisolveUpper MANGLE_(CSR_MatConjTransTrisolveUpper)

#endif

void CSR_MatTrisolveLower (oski_index_t m, oski_index_t indbase,
               int is_unit, int is_sorted,
               const oski_index_t * ptr, const oski_index_t * ind,
               const oski_value_t * val, oski_value_t alpha,
               oski_value_t * x, oski_index_t num_vecs,
               oski_index_t rowinc, oski_index_t colinc);

void CSR_MatConjTrisolveLower (oski_index_t m, oski_index_t indbase,
                   int is_unit, int is_sorted,
                   const oski_index_t * ptr,
                   const oski_index_t * ind,
                   const oski_value_t * val, oski_value_t alpha,
                   oski_value_t * x, oski_index_t num_vecs,
                   oski_index_t rowinc, oski_index_t colinc);

void CSR_MatTransTrisolveLower (oski_index_t m, oski_index_t indbase,
                int is_unit, int is_sorted,
                const oski_index_t * ptr,
                const oski_index_t * ind,
                const oski_value_t * val, oski_value_t alpha,
                oski_value_t * x, oski_index_t num_vecs,
                oski_index_t rowinc, oski_index_t colinc);

void CSR_MatConjTransTrisolveLower (oski_index_t m, oski_index_t indbase,
                    int is_unit, int is_sorted,
                    const oski_index_t * ptr,
                    const oski_index_t * ind,
                    const oski_value_t * val,
                    oski_value_t alpha, oski_value_t * x,
                    oski_index_t num_vecs,
                    oski_index_t rowinc, oski_index_t colinc);

void CSR_MatTrisolveUpper (oski_index_t m, oski_index_t indbase,
               int is_unit, int is_sorted,
               const oski_index_t * ptr, const oski_index_t * ind,
               const oski_value_t * val, oski_value_t alpha,
               oski_value_t * x, oski_index_t num_vecs,
               oski_index_t rowinc, oski_index_t colinc);

void CSR_MatTransTrisolveUpper (oski_index_t m, oski_index_t indbase,
                int is_unit, int is_sorted,
                const oski_index_t * ptr,
                const oski_index_t * ind,
                const oski_value_t * val, oski_value_t alpha,
                oski_value_t * x, oski_index_t num_vecs,
                oski_index_t rowinc, oski_index_t colinc);

void CSR_MatConjTrisolveUpper (oski_index_t m, oski_index_t indbase,
                   int is_unit, int is_sorted,
                   const oski_index_t * ptr,
                   const oski_index_t * ind,
                   const oski_value_t * val, oski_value_t alpha,
                   oski_value_t * x, oski_index_t num_vecs,
                   oski_index_t rowinc, oski_index_t colinc);

void CSR_MatConjTransTrisolveUpper (oski_index_t m, oski_index_t indbase,
                    int is_unit, int is_sorted,
                    const oski_index_t * ptr,
                    const oski_index_t * ind,
                    const oski_value_t * val,
                    oski_value_t alpha, oski_value_t * x,
                    oski_index_t num_vecs,
                    oski_index_t rowinc, oski_index_t colinc);
#endif

/* eof */

---