JGonzalez/fpakc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Merge branch 'issue/findCell' into 'development'

Browse source 
Returning to previous version of moduleMesh.f90

See merge request JorgeGonz/fpakc!41
This commit is contained in:
Jorge Gonzalez 2023-02-10 17:54:49 +00:00
commit e51348ae41
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/modules/mesh/moduleMesh.f90
View file

@ -639,8 +639,8 @@ MODULE moduleMesh
CLASS(meshCell), INTENT(inout):: self CLASS(meshCell), INTENT(inout):: self
CLASS(particle), INTENT(inout), TARGET:: part CLASS(particle), INTENT(inout), TARGET:: part
CLASS(meshCell), OPTIONAL, INTENT(in):: oldCell CLASS(meshCell), OPTIONAL, INTENT(in):: oldCell
REAL(8):: Xi(1:3) = 0.D0 REAL(8):: Xi(1:3)
CLASS(meshElement), POINTER:: neighbourElement => NULL() CLASS(meshElement), POINTER:: neighbourElement
INTEGER:: sp INTEGER:: sp
Xi = self%phy2log(part%r) Xi = self%phy2log(part%r)