computeWallForce_1D Function

public function computeWallForce_1D(xp, up, Rp, xwall, kn, dn, eps) result(Fwall)

computeWallForce_1D computes the 1D DEM force between a particle at position xp with velocity un to a wall at position xwall.

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=rk),	intent(in)			::	xp	Particle position
real(kind=rk),	intent(in)			::	up	Particle velocity
real(kind=rk),	intent(in)			::	Rp	Particle radius
real(kind=rk),	intent(in)			::	xwall	Wall position
real(kind=rk),	intent(in)			::	kn	Spring constant
real(kind=rk),	intent(in)			::	dn	Damping coefficient
real(kind=rk),	intent(in)			::	eps	Threshold distance at which to execute a collision

Return Value real(kind=rk)