Searched refs:AR3 (Results 1 – 1 of 1) sorted by relevance
224 subroutine e3eig2 (u, c, AR1, AR2, AR3, argument265 & AR3(npro), rlam(npro,nflow),273 offd = (AR2 + AR3) * pt5 * c**2276 rlam(:,2) = AR1 * u**2 + AR3 * c**2