- func_f_def = func_f;
- func_fp_def = func_fp;
- func_fpi_def = func_fpi;
- func_fpip_def = func_fpip;
-}
-
-
-/*
- * NOTE for Reno: all functions consider the network
- * coeficient (alpha) equal to 1.
- */
-
-/*
- * For Vegas f: $\alpha_f d_f \log\left(x_f\right)$
- */
-double func_vegas_f(lmm_variable_t var, double x){
- return var->df * log(x);
-}
-
-/*
- * For Vegas fp: $\frac{\alpha D_f}{x}$
- */
-double func_vegas_fp(lmm_variable_t var, double x){
- //avoid a disaster value - c'est du bricolage mais ca marche
- if(x == 0) x = 10e-8;
- return var->df/x;
-}
-
-/*
- * For Vegas fpi: $\frac{\alpha D_f}{x}$
- */
-double func_vegas_fpi(lmm_variable_t var, double x){
- //avoid a disaster value - c'est du bricolage mais ca marche
- if(x == 0) x = 10e-8;
- return var->df/x;
-}
-
-/*
- * For Vegas fpip: $-\frac{\alpha D_f}{x^2}$
- */
-double func_vegas_fpip(lmm_variable_t var, double x){
- //avoid a disaster value - c'est du bricolage mais ca marche
- if(x == 0) x = 10e-8;
- return -( var->df/(x*x) ) ;
-}
+ lmm_element_t elem = NULL;
+ lmm_variable_t var = NULL;
+ xbt_swag_t elem_list = NULL;
+ int i;