Fixed an issue in which the logical coordinates of the particle (xi)

were not being initialized and was causing particles to get stuck in
  the iteration loop.

src/modules/mesh/2DCyl/moduleMesh2DCyl.f90

@@ -274,28 +274,6 @@ MODULE moduleMesh2DCyl
 
     END SUBROUTINE initEdge2DCyl
 
-    !Random position in quadrilateral volume
-    FUNCTION randPosVolQuad(self) RESULT(r)
-      USE moduleRandom
-      IMPLICIT NONE
-
-      CLASS(meshVol2DCylQuad), INTENT(in):: self
-      REAL(8):: r(1:3)
-      REAL(8):: xii(1:3)
-      REAL(8), ALLOCATABLE:: fPsi(:)
-
-      xii(1) = random(-1.D0, 1.D0)
-      xii(2) = random(-1.D0, 1.D0)
-      xii(3) = 0.D0
-
-      fPsi = self%fPsi(xii)
-
-      r(1) = DOT_PRODUCT(fPsi, self%z)
-      r(2) = DOT_PRODUCT(fPsi, self%r)
-      r(3) = 0.D0
-
-    END FUNCTION randposVolQuad
-
     !Get nodes from edge
     PURE FUNCTION getNodes2DCyl(self) RESULT(n)
       IMPLICIT NONE
@@ -448,6 +426,7 @@ MODULE moduleMesh2DCyl
 
     END FUNCTION dPsiQuadXi2
 
+    !Partial derivative in global coordinates
     PURE SUBROUTINE partialDerQuad(self, dPsi, dz, dr)
       IMPLICIT NONE
 
@@ -462,6 +441,28 @@ MODULE moduleMesh2DCyl
 
     END SUBROUTINE partialDerQuad
 
+    !Random position in quadrilateral volume
+    FUNCTION randPosVolQuad(self) RESULT(r)
+      USE moduleRandom
+      IMPLICIT NONE
+
+      CLASS(meshVol2DCylQuad), INTENT(in):: self
+      REAL(8):: r(1:3)
+      REAL(8):: xii(1:3)
+      REAL(8), ALLOCATABLE:: fPsi(:)
+
+      xii(1) = random(-1.D0, 1.D0)
+      xii(2) = random(-1.D0, 1.D0)
+      xii(3) = 0.D0
+
+      fPsi = self%fPsi(xii)
+
+      r(1) = DOT_PRODUCT(fPsi, self%z)
+      r(2) = DOT_PRODUCT(fPsi, self%r)
+      r(3) = 0.D0
+
+    END FUNCTION randposVolQuad
+
     !Computes element local stiffness matrix
     PURE FUNCTION elemKQuad(self) RESULT(ke)
       USE moduleConstParam, ONLY: PI2