prepare structure for R package

[valse.git] / src / sources / EMGLLF.h

diff --git a/src/sources/EMGLLF.h b/src/sources/EMGLLF.h
new file mode 100644 (file)
index 0000000..c75b89d
--- /dev/null
+++ b/src/sources/EMGLLF.h
@@ -0,0 +1,31 @@
+#ifndef select_EMGLLF_H
+#define select_EMGLLF_H
+
+#include "ioutils.h"
+
+void EMGLLF(
+       // IN parameters
+       const Real* phiInit,
+       const Real* rhoInit,
+       const Real* piInit,
+       const Real* gamInit,
+       Int mini,
+       Int maxi,
+       Real gamma,
+       Real lambda,
+       const Real* X,
+       const Real* Y,
+       Real tau,
+       // OUT parameters
+       Real* phi,
+       Real* rho,
+       Real* pi,
+       Real* LLF,
+       Real* S,
+       // additional size parameters
+       mwSize n, 
+       mwSize p, 
+       mwSize m, 
+       mwSize k);
+
+#endif