Implementation of ionization process.

Now collisions can have a different time step.

Added species name to output names as it was starting to get confusing
in Gmsh for multiple species.

Output filenames adapted to match any number of iterations.

src/modules/moduleOutput.f90

@@ -22,6 +22,8 @@ MODULE moduleOutput
 
   CHARACTER(:), ALLOCATABLE:: path
   CHARACTER(:), ALLOCATABLE:: folder
+  INTEGER:: iterationDigits
+  CHARACTER(:), ALLOCATABLE:: iterationFormat
   INTEGER:: triggerOutput,  counterOutput  = 0
   INTEGER:: triggerCPUTime, counterCPUTime = 0
   LOGICAL:: timeOutput = .FALSE.
@@ -72,9 +74,6 @@ MODULE moduleOutput
       tempVol = 1.D0/(nodeVol*Vol_ref)
       IF (rawValues%den > 0.D0) THEN
         tempVel    =  rawValues%mom(:)/rawValues%den
-        IF ((tempVel(1) - 1.D0) .EQ. tempVel(1)) THEN
-          PRINT *, rawValues%mom
-        END IF
         tensorTemp = (rawValues%tensorS(:,:) - rawValues%den*outerProduct(tempVel,tempVel))
         formatValues%density     = rawValues%den*tempVol
         formatValues%velocity(:) = tempVel
@@ -106,7 +105,7 @@ MODULE moduleOutput
         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"
+            WRITE(20, "(A1, 8X, A1, 9X, A1, 6(A20))") "#","t","n","total","push","reset","collision","weighting","EMField"
             WRITE(*, "(6X,A15,A)") "Creating file: ", fileName
 
           ELSE
@@ -119,7 +118,7 @@ MODULE moduleOutput
 
         END IF
 
-        WRITE (20, "(I10, I10, 5(ES20.6E3))") t, nPartOld, tStep, tPush, tReset, tColl, tWeight
+        WRITE (20, "(I10, I10, 6(ES20.6E3))") t, nPartOld, tStep, tPush, tReset, tColl, tWeight, tEMField
 
         CLOSE(20)