Lines Matching refs:dxdxi
9 & u3(npro), dxdxi(npro,nsd,nsd),
34 dxdxi = zero
37 dxdxi(:,1,1) = dxdxi(:,1,1) + xl(:,n,1) * shgl(1,n,intp)
38 dxdxi(:,1,2) = dxdxi(:,1,2) + xl(:,n,1) * shgl(2,n,intp)
39 dxdxi(:,1,3) = dxdxi(:,1,3) + xl(:,n,1) * shgl(3,n,intp)
40 dxdxi(:,2,1) = dxdxi(:,2,1) + xl(:,n,2) * shgl(1,n,intp)
41 dxdxi(:,2,2) = dxdxi(:,2,2) + xl(:,n,2) * shgl(2,n,intp)
42 dxdxi(:,2,3) = dxdxi(:,2,3) + xl(:,n,2) * shgl(3,n,intp)
43 dxdxi(:,3,1) = dxdxi(:,3,1) + xl(:,n,3) * shgl(1,n,intp)
44 dxdxi(:,3,2) = dxdxi(:,3,2) + xl(:,n,3) * shgl(2,n,intp)
45 dxdxi(:,3,3) = dxdxi(:,3,3) + xl(:,n,3) * shgl(3,n,intp)
50 dxidx(:,1,1) = dxdxi(:,2,2) * dxdxi(:,3,3)
51 & - dxdxi(:,3,2) * dxdxi(:,2,3)
52 dxidx(:,1,2) = dxdxi(:,3,2) * dxdxi(:,1,3)
53 & - dxdxi(:,1,2) * dxdxi(:,3,3)
54 dxidx(:,1,3) = dxdxi(:,1,2) * dxdxi(:,2,3)
55 & - dxdxi(:,1,3) * dxdxi(:,2,2)
56 tmp = one / ( dxidx(:,1,1) * dxdxi(:,1,1)
57 & + dxidx(:,1,2) * dxdxi(:,2,1)
58 & + dxidx(:,1,3) * dxdxi(:,3,1) )
62 dxidx(:,2,1) = (dxdxi(:,2,3) * dxdxi(:,3,1)
63 & - dxdxi(:,2,1) * dxdxi(:,3,3)) * tmp
64 dxidx(:,2,2) = (dxdxi(:,1,1) * dxdxi(:,3,3)
65 & - dxdxi(:,3,1) * dxdxi(:,1,3)) * tmp
66 dxidx(:,2,3) = (dxdxi(:,2,1) * dxdxi(:,1,3)
67 & - dxdxi(:,1,1) * dxdxi(:,2,3)) * tmp
68 dxidx(:,3,1) = (dxdxi(:,2,1) * dxdxi(:,3,2)
69 & - dxdxi(:,2,2) * dxdxi(:,3,1)) * tmp
70 dxidx(:,3,2) = (dxdxi(:,3,1) * dxdxi(:,1,2)
71 & - dxdxi(:,1,1) * dxdxi(:,3,2)) * tmp
72 dxidx(:,3,3) = (dxdxi(:,1,1) * dxdxi(:,2,2)
73 & - dxdxi(:,1,2) * dxdxi(:,2,1)) * tmp