Add 'fast' argument to select C code or R code
[valse.git] / pkg / src / sources / EMGrank.h
CommitLineData
8e92c49c
BA
1#ifndef valse_EMGrank_H
2#define valse_EMGrank_H
1d3c1faa 3
9ff729fb
BA
4#include "utils.h"
5
09ab3c16 6void EMGrank_core(
1d3c1faa 7 // IN parameters
9ff729fb
BA
8 const Real* Pi,
9 const Real* Rho,
8e92c49c
BA
10 int mini,
11 int maxi,
9ff729fb
BA
12 const Real* X,
13 const Real* Y,
14 Real tau,
8e92c49c 15 const int* rank,
1d3c1faa 16 // OUT parameters
9ff729fb
BA
17 Real* phi,
18 Real* LLF,
1d3c1faa 19 // additional size parameters
8e92c49c
BA
20 int n,
21 int p,
22 int m,
23 int k);
1d3c1faa
BA
24
25#endif