forceSymmetric.c File Reference

#include "Mdefines.h"
#include "M5.h"
#include "idz.h"

Go to the source code of this file.

Macros
#define	TEMPLATE(c)
#define	TEMPLATE(c)
#define	TEMPLATE(c)

Functions
SEXP	dense_force_symmetric (SEXP from, const char *class, char op_ul, char op_ct)
SEXP	sparse_force_symmetric (SEXP from, const char *class, char op_ul, char op_ct)
SEXP	R_dense_force_symmetric (SEXP s_from, SEXP s_uplo, SEXP s_trans)
SEXP	R_sparse_force_symmetric (SEXP s_from, SEXP s_uplo, SEXP s_trans)

Macro Definition Documentation

TEMPLATE [1/3]

#define TEMPLATE

(

c

)

Value:

        do { \
            c##TYPE *px0 = c##PTR(x0), *px1 = c##PTR(x1); \
            if (!packed) \
                c##NAME(force2)(px1,  px0, n_, ul0, ct0, nu0); \
            else if (ul0 == ul1) \
                c##NAME(force1)(px1,  px0, n_, ul0, ct0, nu0); \
            else { \
                c##NAME(trans1)(px1,  px0, n_, ul0, ct0); \
                c##NAME(force1)(px1, NULL, n_, ul1, ct0, nu0); \
            } \
        } while (0)

Referenced by dense_force_symmetric(), and sparse_force_symmetric().

TEMPLATE [2/3]

#define TEMPLATE

(

c

)

TEMPLATE [3/3]

#define TEMPLATE

(

c

)

Function Documentation

dense_force_symmetric()

SEXP dense_force_symmetric	(	SEXP	from,
		const char *	class,
		char	op_ul,
		char	op_ct )

Definition at line 7 of file forceSymmetric.c.

References _, cl, DIAG, DIM, DIMNAMES, GET_SLOT, Matrix_xSym, newObject(), SET_DIM, SET_DIMNAMES, SET_SLOT, SET_TRANS, SET_UPLO, SWITCH4, TEMPLATE, TRANS, TYPEOF, and UPLO.

Referenced by R_dense_force_symmetric().

R_dense_force_symmetric()

SEXP R_dense_force_symmetric	(	SEXP	s_from,
		SEXP	s_uplo,
		SEXP	s_trans )

Definition at line 401 of file forceSymmetric.c.

References dense_force_symmetric(), Matrix_class(), valid_dense, VALID_TRANS, and VALID_UPLO.

R_sparse_force_symmetric()

SEXP R_sparse_force_symmetric	(	SEXP	s_from,
		SEXP	s_uplo,
		SEXP	s_trans )

Definition at line 413 of file forceSymmetric.c.

References Matrix_class(), sparse_force_symmetric(), valid_sparse, VALID_TRANS, and VALID_UPLO.

sparse_force_symmetric()

SEXP sparse_force_symmetric	(	SEXP	from,
		const char *	class,
		char	op_ul,
		char	op_ct )

Definition at line 83 of file forceSymmetric.c.

References _, cl, DIAG, DIM, DIMNAMES, GET_SLOT, Matrix_iSym, Matrix_jSym, Matrix_pSym, Matrix_xSym, newObject(), SET_DIM, SET_DIMNAMES, SET_SLOT, SET_TRANS, SET_UPLO, SWITCH5, TEMPLATE, TRANS, UPLO, zASSIGN_CONJ, zASSIGN_IDEN, and zASSIGN_PROJ_REAL.

Referenced by R_sparse_force_symmetric(), sparse_cholesky(), and sparse_subscript_2ary().