Lines Matching refs:dxdxi
10 & u3(npro), dxdxi(npro,nsd,nsd),
40 dxdxi = zero
43 dxdxi(:,1,1) = dxdxi(:,1,1) + xl(:,n,1) * shgl(1,n,intp)
44 dxdxi(:,1,2) = dxdxi(:,1,2) + xl(:,n,1) * shgl(2,n,intp)
45 dxdxi(:,1,3) = dxdxi(:,1,3) + xl(:,n,1) * shgl(3,n,intp)
46 dxdxi(:,2,1) = dxdxi(:,2,1) + xl(:,n,2) * shgl(1,n,intp)
47 dxdxi(:,2,2) = dxdxi(:,2,2) + xl(:,n,2) * shgl(2,n,intp)
48 dxdxi(:,2,3) = dxdxi(:,2,3) + xl(:,n,2) * shgl(3,n,intp)
49 dxdxi(:,3,1) = dxdxi(:,3,1) + xl(:,n,3) * shgl(1,n,intp)
50 dxdxi(:,3,2) = dxdxi(:,3,2) + xl(:,n,3) * shgl(2,n,intp)
51 dxdxi(:,3,3) = dxdxi(:,3,3) + xl(:,n,3) * shgl(3,n,intp)
56 dxidx(:,1,1) = dxdxi(:,2,2) * dxdxi(:,3,3)
57 & - dxdxi(:,3,2) * dxdxi(:,2,3)
58 dxidx(:,1,2) = dxdxi(:,3,2) * dxdxi(:,1,3)
59 & - dxdxi(:,1,2) * dxdxi(:,3,3)
60 dxidx(:,1,3) = dxdxi(:,1,2) * dxdxi(:,2,3)
61 & - dxdxi(:,1,3) * dxdxi(:,2,2)
62 tmp = one / ( dxidx(:,1,1) * dxdxi(:,1,1)
63 & + dxidx(:,1,2) * dxdxi(:,2,1)
64 & + dxidx(:,1,3) * dxdxi(:,3,1) )
68 dxidx(:,2,1) = (dxdxi(:,2,3) * dxdxi(:,3,1)
69 & - dxdxi(:,2,1) * dxdxi(:,3,3)) * tmp
70 dxidx(:,2,2) = (dxdxi(:,1,1) * dxdxi(:,3,3)
71 & - dxdxi(:,3,1) * dxdxi(:,1,3)) * tmp
72 dxidx(:,2,3) = (dxdxi(:,2,1) * dxdxi(:,1,3)
73 & - dxdxi(:,1,1) * dxdxi(:,2,3)) * tmp
74 dxidx(:,3,1) = (dxdxi(:,2,1) * dxdxi(:,3,2)
75 & - dxdxi(:,2,2) * dxdxi(:,3,1)) * tmp
76 dxidx(:,3,2) = (dxdxi(:,3,1) * dxdxi(:,1,2)
77 & - dxdxi(:,1,1) * dxdxi(:,3,2)) * tmp
78 dxidx(:,3,3) = (dxdxi(:,1,1) * dxdxi(:,2,2)
79 & - dxdxi(:,1,2) * dxdxi(:,2,1)) * tmp