spx_internal_force Module

Internal forces
内力：粘性力、压力

Contents

Variables

internal_force viscosity

Abstract Interfaces

internal_force_fcn

Subroutines

internal_force_without_visc internal_force_with_visc

Variables

Type	Visibility	Attributes		Name		Initial
procedure(internal_force_fcn),	public,	pointer	::	internal_force	=>	internal_force_with_visc	Internal force function pointer 内力函数指针
logical,	public		::	viscosity			Viscosity on/off 是否考虑粘性力

Abstract Interfaces

abstract interface

• public subroutine internal_force_fcn(particle, pairs, acc, n)

  Internal force function
  内力函数

  Arguments

  Type	Intent	Optional	Attributes		Name
  type(particle_type),	intent(inout)			::	particle	区域
  type(nnps_pairs_type),	intent(in)			::	pairs	粒子对
  real(kind=rk),	intent(inout)			::	acc(:,:)	加速度
  integer,	intent(in)			::	n	实弹性粒子数, numbers(1)

Subroutines

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

Internal force function without viscosity
内力求解

Read more…

Arguments

Type	Intent	Optional	Attributes		Name
type(particle_type),	intent(inout)			::	particle	区域
type(nnps_pairs_type),	intent(in)			::	pairs	粒子对
real(kind=rk),	intent(inout)			::	acc(:,:)	加速度
integer,	intent(in)			::	n	实弹性粒子数, numbers(1)

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

Internal force function with viscosity
内力求解（含粘性力）

Read more…

Arguments

Type	Intent	Optional	Attributes		Name
type(particle_type),	intent(inout)			::	particle	区域
type(nnps_pairs_type),	intent(in)			::	pairs	粒子对
real(kind=rk),	intent(inout)			::	acc(:,:)	更新加速度
integer,	intent(in)			::	n	实弹性粒子数, numbers(1)