Lines Matching refs:BDiagl
5 & BDiagl, argument
12 dimension BDiagl(npro,nshl,nflow,nflow),
40 BDiagl(:,j,1,1) = BDiagl(:,j,1,1)
46 BDiagl(:,j,1,2) = BDiagl(:,j,1,2)
52 BDiagl(:,j,1,3) = BDiagl(:,j,1,3)
58 BDiagl(:,j,1,4) = BDiagl(:,j,1,4)
64 BDiagl(:,j,1,5) = BDiagl(:,j,1,5)
70 BDiagl(:,j,2,1) = BDiagl(:,j,2,1)
76 BDiagl(:,j,2,2) = BDiagl(:,j,2,2)
82 BDiagl(:,j,2,3) = BDiagl(:,j,2,3)
88 BDiagl(:,j,2,4) = BDiagl(:,j,2,4)
94 BDiagl(:,j,2,5) = BDiagl(:,j,2,5)
100 BDiagl(:,j,3,1) = BDiagl(:,j,3,1)
106 BDiagl(:,j,3,2) = BDiagl(:,j,3,2)
112 BDiagl(:,j,3,3) = BDiagl(:,j,3,3)
118 BDiagl(:,j,3,4) = BDiagl(:,j,3,4)
124 BDiagl(:,j,3,5) = BDiagl(:,j,3,5)
130 BDiagl(:,j,4,1) = BDiagl(:,j,4,1)
136 BDiagl(:,j,4,2) = BDiagl(:,j,4,2)
142 BDiagl(:,j,4,3) = BDiagl(:,j,4,3)
148 BDiagl(:,j,4,4) = BDiagl(:,j,4,4)
154 BDiagl(:,j,4,5) = BDiagl(:,j,4,5)
160 BDiagl(:,j,5,1) = BDiagl(:,j,5,1)
166 BDiagl(:,j,5,2) = BDiagl(:,j,5,2)
172 BDiagl(:,j,5,3) = BDiagl(:,j,5,3)
178 BDiagl(:,j,5,4) = BDiagl(:,j,5,4)
184 BDiagl(:,j,5,5) = BDiagl(:,j,5,5)
201 BDiagl(:,j,2,2) = BDiagl(:,j,2,2) + tmp * A0(:,2,2)
202 BDiagl(:,j,3,3) = BDiagl(:,j,3,3) + tmp * A0(:,3,3)
203 BDiagl(:,j,4,4) = BDiagl(:,j,4,4) + tmp * A0(:,4,4)
204 BDiagl(:,j,1,5) = BDiagl(:,j,1,5) + tmp * A0(:,1,5)
205 BDiagl(:,j,2,5) = BDiagl(:,j,2,5) + tmp * A0(:,2,5)
206 BDiagl(:,j,3,5) = BDiagl(:,j,3,5) + tmp * A0(:,3,5)
207 BDiagl(:,j,4,5) = BDiagl(:,j,4,5) + tmp * A0(:,4,5)
208 BDiagl(:,j,1,1) = BDiagl(:,j,1,1) + tmp * A0(:,1,1)
209 BDiagl(:,j,2,1) = BDiagl(:,j,2,1) + tmp * A0(:,2,1)
210 BDiagl(:,j,3,1) = BDiagl(:,j,3,1) + tmp * A0(:,3,1)
211 BDiagl(:,j,4,1) = BDiagl(:,j,4,1) + tmp * A0(:,4,1)
212 BDiagl(:,j,5,1) = BDiagl(:,j,5,1) + tmp * A0(:,5,1)
213 BDiagl(:,j,5,2) = BDiagl(:,j,5,2) + tmp * A0(:,5,2)
214 BDiagl(:,j,5,3) = BDiagl(:,j,5,3) + tmp * A0(:,5,3)
215 BDiagl(:,j,5,4) = BDiagl(:,j,5,4) + tmp * A0(:,5,4)
216 BDiagl(:,j,5,5) = BDiagl(:,j,5,5) + tmp * A0(:,5,5)
230 BDiagl(:,j,2,2) = BDiagl(:,j,2,2) + tmp2 * A0(:,2,2)
231 BDiagl(:,j,3,3) = BDiagl(:,j,3,3) + tmp2 * A0(:,3,3)
232 BDiagl(:,j,4,4) = BDiagl(:,j,4,4) + tmp2 * A0(:,4,4)
233 BDiagl(:,j,1,5) = BDiagl(:,j,1,5) + tmp2 * A0(:,1,5)
234 BDiagl(:,j,2,5) = BDiagl(:,j,2,5) + tmp2 * A0(:,2,5)
235 BDiagl(:,j,3,5) = BDiagl(:,j,3,5) + tmp2 * A0(:,3,5)
236 BDiagl(:,j,4,5) = BDiagl(:,j,4,5) + tmp2 * A0(:,4,5)
237 BDiagl(:,j,1,1) = BDiagl(:,j,1,1) + tmp2 * A0(:,1,1)
238 BDiagl(:,j,2,1) = BDiagl(:,j,2,1) + tmp2 * A0(:,2,1)
239 BDiagl(:,j,3,1) = BDiagl(:,j,3,1) + tmp2 * A0(:,3,1)
240 BDiagl(:,j,4,1) = BDiagl(:,j,4,1) + tmp2 * A0(:,4,1)
241 BDiagl(:,j,5,1) = BDiagl(:,j,5,1) + tmp2 * A0(:,5,1)
242 BDiagl(:,j,5,2) = BDiagl(:,j,5,2) + tmp2 * A0(:,5,2)
243 BDiagl(:,j,5,3) = BDiagl(:,j,5,3) + tmp2 * A0(:,5,3)
244 BDiagl(:,j,5,4) = BDiagl(:,j,5,4) + tmp2 * A0(:,5,4)
245 BDiagl(:,j,5,5) = BDiagl(:,j,5,5) + tmp2 * A0(:,5,5)
344 BDiagl(:,i,idof,jdof) = BDiagl(:,i,idof,jdof)
578 BDiagl(:,j,i,k) = BDiagl(:,j,i,k) + tmp * A0(:,i,k)
795 BDiagl(:,j,i,k) = BDiagl(:,j,i,k) + tmp * A0(:,i,k)
1012 BDiagl(:,j,i,k) = BDiagl(:,j,i,k) + tmp * A0(:,i,k)
1352 BDiagl(:,j,i,k) = BDiagl(:,j,i,k) + tmp * A0(:,i,k)
1695 BDiagl(:,j,i,k) = BDiagl(:,j,i,k) + tmp * A0(:,i,k)
2038 BDiagl(:,j,i,k) = BDiagl(:,j,i,k) + tmp * A0(:,i,k)