First commit of code.

New functionality:
- DSMC module:
  - 2D cyl geometry
    - GMSH file format
    - Elastic cross-section for Argon-Argon collisions.
    - Basic boundary conditions: reflection, absorption and axis
      symmetry.

Bugs fixed:

Other comments:
- Still searching for name.

src/modules/moduleOutput.f95

@@ -0,0 +1,118 @@
+!Contains information about output
+MODULE moduleOutput
+  IMPLICIT NONE
+  !Output for each node 
+  TYPE outputNode
+    REAL(8):: den, mom(1:3), tensorS(1:3,1:3)
+
+  END TYPE
+
+  !Output in dimensional units to print
+  TYPE outputFormat
+    REAL(8):: density, velocity(1:3), pressure, temperature
+
+  END TYPE
+
+  CHARACTER(:), ALLOCATABLE:: path
+  CHARACTER(:), ALLOCATABLE:: folder
+  INTEGER:: triggerOutput, counterOutput
+  LOGICAL:: timeOutput = .FALSE.
+  LOGICAL:: collOutput = .FALSE.
+
+  CONTAINS
+
+    FUNCTION outerProduct(a,b) RESULT(s)
+      IMPLICIT NONE
+
+      REAL(8), DIMENSION(1:3):: a, b
+      REAL(8):: s(1:3,1:3)
+
+      s = SPREAD(a, dim = 2, ncopies = 3)*SPREAD(b, dim = 1, ncopies = 3)
+
+    END FUNCTION outerProduct
+
+    FUNCTION tensorTrace(a) RESULT(t)
+      IMPLICIT NONE
+
+      REAL(8), DIMENSION(1:3,1:3):: a
+      REAL(8):: t
+
+      t = 0.D0
+      t = a(1,1)+a(2,2)+a(3,3)
+
+    END FUNCTION tensorTrace
+
+    SUBROUTINE calculateOutput(rawValues, formatValues, nodeVol, speciesIn)
+      USE moduleRefParam
+      USE moduleSpecies
+      IMPLICIT NONE
+
+      TYPE(outputNode),   INTENT(in)::  rawValues
+      TYPE(outputFormat), INTENT(out):: formatValues
+      REAL(8), INTENT(in):: nodeVol
+      CLASS(speciesGeneric), INTENT(in):: speciesIn
+      REAL(8), DIMENSION(1:3,1:3):: tensorTemp
+      REAL(8), DIMENSION(1:3):: tempVel
+      REAL(8):: tempVol
+
+      !Resets the node outputs
+      formatValues%density     = 0.D0
+      formatValues%velocity    = 0.D0
+      formatValues%pressure    = 0.D0
+      formatValues%temperature = 0.D0
+      tempVol = speciesIn%weight/(nodeVol*Vol_ref)
+      IF (rawValues%den > 0.D0) THEN
+        tempVel    =  rawValues%mom(:)/rawValues%den
+        tensorTemp = (rawValues%tensorS(:,:) - rawValues%den*outerProduct(tempVel,tempVel))
+        formatValues%density     = rawValues%den*tempVol
+        formatValues%velocity(:) = tempVel
+        IF (tensorTrace(tensorTemp) > 0.D0) THEN
+         formatValues%pressure    = speciesIn%m*tensorTrace(tensorTemp)*tempVol/3.D0
+         formatValues%temperature = formatValues%pressure/(formatValues%density*kb)
+
+        END IF
+      END IF
+
+      formatValues%velocity    = formatValues%velocity*v_ref
+      formatValues%pressure    = formatValues%pressure*m_ref*v_ref**2
+      formatValues%temperature = formatValues%temperature*m_ref*v_ref**2
+
+    END SUBROUTINE calculateOutput
+
+    SUBROUTINE printTime(t, first)
+      USE moduleSpecies
+      USE moduleCompTime
+      IMPLICIT NONE
+
+      INTEGER, INTENT(in):: t
+      LOGICAL, INTENT(in), OPTIONAL:: first
+      CHARACTER(:), ALLOCATABLE:: filename
+
+      filename = 'cpuTime.dat'
+
+      IF (timeOutput) THEN
+        IF (PRESENT(first)) THEN
+          IF (first) THEN
+            OPEN(20, file = path // folder // '/' // filename, action = 'write')
+            WRITE(20, "(A1, 8X, A1, 9X, A1, 5(A20))") "#","t","n","total","push","reset","collision","weighting"
+
+          ELSE
+
+          END IF
+            OPEN(20, file = path // folder // '/' // filename, position = 'append', action = 'write')
+
+        ELSE
+          OPEN(20, file = path // folder // '/' // filename, position = 'append', action = 'write')
+
+        END IF
+
+        WRITE (20, "(I10, I10, 5(ES20.6E3))") t, n_part_old, tStep, tPush, tReset, tColl, tWeight
+
+        CLOSE(20)
+
+      END IF
+
+    END SUBROUTINE
+
+END MODULE moduleOutput
+