| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| class(abst_sph), | public, | allocatable | :: | p |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(holder_sphs), | intent(inout) | :: | self | |||
| type(type_input), | intent(in) | :: | input | |||
| integer(kind=int32), | intent(in) | :: | material_id |
type :: holder_sphs class(abst_sph), allocatable :: p contains procedure, pass(self) :: initialize => initialize_holder_sphs end type holder_sphs