minor tweaks

2022-02-09 00:42:32 +01:00
parent c35c00e3da
commit 0934b49bc6
4 changed files with 14 additions and 11 deletions
--- a/BloubWorld/bloubspace.f90
+++ b/BloubWorld/bloubspace.f90
@@ -23,7 +23,7 @@ module bloubspace
  subroutine random_pv (blb)
    type(t_bloubs), intent (inout)  :: blb

-    blb%px = 2.0 * (rand() - 0.50)
+    blb%px = 1.3 * (rand() - 0.50)
    blb%py = rand() * 0.50
    blb%pz = 2.0 * (rand() - 0.50)