Fixed an issue with normal vector not being norm unit, which was causing

reflected particle velocities to increase.
This commit is contained in:
Jorge Gonzalez 2021-03-11 12:56:15 +01:00
commit ff0c09242d
5 changed files with 6 additions and 0 deletions

View file

@ -146,6 +146,7 @@ MODULE moduleMesh1DRad
self%r = r1(1)
self%normal = (/ 1.D0, 0.D0, 0.D0 /)
self%normal = self%normal/NORM2(self%normal)
!Boundary index
self%boundary => boundary(bt)