Lines Matching refs:aci
1 subroutine e3massr (aci, dui, ri, argument
27 dimension aci(npro,nflow), dui(npro,nflow),
37 & + A0(:,1,1)*aci(:,1)
41 & + A0(:,1,5)*aci(:,5)
44 & + A0(:,2,1)*aci(:,1)
45 & + A0(:,2,2)*aci(:,2)
48 & + A0(:,2,5)*aci(:,5)
51 & + A0(:,3,1)*aci(:,1)
53 & + A0(:,3,3)*aci(:,3)
55 & + A0(:,3,5)*aci(:,5)
58 & + A0(:,4,1)*aci(:,1)
61 & + A0(:,4,4)*aci(:,4)
62 & + A0(:,4,5)*aci(:,5)
65 & + A0(:,5,1)*aci(:,1)
66 & + A0(:,5,2)*aci(:,2)
67 & + A0(:,5,3)*aci(:,3)
68 & + A0(:,5,4)*aci(:,4)
69 & + A0(:,5,5)*aci(:,5)