diff options
| author |  Weiqun Zhang <weiqunzhang@lbl.gov>
| 2016-11-16 14:02:14 -0800 |
|---|---|---|
| committer | Weiqun Zhang <weiqunzhang@lbl.gov>
| 2016-11-16 14:02:14 -0800 |
| commit | 9ea7e1f77f9db0852408e79da4797f1a0bdc5d2e (patch) | |
| tree | 18a8894ebc082f0224fc77a31350f1f94f5307e7 /Source/WarpX_f.F90 | |
| parent | a5131955a8be2cda7241c998e3e9e794b77f80c5 (diff) | |
| download | WarpX-9ea7e1f77f9db0852408e79da4797f1a0bdc5d2e.tar.gz WarpX-9ea7e1f77f9db0852408e79da4797f1a0bdc5d2e.tar.zst WarpX-9ea7e1f77f9db0852408e79da4797f1a0bdc5d2e.zip | |
update particle pusher
Diffstat (limited to '')
| -rw-r--r-- | Source/WarpX_f.F90 | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/Source/WarpX_f.F90 b/Source/WarpX_f.F90 index 96f6f72c6..6bf7823b9 100644 --- a/Source/WarpX_f.F90 +++ b/Source/WarpX_f.F90 @@ -607,9 +607,13 @@ contains !! Vay pusher -- Full push CASE (1_c_long) +#if (BL_SPACEDIM == 3) CALL pxr_ebcancelpush3d(np,uxp,uyp,uzp,gaminv, & ex,ey,ez, & bx,by,bz,q,m,dt,0_c_long) +#else + call bl_error("Is there a 2d Vay pusher implemented?") +#endif CASE DEFAULT !! --- Push velocity with E half step @@ -628,7 +632,11 @@ contains END SELECT !!!! --- push particle species positions a time step +#if (BL_SPACEDIM == 3) CALL pxr_pushxyz(np,xp,yp,zp,uxp,uyp,uzp,gaminv,dt) +#elif (BL_SPACEDIM == 2) + CALL pxr_pushxz(np,xp,zp,uxp,uzp,gaminv,dt) +#endif end subroutine |