Still working on it

No uniform density yet...
This commit is contained in:
Jorge Gonzalez 2024-07-06 10:12:03 +02:00
commit 6b5ac16e4b
2 changed files with 1 additions and 2 deletions

View file

@ -235,7 +235,6 @@ MODULE moduleMesh2DCyl
p1 = (/self%z(1), self%r(1) /)
p2 = (/self%z(2), self%r(2) /)
r(1:2) = (1.D0 - rnd)*p1 + rnd*p2
r(2) = (self%r(2) + self%r(1)) * 0.5D0
r(3) = 0.D0
END FUNCTION randPosEdge