stepon.f90
580212fe518bgeom_testpardiso

stepon.f90
View Options

			SUBROUTINE stepon
			!
			! Advance one time step
			!
			USE basic
			USE constants
			USE fields
			USE beam
			USE maxwellsource

			! The particles are injected by the source
			IF (nlmaxwellsource) CALL maxwellsource_inject(time)

			! Boundary conditions for plasma particles outside the plasam region
			CALL bound(parts)

			! Localisation of particles in cells
			CALL localisation(parts)

			! Assemble right hand side
			CALL rhscon(parts)

			! Solve Poisson equation
			CALL poisson

			! Compute the electric field at the particle position
			CALL EForcescomp(parts)

			! Solve Newton eq. and advance velocity by delta t
			CALL comp_velocity(parts)

			! Calculate new positions of particles
			CALL push(parts)

			! Calculate main physical quantities
			CALL diagnostics

			END SUBROUTINE stepon