内存报告
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer, | public | :: | region |
粒子域内存, MBytes |
|||
| integer, | public | :: | nnps |
近邻搜索结构内存, MBytes |
|||
| integer, | public | :: | total |
总内存, MBytes |
|||
| integer, | public | :: | maxpairs | = | 0 |
最大近邻对数 |
检查是否粒子发生坍塌聚集
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(memory_type), | intent(inout) | :: | self | |||
| integer, | intent(in) | :: | pairs | |||
| integer, | intent(in) | :: | particles |
初始化
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(memory_type), | intent(inout) | :: | self |
报告
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(memory_type), | intent(in) | :: | self |
type memory_type
integer :: region !! 粒子域内存, MBytes
integer :: nnps !! 近邻搜索结构内存, MBytes
integer :: total !! 总内存, MBytes
integer :: maxpairs = 0 !! 最大近邻对数
contains
procedure :: report, init, check
end type memory_type