The program reads the case but stops while doind the simulation

This commit is contained in:
Jorge Gonzalez 2026-02-26 14:25:47 +01:00
commit 31f0b510bc
5 changed files with 224 additions and 215 deletions

View file

@ -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