Skip to content

Commit 2d6408b

Browse files
committed
cleanup dead code
1 parent 8ea0a7c commit 2d6408b

1 file changed

Lines changed: 3 additions & 3 deletions

File tree

src/Solution/ParticleTracker/Method/MethodSubcellPollock.f90

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -63,7 +63,6 @@ subroutine apply_msp(this, particle, tmax)
6363
! local
6464
real(DP) :: x_origin
6565
real(DP) :: y_origin
66-
real(DP) :: z_origin
6766
real(DP) :: sinrot
6867
real(DP) :: cosrot
6968

@@ -72,10 +71,11 @@ subroutine apply_msp(this, particle, tmax)
7271
! Transform particle position into local subcell coordinates,
7372
! track particle across subcell, convert back to model coords
7473
! (sinrot and cosrot should be 0 and 1, respectively, i.e. no
75-
! rotation, also no z translation; only x and y translations)
74+
! rotation, also no z translation; only x and y translations,
75+
! since subcell%zOrigin is always 0 -- z is translated once,
76+
! at the cell level, not again here)
7677
x_origin = subcell%xOrigin
7778
y_origin = subcell%yOrigin
78-
z_origin = subcell%zOrigin
7979
sinrot = subcell%sinrot
8080
cosrot = subcell%cosrot
8181
call particle%transform(x_origin, y_origin)

0 commit comments

Comments
 (0)