24   return dv->rank > 0 && dv->dim[dv->rank - 1].extent == -1;  in IsAssumedSize()
31   const CFI_dim_t *dim{descriptor->dim};  in CFI_address()  local
32   for (CFI_rank_t j{0}; j < rank; ++j, ++dim) {  in CFI_address()
33     p += (subscripts[j] - dim->lower_bound) * dim->sm;  in CFI_address()
69   CFI_dim_t *dim{descriptor->dim};  in CFI_allocate()  local
71   for (std::size_t j{0}; j < rank; ++j, ++dim) {  in CFI_allocate()
75     dim->lower_bound = extent == 0 ? 1 : lb;  in CFI_allocate()
76     dim->extent = extent;  in CFI_allocate()
77     dim->sm = byteSize;  in CFI_allocate()
281       descriptor->dim[j].lower_bound = lower_bound;  in CFI_establish()
282       descriptor->dim[j].extent = extents[j];  in CFI_establish()
283       descriptor->dim[j].sm = byteSize;  in CFI_establish()
293     if (bytes != descriptor->dim[j].sm) {  in CFI_is_contiguous()
296     bytes *= descriptor->dim[j].extent;  in CFI_is_contiguous()
331     const CFI_dim_t &dim{source->dim[j]};  in CFI_section()  local
332     const CFI_index_t srcLB{dim.lower_bound};  in CFI_section()
333     const CFI_index_t srcUB{srcLB + dim.extent - 1};  in CFI_section()
345       shiftedBaseAddr += (lb - srcLB) * dim.sm;  in CFI_section()
364       result->dim[resRank].extent = extent[j];  in CFI_section()
365       result->dim[resRank].lower_bound = extent[j] == 0 ? 1  in CFI_section()
367                          : source->dim[j].lower_bound;  in CFI_section()
368       result->dim[resRank].sm = actualStride[j] * source->dim[j].sm;  in CFI_section()
403     result->dim[j].lower_bound = 0;  in CFI_select_part()
404     result->dim[j].extent = source->dim[j].extent;  in CFI_select_part()
405     result->dim[j].sm = source->dim[j].sm;  in CFI_select_part()
442       CFI_index_t extent{source->dim[j].extent};  in CFI_setpointer()
443       result->dim[j].extent = extent;  in CFI_setpointer()
444       result->dim[j].sm = source->dim[j].sm;  in CFI_setpointer()
445       result->dim[j].lower_bound = extent == 0 ? 1  in CFI_setpointer()
446           : copySrcLB                          ? source->dim[j].lower_bound  in CFI_setpointer()