164     SubscriptValue sourceAt[maxRank];  in RTNAME()  local
166       sourceAt[j] = sourceLB[j] + resultAt[j] - 1;  in RTNAME()
168     SubscriptValue &sourceDim{sourceAt[dim - 1]};  in RTNAME()
174       CopyElement(result, resultAt, source, sourceAt, terminator);  in RTNAME()
194     SubscriptValue sourceAt{lb + (j + shift) % extent};  in RTNAME()  local
195     if (sourceAt < lb) {  in RTNAME()
196       sourceAt += extent;  in RTNAME()
198     CopyElement(result, &resultAt, source, &sourceAt, terminator);  in RTNAME()
261     SubscriptValue sourceAt[maxRank];  in RTNAME()  local
263       sourceAt[j] = sourceLB[j] + resultAt[j] - 1;  in RTNAME()
265     SubscriptValue &sourceDim{sourceAt[dim - 1]};  in RTNAME()
269         CopyElement(result, resultAt, source, sourceAt, terminator);  in RTNAME()
305     SubscriptValue sourceAt{lb + j - 1 + shift};  in RTNAME()  local
306     if (sourceAt >= lb && sourceAt < lb + extent) {  in RTNAME()
307       CopyElement(result, &j, source, &sourceAt, terminator);  in RTNAME()
356   SubscriptValue sourceAt[maxRank], resultAt{1};  in RTNAME()  local
357   source.GetLowerBounds(sourceAt);  in RTNAME()
361         CopyElement(result, &resultAt, source, sourceAt, terminator);  in RTNAME()
363         source.IncrementSubscripts(sourceAt);  in RTNAME()
371         CopyElement(result, &resultAt, source, sourceAt, terminator);  in RTNAME()
374       source.IncrementSubscripts(sourceAt);  in RTNAME()
518   SubscriptValue sourceAt[maxRank];  in RTNAME()  local
519   source.GetLowerBounds(sourceAt);  in RTNAME()
522       CopyElement(result, resultAt, source, sourceAt, terminator);  in RTNAME()
525     source.IncrementSubscripts(sourceAt);  in RTNAME()