27     const auto &comp{  in Initialize()  local
29     if (comp.genre() == typeInfo::Component::Genre::Allocatable ||  in Initialize()
30         comp.genre() == typeInfo::Component::Genre::Automatic) {  in Initialize()
33             j * byteStride + comp.offset())};  in Initialize()
34         comp.EstablishDescriptor(allocDesc, instance, terminator);  in Initialize()
36         if (comp.genre() == typeInfo::Component::Genre::Automatic) {  in Initialize()
46     } else if (const void *init{comp.initialization()}) {  in Initialize()
49       std::size_t bytes{comp.SizeInBytes(instance)};  in Initialize()
51         char *ptr{instance.OffsetElement<char>(j * byteStride + comp.offset())};  in Initialize()
54     } else if (comp.genre() == typeInfo::Component::Genre::Data &&  in Initialize()
55         comp.derivedType() && !comp.derivedType()->noInitializationNeeded()) {  in Initialize()
59       const typeInfo::Value *bounds{comp.bounds()};  in Initialize()
60       for (int dim{0}; dim < comp.rank(); ++dim) {  in Initialize()
69       const typeInfo::DerivedType &compType{*comp.derivedType()};  in Initialize()
72             instance.OffsetElement<char>(j * byteStride + comp.offset()),  in Initialize()
73             comp.rank(), extent);  in Initialize()
85     const auto &comp{  in Initialize()  local
89           j * byteStride + comp.offset)};  in Initialize()
90       pptr = comp.procInitialization;  in Initialize()
171     const auto &comp{  in Finalize()  local
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()
179                 j * byteStride + comp.offset())};  in Finalize()
186     } else if (comp.genre() == typeInfo::Component::Genre::Data &&  in Finalize()
187         comp.derivedType() && !comp.derivedType()->noFinalizationNeeded()) {  in Finalize()
189       const typeInfo::Value *bounds{comp.bounds()};  in Finalize()
190       for (int dim{0}; dim < comp.rank(); ++dim) {  in Finalize()
198       const typeInfo::DerivedType &compType{*comp.derivedType()};  in Finalize()
201             descriptor.OffsetElement<char>(j * byteStride + comp.offset()),  in Finalize()
202             comp.rank(), extent);  in Finalize()
229     const auto &comp{  in Destroy()  local
231     if (comp.genre() == typeInfo::Component::Genre::Allocatable ||  in Destroy()
232         comp.genre() == typeInfo::Component::Genre::Automatic) {  in Destroy()
234         descriptor.OffsetElement<Descriptor>(j * byteStride + comp.offset())  in Destroy()