Lines Matching refs:ri
2 & ri, rmi, rl, argument
55 & WdetJ(npro), ri(npro,nflow*(nsd+1)),
76 & shg(:,i,1) * ri(:, 1) + shg(:,i,2) * ri(:, 6)
77 & + shg(:,i,3) * ri(:,11) )
79 & shg(:,i,1) * ri(:, 2) + shg(:,i,2) * ri(:, 7)
80 & + shg(:,i,3) * ri(:,12) )
82 & shg(:,i,1) * ri(:, 3) + shg(:,i,2) * ri(:, 8)
83 & + shg(:,i,3) * ri(:,13) )
85 & shg(:,i,1) * ri(:, 4) + shg(:,i,2) * ri(:, 9)
86 & + shg(:,i,3) * ri(:,14) )
88 & shg(:,i,1) * ri(:, 5) + shg(:,i,2) * ri(:,10)
89 & + shg(:,i,3) * ri(:,15) )
129 rl(:,i,2) = rl(:,i,2) + shp(:,i) * WdetJ * ri(:,17)
130 rl(:,i,3) = rl(:,i,3) + shp(:,i) * WdetJ * ri(:,18)
131 rl(:,i,4) = rl(:,i,4) + shp(:,i) * WdetJ * ri(:,19)
132 rl(:,i,5) = rl(:,i,5) + shp(:,i) * WdetJ * ri(:,20)
137 rl(:,i,1) = rl(:,i,1) + shp(:,i) * WdetJ * ri(:,16)
138 rl(:,i,2) = rl(:,i,2) + shp(:,i) * WdetJ * ri(:,17)
139 rl(:,i,3) = rl(:,i,3) + shp(:,i) * WdetJ * ri(:,18)
140 rl(:,i,4) = rl(:,i,4) + shp(:,i) * WdetJ * ri(:,19)
141 rl(:,i,5) = rl(:,i,5) + shp(:,i) * WdetJ * ri(:,20)