Lines Matching defs:sstride
43 index_type sstride[GFC_MAX_DIMENSIONS];
79 sstride[n] = GFC_DESCRIPTOR_STRIDE(array,n);
104 base -= sstride[0] * 1;
115 base += sstride[n] * extent[n] * 1;
122 base -= sstride[n] * 1;
141 base += sstride[0] * 1;
152 base -= sstride[n] * extent[n] * 1;
159 base += sstride[n] * 1;
179 index_type sstride[GFC_MAX_DIMENSIONS];
235 sstride[n] = GFC_DESCRIPTOR_STRIDE(array,n);
261 base -= sstride[0] * 1;
273 base += sstride[n] * extent[n] * 1;
281 base -= sstride[n] * 1;
301 base += sstride[0] * 1;
313 base -= sstride[n] * extent[n] * 1;
321 base += sstride[n]* 1;