Fixed issue with some velocities. Still, at some point I need to rething all the injection thing.

2025-09-23 18:42:06 +02:00 · 2025-08-02 16:51:00 +02:00 · 2025-08-02 16:51:00 +02:00
commit d86c8480f3
1 changed files with 7 additions and 0 deletions
--- a/src/modules/moduleInject.f90
+++ b/src/modules/moduleInject.f90
@ -385,6 +385,13 @@ MODULE moduleInject
                                                   self%v(2)%obj%randomVel(), &
                                                   self%v(3)%obj%randomVel() /)

+          !If injecting a no-drift distribution and velocity is negative, reflect
+          if ((self%vMod == 0.D0) .and. &
+              (dot_product(direction, partInj(n)%v) < 0.D0)) then
+            partInj(n)%v = - partInj(n)%v
+
+          end if
+
          !Obtain natural coordinates of particle in cell
          partInj(n)%Xi = mesh%cells(partInj(n)%cell)%obj%phy2log(partInj(n)%r)
          !Push new particle with the minimum time step