68       Descriptor &compDesc{staticDescriptor.descriptor()};  in Initialize()
111     const Descriptor &descriptor, const typeInfo::DerivedType &derived) {  in CallFinalSubroutine()  argument
112   if (const auto *special{FindFinal(derived, descriptor.rank())}) {  in CallFinalSubroutine()
116       std::size_t byteStride{descriptor.ElementBytes()};  in CallFinalSubroutine()
117       std::size_t elements{descriptor.Elements()};  in CallFinalSubroutine()
120         Descriptor &elemDesc{statDesc.descriptor()};  in CallFinalSubroutine()
121         elemDesc = descriptor;  in CallFinalSubroutine()
127               descriptor.OffsetElement<char>(j * byteStride));  in CallFinalSubroutine()
133           p(descriptor.OffsetElement<char>(j * byteStride));  in CallFinalSubroutine()
138       Descriptor &tmpDesc{statDesc.descriptor()};  in CallFinalSubroutine()
139       tmpDesc = descriptor;  in CallFinalSubroutine()
146       p(descriptor.OffsetElement<char>());  in CallFinalSubroutine()
153     const Descriptor &descriptor, const typeInfo::DerivedType &derived) {  in Finalize()  argument
154   if (derived.noFinalizationNeeded() || !descriptor.IsAllocated()) {  in Finalize()
157   CallFinalSubroutine(descriptor, derived);  in Finalize()
165   std::size_t elements{descriptor.Elements()};  in Finalize()
166   std::size_t byteStride{descriptor.ElementBytes()};  in Finalize()
178             const Descriptor &compDesc{*descriptor.OffsetElement<Descriptor>(  in Finalize()
191         SubscriptValue lb{bounds[2 * dim].GetValue(&descriptor).value_or(0)};  in Finalize()
193             bounds[2 * dim + 1].GetValue(&descriptor).value_or(0)};  in Finalize()
197       Descriptor &compDesc{staticDescriptor.descriptor()};  in Finalize()
201             descriptor.OffsetElement<char>(j * byteStride + comp.offset()),  in Finalize()
208     Finalize(descriptor, *parentType);  in Finalize()
216 void Destroy(const Descriptor &descriptor, bool finalize,  in Destroy()  argument
218   if (derived.noDestructionNeeded() || !descriptor.IsAllocated()) {  in Destroy()
222     Finalize(descriptor, derived);  in Destroy()
226   std::size_t elements{descriptor.Elements()};  in Destroy()
227   std::size_t byteStride{descriptor.ElementBytes()};  in Destroy()
234         descriptor.OffsetElement<Descriptor>(j * byteStride + comp.offset())  in Destroy()