Lines Matching refs:idx
20 PetscInt :: idx, ax, jdx
34 idx = 0
39 idx = idx + 4
40 s(0:3) = b(idx + 0:idx + 3)
50 x(idx + 0:idx + 3) = s(0:3)
60 s(0:3) = x(idx + 0:idx + 3)
70 x(idx + 0) = a(ax + 0)*s(0) + a(ax + 4)*s(1) + a(ax + 8)*s(2) + a(ax + 12)*s(3)
71 x(idx + 1) = a(ax + 1)*s(0) + a(ax + 5)*s(1) + a(ax + 9)*s(2) + a(ax + 13)*s(3)
72 x(idx + 2) = a(ax + 2)*s(0) + a(ax + 6)*s(1) + a(ax + 10)*s(2) + a(ax + 14)*s(3)
73 x(idx + 3) = a(ax + 3)*s(0) + a(ax + 7)*s(1) + a(ax + 11)*s(2) + a(ax + 15)*s(3)
74 idx = idx - 4
90 PetscInt :: jstart, jend, idx, ax, jdx, kdx, nn
104 idx = 0
122 idx = idx + 4
123 s(0:3) = b(idx:idx + 3)
134 x(idx:idx + 3) = s(0:3)
143 s(0:3) = x(idx:idx + 3)
163 x(idx) = a(ax + 0)*s(0) + a(ax + 4)*s(1) + a(ax + 8)*s(2) + a(ax + 12)*s(3)
164 x(idx + 1) = a(ax + 1)*s(0) + a(ax + 5)*s(1) + a(ax + 9)*s(2) + a(ax + 13)*s(3)
165 x(idx + 2) = a(ax + 2)*s(0) + a(ax + 6)*s(1) + a(ax + 10)*s(2) + a(ax + 14)*s(3)
166 x(idx + 3) = a(ax + 3)*s(0) + a(ax + 7)*s(1) + a(ax + 11)*s(2) + a(ax + 15)*s(3)
167 idx = idx - 4