00001 #include <Rinternals.h>
00002 #include <Rdefines.h>
00003
00004 SEXP Matrix_DimSym, Matrix_xSym, Matrix_uploSym, Matrix_diagSym,
00005 Matrix_pSym, Matrix_iSym, Matrix_zSym;
00006 char norm_type(char *typstr);
00007 char rcond_type(char *typstr);
00008 double get_double_by_name(SEXP obj, char *nm);
00009 SEXP set_double_by_name(SEXP obj, double val, char *nm);
00010 SEXP as_det_obj(double val, int log, int sign);
00011 SEXP get_factorization(SEXP obj, char *nm);
00012 SEXP set_factorization(SEXP obj, SEXP val, char *nm);
00013 SEXP cscMatrix_set_Dim(SEXP x, int nrow);