Lines Matching refs:xl
1 subroutine e3StsLhs( xl, lStsVec ) argument
13 & xl(npro,nenl,3) local
15 call e3StsDir( xl, lDir )
37 subroutine e3StsRes( xl, rl, lStsVec ) argument
46 real*8 xl(npro,nenl,3), rl(npro,nshl,ndof) local
49 call e3StsDir( xl, lDir )
74 subroutine e3StsDir( xl, lDir ) argument
82 real*8 xl(npro,nenl,3), lDir(npro,nshl,3) local
92 x12 = xl(e,2,1) - xl(e,1,1)
93 x13 = xl(e,3,1) - xl(e,1,1)
94 x14 = xl(e,4,1) - xl(e,1,1)
95 x23 = xl(e,3,1) - xl(e,2,1)
96 x24 = xl(e,4,1) - xl(e,2,1)
97 x34 = xl(e,4,1) - xl(e,3,1)
99 y12 = xl(e,2,2) - xl(e,1,2)
100 y13 = xl(e,3,2) - xl(e,1,2)
101 y14 = xl(e,4,2) - xl(e,1,2)
102 y23 = xl(e,3,2) - xl(e,2,2)
103 y24 = xl(e,4,2) - xl(e,2,2)
104 y34 = xl(e,4,2) - xl(e,3,2)
106 z12 = xl(e,2,3) - xl(e,1,3)
107 z13 = xl(e,3,3) - xl(e,1,3)
108 z14 = xl(e,4,3) - xl(e,1,3)
109 z23 = xl(e,3,3) - xl(e,2,3)
110 z24 = xl(e,4,3) - xl(e,2,3)
111 z34 = xl(e,4,3) - xl(e,3,3)
154 x12 = xl(e,2,1) - xl(e,1,1)
155 x13 = xl(e,3,1) - xl(e,1,1)
156 x14 = xl(e,4,1) - xl(e,1,1)
157 x23 = xl(e,3,1) - xl(e,2,1)
158 x24 = xl(e,4,1) - xl(e,2,1)
159 x34 = xl(e,4,1) - xl(e,3,1)
161 y12 = xl(e,2,2) - xl(e,1,2)
162 y13 = xl(e,3,2) - xl(e,1,2)
163 y14 = xl(e,4,2) - xl(e,1,2)
164 y23 = xl(e,3,2) - xl(e,2,2)
165 y24 = xl(e,4,2) - xl(e,2,2)
166 y34 = xl(e,4,2) - xl(e,3,2)
168 z12 = xl(e,2,3) - xl(e,1,3)
169 z13 = xl(e,3,3) - xl(e,1,3)
170 z14 = xl(e,4,3) - xl(e,1,3)
171 z23 = xl(e,3,3) - xl(e,2,3)
172 z24 = xl(e,4,3) - xl(e,2,3)
173 z34 = xl(e,4,3) - xl(e,3,3)
241 x12 = xl(e,2,1) - xl(e,1,1)
242 x13 = xl(e,3,1) - xl(e,1,1)
243 x14 = xl(e,4,1) - xl(e,1,1)
244 x23 = xl(e,3,1) - xl(e,2,1)
245 x24 = xl(e,4,1) - xl(e,2,1)
248 y12 = xl(e,2,2) - xl(e,1,2)
249 y13 = xl(e,3,2) - xl(e,1,2)
250 y14 = xl(e,4,2) - xl(e,1,2)
251 y23 = xl(e,3,2) - xl(e,2,2)
252 y24 = xl(e,4,2) - xl(e,2,2)
255 z12 = xl(e,2,3) - xl(e,1,3)
256 z13 = xl(e,3,3) - xl(e,1,3)
257 z14 = xl(e,4,3) - xl(e,1,3)
258 z23 = xl(e,3,3) - xl(e,2,3)
259 z24 = xl(e,4,3) - xl(e,2,3)
363 x13 = xl(e,1,1) - xl(e,3,1)
364 x16 = xl(e,1,1) - xl(e,6,1)
365 x18 = xl(e,1,1) - xl(e,8,1)
366 x24 = xl(e,2,1) - xl(e,4,1)
367 x25 = xl(e,2,1) - xl(e,5,1)
368 x27 = xl(e,2,1) - xl(e,7,1)
369 x36 = xl(e,3,1) - xl(e,6,1)
370 x38 = xl(e,3,1) - xl(e,8,1)
371 x45 = xl(e,4,1) - xl(e,5,1)
372 x47 = xl(e,4,1) - xl(e,7,1)
373 x57 = xl(e,5,1) - xl(e,7,1)
374 x68 = xl(e,6,1) - xl(e,8,1)
376 y13 = xl(e,1,2) - xl(e,3,2)
377 y16 = xl(e,1,2) - xl(e,6,2)
378 y18 = xl(e,1,2) - xl(e,8,2)
379 y24 = xl(e,2,2) - xl(e,4,2)
380 y25 = xl(e,2,2) - xl(e,5,2)
381 y27 = xl(e,2,2) - xl(e,7,2)
382 y36 = xl(e,3,2) - xl(e,6,2)
383 y38 = xl(e,3,2) - xl(e,8,2)
384 y45 = xl(e,4,2) - xl(e,5,2)
385 y47 = xl(e,4,2) - xl(e,7,2)
386 y57 = xl(e,5,2) - xl(e,7,2)
387 y68 = xl(e,6,2) - xl(e,8,2)
389 z13 = xl(e,1,3) - xl(e,3,3)
390 z16 = xl(e,1,3) - xl(e,6,3)
391 z18 = xl(e,1,3) - xl(e,8,3)
392 z24 = xl(e,2,3) - xl(e,4,3)
393 z25 = xl(e,2,3) - xl(e,5,3)
394 z27 = xl(e,2,3) - xl(e,7,3)
395 z36 = xl(e,3,3) - xl(e,6,3)
396 z38 = xl(e,3,3) - xl(e,8,3)
397 z45 = xl(e,4,3) - xl(e,5,3)
398 z47 = xl(e,4,3) - xl(e,7,3)
399 z57 = xl(e,5,3) - xl(e,7,3)
400 z68 = xl(e,6,3) - xl(e,8,3)