JGonzalez/fpakc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Input done

Browse source 
The input is done and testing.

WARNING: Velocity of secondary electrons is still a dummy one!
This commit is contained in:
Jorge Gonzalez 2023-07-17 22:48:52 +02:00
commit cc3e28e5e7
2 changed files with 27 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

11
src/modules/init/moduleInput.f90
View file

@ -806,7 +806,7 @@ MODULE moduleInput
REAL(8):: effTime
REAL(8):: eThreshold !Energy threshold
INTEGER:: speciesID
CHARACTER(:), ALLOCATABLE:: speciesName, crossSection
CHARACTER(:), ALLOCATABLE:: speciesName, crossSection, yield
LOGICAL:: found
INTEGER:: nTypes
@ -872,6 +872,15 @@ MODULE moduleInput
CALL initWallTemperature(boundary(i)%bTypes(s)%obj, Tw, cw)
CASE('secondaryEmission')
CALL config%get(object // '.yield', yield, found)
IF (.NOT. found) CALL criticalError("missing parameter 'yield' for secondary emission", 'readBoundary')
CALL config%get(object // '.electron', speciesName, found)
IF (.NOT. found) CALL criticalError("missing parameter 'electron' for secondary emission", 'readBoundary')
speciesID = speciesName2Index(speciesName)
CALL initSEE(boundary(i)%bTypes(s)%obj, yield, speciesID)
CASE('axis')
ALLOCATE(boundaryAxis:: boundary(i)%bTypes(s)%obj)