Modification in boundary conditions:

- Now absorption scatte the particle  properties into the edge nodes.
  - New boundary condition 'transparent' subsitute old absorption.

src/modules/mesh/moduleMesh.f90

@@ -15,8 +15,9 @@ MODULE moduleMesh
     TYPE(outputNode), ALLOCATABLE:: output(:)
     TYPE(emNode):: emData
     CONTAINS
-      PROCEDURE(initNode_interface), DEFERRED, PASS:: init
-      PROCEDURE(getCoord_interface), DEFERRED, PASS:: getCoordinates
+      PROCEDURE(initNode_interface),    DEFERRED, PASS:: init
+      PROCEDURE(getCoord_interface),    DEFERRED, PASS:: getCoordinates
+      PROCEDURE,                                  PASS:: resetOutput
 
   END TYPE meshNode
 
@@ -146,7 +147,6 @@ MODULE moduleMesh
       PROCEDURE(inside_interface),      DEFERRED, NOPASS:: inside
       PROCEDURE(nextElement_interface), DEFERRED, PASS::   nextElement
       PROCEDURE,                                  PASS::   collision
-      PROCEDURE(resetOutput_interface), DEFERRED, PASS::   resetOutput
 
   END TYPE meshVol
 
@@ -215,18 +215,6 @@ MODULE moduleMesh
 
     END FUNCTION inside_interface
 
-    SUBROUTINE collision_interface(self)
-      IMPORT:: meshVol
-      CLASS(meshVol), INTENT(inout):: self
-
-    END SUBROUTINE collision_interface
-
-    PURE SUBROUTINE resetOutput_interface(self)
-      IMPORT:: meshVol
-      CLASS(meshVol), INTENT(inout):: self
-
-    END SUBROUTINE resetOutput_interface
-
   END INTERFACE
 
   !Containers for volumes in the mesh
@@ -309,6 +297,24 @@ MODULE moduleMesh
   CLASS(meshGeneric), ALLOCATABLE, TARGET:: mesh
 
   CONTAINS
+    !Reset the output of node
+    PURE SUBROUTINE resetOutput(self)
+      USE moduleSpecies
+      USE moduleOutput
+      IMPLICIT NONE
+
+      CLASS(meshNode), INTENT(inout):: self
+      INTEGER:: k
+
+      DO k = 1, nSpecies
+        self%output(k)%den     = 0.D0
+        self%output(k)%mom     = 0.D0
+        self%output(k)%tensorS = 0.D0
+
+      END DO
+
+    END SUBROUTINE resetOutput
+
     !Find next cell for particle
     RECURSIVE SUBROUTINE findCell(self, part, oldCell)
       USE moduleSpecies
@@ -422,9 +428,6 @@ MODULE moduleMesh
 
       self%totalWeight = 0.D0
 
-      !Reset output in nodes
-      CALL self%resetOutput()
-
       !Erase the list of particles inside the cell
       CALL self%listPart_in%erase()