X-Git-Url: https://git.auder.net/?a=blobdiff_plain;f=src%2Fsources%2FEMGrank.h;h=b7367d89214577924bfcf2ff9611c4f96b2a4d14;hb=9ff729fb6afff5bed327fa8619138fd3b6f6f13b;hp=53a1d0155cef8f6498c9883eb2145c2228e2e0d6;hpb=8e92c49c15bdacebf46190e7c8279bd227873928;p=valse.git

diff --git a/src/sources/EMGrank.h b/src/sources/EMGrank.h
index 53a1d01..b7367d8 100644
--- a/src/sources/EMGrank.h
+++ b/src/sources/EMGrank.h
@@ -1,19 +1,21 @@
 #ifndef valse_EMGrank_H
 #define valse_EMGrank_H
 
-void EMGrank(
+#include "utils.h"
+
+void EMGrank_core(
 	// IN parameters
-	const double* Pi,
-	const double* Rho,
+	const Real* Pi,
+	const Real* Rho,
 	int mini,
 	int maxi,
-	const double* X,
-	const double* Y,
-	double tau,
+	const Real* X,
+	const Real* Y,
+	Real tau,
 	const int* rank,
 	// OUT parameters
-	double* phi,
-	double* LLF,
+	Real* phi,
+	Real* LLF,
 	// additional size parameters
 	int n,
 	int p,