17 int Initialize(const Descriptor &instance, const typeInfo::DerivedType &derived,  in Initialize()
28         *componentDesc.ZeroBasedIndexedElement<typeInfo::Component>(k)};  in Initialize()
29     if (comp.genre() == typeInfo::Component::Genre::Allocatable ||  in Initialize()
30         comp.genre() == typeInfo::Component::Genre::Automatic) {  in Initialize()
36         if (comp.genre() == typeInfo::Component::Genre::Automatic) {  in Initialize()
54     } else if (comp.genre() == typeInfo::Component::Genre::Data &&  in Initialize()
59       const typeInfo::Value *bounds{comp.bounds()};  in Initialize()
61         typeInfo::TypeParameterValue lb{  in Initialize()
63         typeInfo::TypeParameterValue ub{  in Initialize()
69       const typeInfo::DerivedType &compType{*comp.derivedType()};  in Initialize()
86         *procPtrDesc.ZeroBasedIndexedElement<typeInfo::ProcPtrComponent>(k)};  in Initialize()
88       auto &pptr{*instance.OffsetElement<typeInfo::ProcedurePointer>(  in Initialize()
96 static const typeInfo::SpecialBinding *FindFinal(  in FindFinal()
97     const typeInfo::DerivedType &derived, int rank) {  in FindFinal()
99           typeInfo::SpecialBinding::RankFinal(rank))}) {  in FindFinal()
102                  typeInfo::SpecialBinding::Which::AssumedRankFinal)}) {  in FindFinal()
106         typeInfo::SpecialBinding::Which::ElementalFinal);  in FindFinal()
111     const Descriptor &descriptor, const typeInfo::DerivedType &derived) {  in CallFinalSubroutine()
115     if (special->which() == typeInfo::SpecialBinding::Which::ElementalFinal) {  in CallFinalSubroutine()
153     const Descriptor &descriptor, const typeInfo::DerivedType &derived) {  in Finalize()
172         *componentDesc.ZeroBasedIndexedElement<typeInfo::Component>(k)};  in Finalize()
173     if (comp.genre() == typeInfo::Component::Genre::Allocatable ||  in Finalize()
174         comp.genre() == typeInfo::Component::Genre::Automatic) {  in Finalize()
175       if (const typeInfo::DerivedType * compType{comp.derivedType()}) {  in Finalize()
186     } else if (comp.genre() == typeInfo::Component::Genre::Data &&  in Finalize()
189       const typeInfo::Value *bounds{comp.bounds()};  in Finalize()
198       const typeInfo::DerivedType &compType{*comp.derivedType()};  in Finalize()
217     const typeInfo::DerivedType &derived) {  in Destroy()
230         *componentDesc.ZeroBasedIndexedElement<typeInfo::Component>(k)};  in Destroy()
231     if (comp.genre() == typeInfo::Component::Genre::Allocatable ||  in Destroy()
232         comp.genre() == typeInfo::Component::Genre::Automatic) {  in Destroy()