Returning to previous version of moduleMesh.f90 #41
1 changed files with 2 additions and 2 deletions
|
|
@ -639,8 +639,8 @@ MODULE moduleMesh
|
|||
CLASS(meshCell), INTENT(inout):: self
|
||||
CLASS(particle), INTENT(inout), TARGET:: part
|
||||
CLASS(meshCell), OPTIONAL, INTENT(in):: oldCell
|
||||
REAL(8):: Xi(1:3) = 0.D0
|
||||
CLASS(meshElement), POINTER:: neighbourElement => NULL()
|
||||
REAL(8):: Xi(1:3)
|
||||
CLASS(meshElement), POINTER:: neighbourElement
|
||||
INTEGER:: sp
|
||||
|
||||
Xi = self%phy2log(part%r)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue