The program reads the case but stops while doind the simulation
This commit is contained in:
parent
be9b7be280
commit
31f0b510bc
5 changed files with 224 additions and 215 deletions
|
|
@ -129,6 +129,7 @@ MODULE moduleSolver
|
|||
|
||||
SUBROUTINE initEM(self, EMType)
|
||||
USE moduleEM
|
||||
USE moduleErrors, only: criticalError
|
||||
IMPLICIT NONE
|
||||
|
||||
CLASS(solverGeneric), INTENT(inout):: self
|
||||
|
|
@ -141,6 +142,9 @@ MODULE moduleSolver
|
|||
CASE('ElectrostaticBoltzmann')
|
||||
self%solveEM => solveElecFieldBoltzmann
|
||||
|
||||
CASE DEFAULT
|
||||
CALL criticalError('EM Solver ' // EMType // ' not found', 'readSolver')
|
||||
|
||||
END SELECT
|
||||
|
||||
END SUBROUTINE initEM
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue