Skip to content

Commit

Permalink
clean comment
Browse files Browse the repository at this point in the history
  • Loading branch information
miguel-porto committed Jul 14, 2016
1 parent 5ae83b6 commit 07f1a22
Showing 1 changed file with 0 additions and 2 deletions.
2 changes: 0 additions & 2 deletions SiMRiv/src/simulate.c
Original file line number Diff line number Diff line change
Expand Up @@ -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");
Expand Down

0 comments on commit 07f1a22

Please sign in to comment.