Searched defs:e3gijd (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/compressible/ |
| H A D | e3tau.f | 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
[all …]
|
| /phasta/phSolver/incompressible/ |
| H A D | e3stab.f | 396 subroutine e3gijd( dxidx, gijd ) subroutine
400 real*8 dxidx(npro,nsd,nsd), gijd(npro,6),
401 & tmp1(npro), tmp2(npro),
402 & tmp3(npro)
|