Final implementation of ionization process by electron impact.

Possibility to input initial species distributions (density, velocity
    and temperature) via an input file for each species.

New moduleRandom includes function to generate random numbers in
different ways (still uses) the implicit RANDOM_NUMBER().
This commit is contained in:
Jorge Gonzalez 2020-12-26 22:45:55 +01:00
commit 9e0d1a7cc7
16 changed files with 363 additions and 86 deletions

View file

@ -2,13 +2,11 @@
PROGRAM fpakc
USE moduleInput
USE moduleErrors
USE OMP_LIB
USE moduleInject
USE moduleSolver
USE moduleOutput
USE moduleCompTime
USE moduleCollisions
USE moduleMesh
USE moduleCaseParam
USE OMP_LIB
IMPLICIT NONE
! t = time step
@ -28,8 +26,17 @@ PROGRAM fpakc
!Reads the json configuration file
CALL readConfig(inputFile)
!$OMP PARALLEL DEFAULT(SHARED)
!$OMP SINGLE
CALL verboseError("Initial scatter of particles...")
!$OMP END SINGLE
CALL doScatter()
!$OMP SINGLE
CALL verboseError("Calculating initial EM field...")
!$OMP END SINGLE
CALL doEMField()
!$OMP END PARALLEL
tStep = omp_get_wtime() - tStep