projects
/
valse.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
R package can now be installed (compilation OK)
[valse.git]
/
src
/
sources
/
selectiontotale.h
diff --git
a/src/sources/selectiontotale.h
b/src/sources/selectiontotale.h
index
2d02da8
..
fa2ba84
100644
(file)
--- a/
src/sources/selectiontotale.h
+++ b/
src/sources/selectiontotale.h
@@
-1,33
+1,31
@@
-#ifndef select_selectiontotale_H
-#define select_selectiontotale_H
-
-#include "ioutils.h"
+#ifndef valse_selectiontotale_H
+#define valse_selectiontotale_H
// Main job on raw inputs (after transformation from mxArray)
// Main job on raw inputs (after transformation from mxArray)
-void selectiontotale(
- // IN parameters
- const
Real
* phiInit,
- const
Real
* rhoInit,
- const
Real
* piInit,
- const
Real
* gamInit,
-
I
nt mini,
-
I
nt maxi,
-
Real
gamma,
- const
Real
* glambda,
- const
Real
* X,
- const
Real
* Y,
-
Real
seuil,
-
Real
tau,
+void selectiontotale
_core
(
+ // IN parameters
+ const
double
* phiInit,
+ const
double
* rhoInit,
+ const
double
* piInit,
+ const
double
* gamInit,
+
i
nt mini,
+
i
nt maxi,
+
double
gamma,
+ const
double
* glambda,
+ const
double
* X,
+ const
double
* Y,
+
double
seuil,
+
double
tau,
// OUT parameters
// OUT parameters
-
I
nt* A1,
-
I
nt* A2,
-
Real
* Rho,
-
Real
* Pi,
+
i
nt* A1,
+
i
nt* A2,
+
double
* Rho,
+
double
* Pi,
// additional size parameters
// additional size parameters
- mwSize n,
-
mwSize
p,
-
mwSize
m,
-
mwSize
k,
-
mwSize
L);
-
+ int n,
+
int
p,
+
int
m,
+
int
k,
+
int
L);
+
#endif
#endif