Searched refs:m31 (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/compressible/ |
| H A D | timeseries.f | 13 & m23(npro), m31(npro), m32(npro), m33(npro), local
95 m31(:)=al(:,2,3)+al(:,5,3)*zi0(:,2)+al(:,7,3)*zi0(:,3)
126 & m21*m13*m32+m31*m12*m23-m31*m13*m22
133 dzi0(:,2) = -detaij(:)*((m23(:)*m31(:)-m21(:)*m32(:))*
134 & r1(:) + (m11(:)*m33(:)-m13(:)*m31(:))*r2(:) +
136 dzi0(:,3) = -detaij(:)*((m21(:)*m32(:)-m22(:)*m31(:))*
137 & r1(:) + (m12(:)*m31(:)-m11(:)*m32(:))*r2(:) +
|
| /phasta/phSolver/incompressible/ |
| H A D | timeseries.f | 13 & m23(npro), m31(npro), m32(npro), m33(npro), local
95 m31(:)=al(:,2,3)+al(:,5,3)*zi0(:,2)+al(:,7,3)*zi0(:,3)
126 & m21*m13*m32+m31*m12*m23-m31*m13*m22
133 dzi0(:,2) = -detaij(:)*((m23(:)*m31(:)-m21(:)*m32(:))*
134 & r1(:) + (m11(:)*m33(:)-m13(:)*m31(:))*r2(:) +
136 dzi0(:,3) = -detaij(:)*((m21(:)*m32(:)-m22(:)*m31(:))*
137 & r1(:) + (m12(:)*m31(:)-m11(:)*m32(:))*r2(:) +
|