spx_artifical_force Module

Artificial viscosity and heat
人工热量与人工粘性

Contents

Variables

alpha beta etq

Subroutines

artificial_viscosity

Variables

Type	Visibility	Attributes		Name		Initial
real(kind=rk),	public,	parameter	::	alpha	=	1.0_rk	剪切粘度
real(kind=rk),	public,	parameter	::	beta	=	1.0_rk	容积（bulk）粘度
real(kind=rk),	public,	parameter	::	etq	=	0.1_rk	避免奇点

Subroutines

public pure subroutine artificial_viscosity(particle, pairs, acc, n)

Artificial viscosity
人工粘度

Read more…

Arguments

Type	Intent	Optional	Attributes		Name
type(particle_type),	intent(inout)			::	particle	particle 计算域
type(nnps_pairs_type),	intent(in)			::	pairs	Pair vector 粒子对
real(kind=rk),	intent(inout)			::	acc(:,:)	Visc acceleration 粘性力（加速度）
integer,	intent(in)			::	n	实弹性粒子数, numbers(1)