SCM Repository
[matrix] Diff of /pkg/Matrix/src/Mutils.h
Diff of /pkg/Matrix/src/Mutils.h
Parent Directory
|
Revision Log
|
Patch
65 |
enum CBLAS_UPLO uplo, enum CBLAS_DIAG diag); |
enum CBLAS_UPLO uplo, enum CBLAS_DIAG diag); |
66 |
double *packed_getDiag(double *dest, SEXP x); |
double *packed_getDiag(double *dest, SEXP x); |
67 |
|
|
68 |
|
|
69 |
extern /* stored pointers to symbols initialized in R_init_Matrix */ |
extern /* stored pointers to symbols initialized in R_init_Matrix */ |
70 |
#include "Syms.h" |
#include "Syms.h" |
71 |
|
|
75 |
/* number of elements in one triangle of a square matrix of order n */ |
/* number of elements in one triangle of a square matrix of order n */ |
76 |
#define PACKED_LENGTH(n) ((n) * ((n) + 1))/2 |
#define PACKED_LENGTH(n) ((n) * ((n) + 1))/2 |
77 |
|
|
78 |
|
/* duplicate the slot with name given by sym from src to dest */ |
79 |
|
#define slot_dup(dest, src, sym) SET_SLOT(dest, sym, duplicate(GET_SLOT(src, sym))) |
80 |
|
|
81 |
/** |
/** |
82 |
* Check for valid length of a packed triangular array and return the |
* Check for valid length of a packed triangular array and return the |
83 |
* corresponding number of columns |
* corresponding number of columns |
241 |
|
|
242 |
void make_array_triangular(double *x, SEXP from); |
void make_array_triangular(double *x, SEXP from); |
243 |
|
|
244 |
|
SEXP Matrix_expand_pointers(SEXP pP); |
245 |
|
|
246 |
#ifdef __cplusplus |
#ifdef __cplusplus |
247 |
} |
} |
248 |
#endif |
#endif |
|
Legend:
Removed from v.679 |
|
changed lines |
|
Added in v.738 |
|
|