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