sph_configuration Derived Type

type, private :: sph_configuration

sph 参数


Contents

Variables

Type-Bound Procedures

Source Code

sph_configuration

Components

Type Visibility Attributes Name Initial
character(len=64), public :: eos_water

水的状态方程
character(len=64), public :: eos_air

空气的状态方程
logical, public :: has_gravity

是否有重力
logical, public :: has_viscosity

是否有粘性
logical, public :: has_surface_tension

是否有表面张力
logical, public :: has_artificial_viscosity

是否有人工粘性
character(len=64), public :: smoothed_kernel_function

平滑核函数
character(len=64), public :: density_summation_method

密度求和方法
real(kind=rk), public :: c0

人工声速, m/s
real(kind=rk), public :: k

求解域系数

Type-Bound Procedures

procedure, public, :: read => spc_read

  • private subroutine spc_read(self)

    读取sph参数

    Arguments

    Type IntentOptional Attributes Name
    class(sph_configuration), intent(inout) :: self

procedure, private :: print => spc_print

  • private subroutine spc_print(self)

    打印sph参数

    Arguments

    Type IntentOptional Attributes Name
    class(sph_configuration), intent(in) :: self

Source Code

    type sph_configuration
        character(64) :: eos_water  !! 水的状态方程
        character(64) :: eos_air    !! 空气的状态方程
        logical :: has_gravity        !! 是否有重力
        logical :: has_viscosity      !! 是否有粘性
        logical :: has_surface_tension!! 是否有表面张力
        logical :: has_artificial_viscosity!! 是否有人工粘性
        character(64) :: smoothed_kernel_function  !! 平滑核函数
        character(64) :: density_summation_method   !! 密度求和方法
        real(rk) :: c0  !! 人工声速, m/s
        real(rk) :: k  !! 求解域系数
    contains
        procedure :: read => spc_read
        procedure, private :: print => spc_print
    end type sph_configuration