Lines Matching defs:e3gijd
1397 subroutine e3gijd( dxidx, gijd ) subroutine
1401 real*8 dxidx(npro,nsd,nsd), gijd(npro,6),
1447 1 + dxidx(:,2,1) * tmp2
1448 2 + dxidx(:,3,1) * tmp3
1454 1 + dxidx(:,2,1) * tmp2
1455 2 + dxidx(:,3,1) * tmp3
1458 1 + dxidx(:,2,2) * tmp2
1459 2 + dxidx(:,3,2) * tmp3
1465 1 + dxidx(:,2,1) * tmp2
1466 2 + dxidx(:,3,1) * tmp3
1469 1 + dxidx(:,2,2) * tmp2
1470 2 + dxidx(:,3,2) * tmp3
1473 1 + dxidx(:,2,3) * tmp2
1474 2 + dxidx(:,3,3) * tmp3