Some parallel issues
Forgot to check Gmsh2 format with new changes. Cartesian coordinates were not calculating things properly.
This commit is contained in:
parent
626e970d82
commit
5bc064d018
2 changed files with 3 additions and 2 deletions
|
|
@ -556,6 +556,7 @@ MODULE moduleMesh2DCart
|
|||
|
||||
!Compute element volume
|
||||
PURE SUBROUTINE volumeQuad(self)
|
||||
USE moduleRefParam, ONLY: L_ref
|
||||
IMPLICIT NONE
|
||||
|
||||
CLASS(meshCell2DCartQuad), INTENT(inout):: self
|
||||
|
|
@ -573,7 +574,7 @@ MODULE moduleMesh2DCart
|
|||
fPsi = self%fPsi(Xi, 4)
|
||||
|
||||
!Compute total volume of the cell
|
||||
self%volume = detJ*4.D0
|
||||
self%volume = detJ*4.D0/L_ref
|
||||
!Compute volume per node
|
||||
self%n1%v = self%n1%v + fPsi(1)*self%volume
|
||||
self%n2%v = self%n2%v + fPsi(2)*self%volume
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue