File: matops.h

package info (click to toggle)
r-cran-rspectra 0.16-0-1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye, sid
  • size: 736 kB
  • sloc: cpp: 4,917; ansic: 256; makefile: 2
file content (26 lines) | stat: -rw-r--r-- 675 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
#ifndef MATOPS_H
#define MATOPS_H

#include <RMatOp.h>
#include <Rinternals.h>

enum MAT_TYPE {
    MATRIX = 0,
    SYM_MATRIX,
    DGEMATRIX,
    SYM_DGEMATRIX,
    DSYMATRIX,
    DGCMATRIX,
    SYM_DGCMATRIX,
    DGRMATRIX,
    SYM_DGRMATRIX,
    FUNCTION
};

MatProd*      get_mat_prod_op       (SEXP mat, int nrow, int ncol, SEXP extra_arg, int mat_type);
RealShift*    get_real_shift_op_sym (SEXP mat, int n,              SEXP extra_arg, int mat_type);
RealShift*    get_real_shift_op_gen (SEXP mat, int n,              SEXP extra_arg, int mat_type);
ComplexShift* get_complex_shift_op  (SEXP mat, int n,              SEXP extra_arg, int mat_type);


#endif // MATOPS_H