配置参数
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| type(sph_configuration), | public | :: | spc_obj |
sph 参数 |
|||
| type(time_integration_configuration), | public | :: | tic_obj |
时间积分参数 |
|||
| type(io_configuration), | public | :: | ioc_obj |
输入输出参数 |
sph 参数
| 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 |
求解域系数 |
| procedure , public , :: read => spc_read Subroutine | |
| procedure , private :: print => spc_print Subroutine |
输入输出控制参数
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| logical, | public | :: | is_save_acceleration |
是否保存加速度 |
|||
| character(len=64), | public | :: | input_file |
输入文件 |
|||
| character(len=64), | public | :: | output_file |
输出文件 |
| procedure , public , :: read => ioc_read Subroutine | |
| procedure , private :: print => ioc_print Subroutine |
读取sph参数
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(sph_configuration), | intent(inout) | :: | self |
读取时间积分参数
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(time_integration_configuration), | intent(inout) | :: | self |
读取输入输出参数
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(io_configuration), | intent(inout) | :: | self |
打印时间积分参数
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(time_integration_configuration), | intent(in) | :: | self |