密度求和
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| procedure(density_summation_fcn), | public, | pointer, nopass | :: | density |
密度求和函数指针 |
初始化
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(density_summation), | intent(inout) | :: | self |
type density_summation
procedure(density_summation_fcn), pointer, nopass :: density !! 密度求和函数指针
contains
procedure :: init
end type density_summation