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

Dummy velocity for testing

Browse source 
I have set the velocity of the particle to be a dummy Maxwellian
distribution to start testing things.

Also I added a constant yield table for testing.

Next step is to do the user input and run some tests.
This commit is contained in:
Jorge Gonzalez 2023-07-17 16:29:52 +02:00
commit 38fa37c995
2 changed files with 8 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
data/see/constant.dat Normal file
View file

@ -0,0 +1,4 @@
#Relative energy (eV) yield ()
0.000 1.000E-01
1.000 1.000E-01

5
src/modules/mesh/moduleMeshBoundary.f90
View file

@ -193,7 +193,7 @@ MODULE moduleMeshBoundary
END SELECT END SELECT
!Removes ionizing electron regardless the number of pair created !Removes ionizing electron regardless the number of pairs created
part%n_in = .FALSE. part%n_in = .FALSE.
END SUBROUTINE ionization END SUBROUTINE ionization
@ -214,6 +214,7 @@ MODULE moduleMeshBoundary
SUBROUTINE secondaryEmission(edge, part) SUBROUTINE secondaryEmission(edge, part)
USE moduleSpecies USE moduleSpecies
USE moduleRandom
IMPLICIT NONE IMPLICIT NONE
CLASS(meshEdge), INTENT(inout):: edge CLASS(meshEdge), INTENT(inout):: edge
@ -270,6 +271,7 @@ MODULE moduleMeshBoundary
secondaryElectron%n_in = .TRUE. secondaryElectron%n_in = .TRUE.
!Assign velocity !Assign velocity
secondaryElectron%v = 2.D0 * edge%normal + 1.D-1 * (/ randomMaxwellian(), randomMaxwellian(), randomMaxwellian() /)
!Add particle to list !Add particle to list
CALL partSurfaces%setLock() CALL partSurfaces%setLock()
@ -314,6 +316,7 @@ MODULE moduleMeshBoundary
TYPE IS(boundarySEE) TYPE IS(boundarySEE)
edge%fBoundary(s)%apply => secondaryEmission edge%fBoundary(s)%apply => secondaryEmission
CLASS DEFAULT CLASS DEFAULT
CALL criticalError("Boundary type not defined in this geometry", 'pointBoundaryFunction') CALL criticalError("Boundary type not defined in this geometry", 'pointBoundaryFunction')