Fix #6

DESCRIPTION

@@ -2,7 +2,7 @@ Package: RCSF
 Type: Package
 Title: Airborne LiDAR Filtering Method Based on Cloth Simulation
 Version: 1.0.0
-Date: 2018-08-24
+Date: 2018-10-24
 Authors@R: c(
     person("Jean-Romain", "Roussel", email = "[email protected]", role = c("aut", "cre", "cph")),
     person("Jianbo", "Qi", email = "[email protected]", role = c("aut", "cph")))
@@ -11,11 +11,10 @@ Description: Cloth Simulation Filter (CSF) is an airborne LiDAR (Light Detection
     between the cloth nodes and the corresponding LiDAR points, the locations of the cloth nodes can be
     determined to generate an approximation of the ground surface.
 Depends: R (>= 3.1.0)
-Suggests: lidR
+Suggests: testthat
 License: Apache License 2.0
 Encoding: UTF-8
 LazyData: true
 LinkingTo: Rcpp
 Imports: Rcpp
 RoxygenNote: 6.1.0
-Suggests: testthat

src/Cloth.h

@@ -42,7 +42,7 @@
 #include <math.h>
 #include <vector>
 #include <iostream>
-#include <omp.h>
+//#include <omp.h>
 #include <iostream>
 #include <sstream>
 #include <list>

src/Particle.h

@@ -83,7 +83,21 @@ class Particle {
         tmpDist            = MAX_INF;
     }
 
-    Particle() {}
+    Particle() :
+      movable(true),
+      mass(1),
+      acceleration(Vec3(0, 0, 0)),
+      accumulated_normal(Vec3(0, 0, 0)),
+      pos(Vec3(0, 0, 0)),
+      old_pos(Vec3(0, 0, 0)) {
+      isVisited          = false;
+      neibor_count       = 0;
+      pos_x              = 0;
+      pos_y              = 0;
+      c_pos              = 0;
+      nearestPointHeight = MIN_INF;
+      tmpDist            = MAX_INF;
+    }
 
     bool isMovable() {
         return movable;