91       return ConstantSubscripts(x.Rank(), ConstantSubscript{1});  in Get()
118     if (int rank{array->Rank()}; rank > 0) {  in LBOUND()
120       if (funcRef.Rank() == 0) {  in LBOUND()
139         if (symbol.Rank() == rank) {  in LBOUND()
151           lowerBoundsAreOne = symbol.Rank() == 0; // LBOUND(array%component)  in LBOUND()
172     if (int rank{array->Rank()}; rank > 0) {  in UBOUND()
174       if (funcRef.Rank() == 0) {  in UBOUND()
193         if (symbol.Rank() == rank) {  in UBOUND()
216           takeBoundsFromShape = symbol.Rank() == 0; // UBOUND(array%component)  in UBOUND()
248     if (CheckReductionDIM(dim, context, arg, 1, mask->Rank())) {  in FoldCount()
293         !CheckReductionDIM(dim, context_, arg_, dimArg, array->Rank())) {  in Test()
329       if (*dim < 1 || *dim > array->Rank()) {  in Test()
369       resultShape = ConstantSubscripts{array->Rank()}; // always a vector  in Test()
371       resultIndices = ConstantSubscripts(array->Rank(), 0);  in Test()
954               DescriptorInquiry{*named, DescriptorInquiry::Field::Rank}});  in FoldIntrinsicFunction()
957       return Expr<T>{args[0].value().Rank()};  in FoldIntrinsicFunction()
959     return Expr<T>{args[0].value().Rank()};  in FoldIntrinsicFunction()