Lines Matching defs:rank
84 Shape GetShapeHelper::CreateShape(int rank, NamedEntity &base) const {
86 for (int dimension{0}; dimension < rank; ++dimension) {
258 int rank{object->shape().Rank()};
259 if (dimension_ < rank) {
267 if (dimension_ == rank - 1 &&
323 } else if (assoc->rank()) { // RANK(n)
325 if (IsDescriptor(resolved) && dimension_ < *assoc->rank()) {
418 int rank{base.Rank()};
419 for (int dim{0}; dim < rank; ++dim) {
428 int rank{base.Rank()};
429 for (int dim{0}; dim < rank; ++dim) {
437 int rank{base.Rank()};
438 for (int dim{0}; dim < rank; ++dim) {
447 int rank{base.Rank()};
448 for (int dim{0}; dim < rank; ++dim) {
490 assoc && !assoc->rank()) { // not SELECT RANK case
514 } else if (assoc->rank()) { // RANK(n)
515 if (semantics::IsDescriptor(symbol) && dimension < *assoc->rank()) {
617 int rank{details->shape().Rank()};
618 if (dimension < rank) {
635 } else if (assoc->rank() && dimension >= *assoc->rank()) {
673 int rank{details->shape().Rank()};
674 if (dimension < rank) {
690 } else if (assoc->rank()) { // RANK (n)
692 if (IsDescriptor(resolved) && dimension < *assoc->rank()) {
721 int rank{base.Rank()};
722 for (int dim{0}; dim < rank; ++dim) {
817 if (assoc.rank()) { // SELECT RANK case
818 int n{assoc.rank().value()};
823 int rank{static_cast<int>(exprShape->size())};
824 for (int dimension{0}; dimension < rank; ++dimension) {
864 int rank{symbol.Rank()};
865 if (rank == 0) {
869 return CreateShape(rank, base);
997 auto rank{static_cast<int>(arrayShape->size())};
1001 if (dim && *dim >= 1 && *dim <= rank) {
1007 return Shape{ExtentExpr{rank}};
1183 // The rank is always known even if the extents are not.
1210 messages.Say("Rank of %1$s is %2$d, but %3$s has rank %4$d"_err_en_US,
1235 std::size_t rank(indices.size());
1236 CHECK(rank <= extents.size());
1237 for (std::size_t j{0}; j < rank; ++j) {
1242 for (std::size_t j{0}; j < rank; ++j) {