Lines Matching refs:dxidx
11 & strnrm(npro,maxsh), dxidx(npro,nsd,nsd),
56 dxidx(:,1,1) = dxdxi(:,2,2) * dxdxi(:,3,3)
58 dxidx(:,1,2) = dxdxi(:,3,2) * dxdxi(:,1,3)
60 dxidx(:,1,3) = dxdxi(:,1,2) * dxdxi(:,2,3)
62 tmp = one / ( dxidx(:,1,1) * dxdxi(:,1,1)
63 & + dxidx(:,1,2) * dxdxi(:,2,1)
64 & + dxidx(:,1,3) * dxdxi(:,3,1) )
65 dxidx(:,1,1) = dxidx(:,1,1) * tmp
66 dxidx(:,1,2) = dxidx(:,1,2) * tmp
67 dxidx(:,1,3) = dxidx(:,1,3) * tmp
68 dxidx(:,2,1) = (dxdxi(:,2,3) * dxdxi(:,3,1)
70 dxidx(:,2,2) = (dxdxi(:,1,1) * dxdxi(:,3,3)
72 dxidx(:,2,3) = (dxdxi(:,2,1) * dxdxi(:,1,3)
74 dxidx(:,3,1) = (dxdxi(:,2,1) * dxdxi(:,3,2)
76 dxidx(:,3,2) = (dxdxi(:,3,1) * dxdxi(:,1,2)
78 dxidx(:,3,3) = (dxdxi(:,1,1) * dxdxi(:,2,2)
97 shg(:,n,1) = (shgl(1,n,intp) * dxidx(:,1,1)
98 & + shgl(2,n,intp) * dxidx(:,2,1)
99 & + shgl(3,n,intp) * dxidx(:,3,1))
100 shg(:,n,2) = (shgl(1,n,intp) * dxidx(:,1,2)
101 & + shgl(2,n,intp) * dxidx(:,2,2)
102 & + shgl(3,n,intp) * dxidx(:,3,2))
103 shg(:,n,3) = (shgl(1,n,intp) * dxidx(:,1,3)
104 & + shgl(2,n,intp) * dxidx(:,2,3)
105 & + shgl(3,n,intp) * dxidx(:,3,3))