From 07f1a22f8014498fe5fe8493f4f8d0328966ab99 Mon Sep 17 00:00:00 2001
From: Miguel Porto <mpbertolo@gmail.com>
Date: Thu, 14 Jul 2016 23:24:49 +0100
Subject: [PATCH] clean comment

---
 SiMRiv/src/simulate.c | 2 --
 1 file changed, 2 deletions(-)

diff --git a/SiMRiv/src/simulate.c b/SiMRiv/src/simulate.c
index 4f77a91..dc264d8 100644
--- a/SiMRiv/src/simulate.c
+++ b/SiMRiv/src/simulate.c
@@ -131,8 +131,6 @@ SEXP _simulate_individuals(SEXP _individuals,SEXP _starting_positions,SEXP _time
 				computeEmpiricalResistancePDF(ind[i].curpos, resist, &tmpstate->pwind, tmpPDF);
 				if(tmpPDF[0]!=-1) {		// resistance is heterogeneous
 // multiply rotated base PDF by empirical PDF and compute cumulative PDF directly
-/*					for(j=1,tmpMultCDF[0]=1;j<ANGLERES;j++)
-						tmpMultCDF[j]=tmpMultCDF[j-1] + 1;*/
 					for(j=1, tmpMultCDF[0] = (unsigned long)(tmprotPDF[0] * tmpPDF[0] * MULTIPLIER); j<ANGLERES; j++)
 						tmpMultCDF[j] = tmpMultCDF[j-1] + (long)(tmprotPDF[j] * tmpPDF[j] * MULTIPLIER);
 //Rprintf("New\n");