Lines Matching refs:shg
5 & shg, dxidx, WdetJ, argument
70 & shg(npro,nshl,nsd), dxidx(npro,nsd,nsd),
238 & shg, WdetJ)
260 g1yi(:,1) = g1yi(:,1) + shg(:,1,1) * yl(:,1,1)
261 & + shg(:,2,1) * yl(:,2,1)
262 & + shg(:,3,1) * yl(:,3,1)
263 & + shg(:,4,1) * yl(:,4,1)
265 g1yi(:,2) = g1yi(:,2) + shg(:,1,1) * yl(:,1,2)
266 & + shg(:,2,1) * yl(:,2,2)
267 & + shg(:,3,1) * yl(:,3,2)
268 & + shg(:,4,1) * yl(:,4,2)
270 g1yi(:,3) = g1yi(:,3) + shg(:,1,1) * yl(:,1,3)
271 & + shg(:,2,1) * yl(:,2,3)
272 & + shg(:,3,1) * yl(:,3,3)
273 & + shg(:,4,1) * yl(:,4,3)
275 g1yi(:,4) = g1yi(:,4) + shg(:,1,1) * yl(:,1,4)
276 & + shg(:,2,1) * yl(:,2,4)
277 & + shg(:,3,1) * yl(:,3,4)
278 & + shg(:,4,1) * yl(:,4,4)
280 g1yi(:,5) = g1yi(:,5) + shg(:,1,1) * yl(:,1,5)
281 & + shg(:,2,1) * yl(:,2,5)
282 & + shg(:,3,1) * yl(:,3,5)
283 & + shg(:,4,1) * yl(:,4,5)
285 g2yi(:,1) = g2yi(:,1) + shg(:,1,2) * yl(:,1,1)
286 & + shg(:,2,2) * yl(:,2,1)
287 & + shg(:,3,2) * yl(:,3,1)
288 & + shg(:,4,2) * yl(:,4,1)
290 g2yi(:,2) = g2yi(:,2) + shg(:,1,2) * yl(:,1,2)
291 & + shg(:,2,2) * yl(:,2,2)
292 & + shg(:,3,2) * yl(:,3,2)
293 & + shg(:,4,2) * yl(:,4,2)
295 g2yi(:,3) = g2yi(:,3) + shg(:,1,2) * yl(:,1,3)
296 & + shg(:,2,2) * yl(:,2,3)
297 & + shg(:,3,2) * yl(:,3,3)
298 & + shg(:,4,2) * yl(:,4,3)
300 g2yi(:,4) = g2yi(:,4) + shg(:,1,2) * yl(:,1,4)
301 & + shg(:,2,2) * yl(:,2,4)
302 & + shg(:,3,2) * yl(:,3,4)
303 & + shg(:,4,2) * yl(:,4,4)
305 g2yi(:,5) = g2yi(:,5) + shg(:,1,2) * yl(:,1,5)
306 & + shg(:,2,2) * yl(:,2,5)
307 & + shg(:,3,2) * yl(:,3,5)
308 & + shg(:,4,2) * yl(:,4,5)
310 g3yi(:,1) = g3yi(:,1) + shg(:,1,3) * yl(:,1,1)
311 & + shg(:,2,3) * yl(:,2,1)
312 & + shg(:,3,3) * yl(:,3,1)
313 & + shg(:,4,3) * yl(:,4,1)
315 g3yi(:,2) = g3yi(:,2) + shg(:,1,3) * yl(:,1,2)
316 & + shg(:,2,3) * yl(:,2,2)
317 & + shg(:,3,3) * yl(:,3,2)
318 & + shg(:,4,3) * yl(:,4,2)
320 g3yi(:,3) = g3yi(:,3) + shg(:,1,3) * yl(:,1,3)
321 & + shg(:,2,3) * yl(:,2,3)
322 & + shg(:,3,3) * yl(:,3,3)
323 & + shg(:,4,3) * yl(:,4,3)
325 g3yi(:,4) = g3yi(:,4) + shg(:,1,3) * yl(:,1,4)
326 & + shg(:,2,3) * yl(:,2,4)
327 & + shg(:,3,3) * yl(:,3,4)
328 & + shg(:,4,3) * yl(:,4,4)
330 g3yi(:,5) = g3yi(:,5) + shg(:,1,3) * yl(:,1,5)
331 & + shg(:,2,3) * yl(:,2,5)
332 & + shg(:,3,3) * yl(:,3,5)
333 & + shg(:,4,3) * yl(:,4,5)
337 g1yi(:,1) = g1yi(:,1) + shg(:,n,1) * yl(:,n,1)
338 g1yi(:,2) = g1yi(:,2) + shg(:,n,1) * yl(:,n,2)
339 g1yi(:,3) = g1yi(:,3) + shg(:,n,1) * yl(:,n,3)
340 g1yi(:,4) = g1yi(:,4) + shg(:,n,1) * yl(:,n,4)
341 g1yi(:,5) = g1yi(:,5) + shg(:,n,1) * yl(:,n,5)
343 g2yi(:,1) = g2yi(:,1) + shg(:,n,2) * yl(:,n,1)
344 g2yi(:,2) = g2yi(:,2) + shg(:,n,2) * yl(:,n,2)
345 g2yi(:,3) = g2yi(:,3) + shg(:,n,2) * yl(:,n,3)
346 g2yi(:,4) = g2yi(:,4) + shg(:,n,2) * yl(:,n,4)
347 g2yi(:,5) = g2yi(:,5) + shg(:,n,2) * yl(:,n,5)
349 g3yi(:,1) = g3yi(:,1) + shg(:,n,3) * yl(:,n,1)
350 g3yi(:,2) = g3yi(:,2) + shg(:,n,3) * yl(:,n,2)
351 g3yi(:,3) = g3yi(:,3) + shg(:,n,3) * yl(:,n,3)
352 g3yi(:,4) = g3yi(:,4) + shg(:,n,3) * yl(:,n,4)
353 g3yi(:,5) = g3yi(:,5) + shg(:,n,3) * yl(:,n,5)
378 divqi(:,1) = divqi(:,1) + shg(:,n,1)*ql(:,n,1 )
379 & + shg(:,n,2)*ql(:,n,5 )
380 & + shg(:,n,3)*ql(:,n,9 )
382 divqi(:,2) = divqi(:,2) + shg(:,n,1)*ql(:,n,2 )
383 & + shg(:,n,2)*ql(:,n,6 )
384 & + shg(:,n,3)*ql(:,n,10)
386 divqi(:,3) = divqi(:,3) + shg(:,n,1)*ql(:,n,3 )
387 & + shg(:,n,2)*ql(:,n,7 )
388 & + shg(:,n,3)*ql(:,n,11)
390 divqi(:,4) = divqi(:,4) + shg(:,n,1)*ql(:,n,4 )
391 & + shg(:,n,2)*ql(:,n,8 )
392 & + shg(:,n,3)*ql(:,n,12)
401 & + shg(:,n,1)*ql(:,n,idflx-2)
402 & + shg(:,n,2)*ql(:,n,idflx-1)
403 & + shg(:,n,3)*ql(:,n,idflx)
416 gyti(i,1) = gyti(i,1) + shg(i,n,1) * ycl(i,n,6)
417 gyti(i,2) = gyti(i,2) + shg(i,n,2) * ycl(i,n,6)
418 gyti(i,3) = gyti(i,3) + shg(i,n,3) * ycl(i,n,6)
498 & u3, shg, dwl, argument
560 & shg(npro,nshl,nsd), dxidx(npro,nsd,nsd),
660 & shg, WdetJ)
679 g1yi(:,2) = g1yi(:,2) + shg(:,n,1) * ycl(:,n,2)
680 g1yi(:,3) = g1yi(:,3) + shg(:,n,1) * ycl(:,n,3)
681 g1yi(:,4) = g1yi(:,4) + shg(:,n,1) * ycl(:,n,4)
685 g2yi(:,2) = g2yi(:,2) + shg(:,n,2) * ycl(:,n,2)
686 g2yi(:,3) = g2yi(:,3) + shg(:,n,2) * ycl(:,n,3)
687 g2yi(:,4) = g2yi(:,4) + shg(:,n,2) * ycl(:,n,4)
691 g3yi(:,2) = g3yi(:,2) + shg(:,n,3) * ycl(:,n,2)
692 g3yi(:,3) = g3yi(:,3) + shg(:,n,3) * ycl(:,n,3)
693 g3yi(:,4) = g3yi(:,4) + shg(:,n,3) * ycl(:,n,4)
710 g1yti(:) = g1yti(:) + shg(:,n,1) * ycl(:,n,id)
711 g2yti(:) = g2yti(:) + shg(:,n,2) * ycl(:,n,id)
712 g3yti(:) = g3yti(:) + shg(:,n,3) * ycl(:,n,id)