43 T c_u = descriptors::c<L>(iPop,0)*u[0] + descriptors::c<L>(iPop,1)*u[1] + descriptors::c<L>(iPop,2)*u[2];;
51 T uSqr = u[0]*u[0] + u[1]*u[1] + u[2]*u[2];
55 T powUx = u[0]*u[0]*u[0]*u[0]*u[0];
56 T powUy = u[1]*u[1]*u[1]*u[1]*u[1];
57 T powUz = u[2]*u[2]*u[2]*u[2]*u[2];
59 T C = descriptors::c<L>(iPop,0) * powUx + descriptors::c<L>(iPop,1) * powUy
60 + descriptors::c<L>(iPop,2) * powUz;
66 T E = powUx + powUy + powUz;
72 T F = descriptors::c<L>(iPop,0) * powUx + descriptors::c<L>(iPop,1) * powUy + descriptors::c<L>(iPop,2) * powUz;
74 return descriptors::t<T,L>(iPop) * rho *
76 + c_u*(C*(T)81/(T)20 + uSqr2*(T)27/(T)8 - uSqr*(T)9/(T)2
77 - E*(T)81/(T)24 - uSqr3*(T)81/(T)48 + (T)3)
79 + c_u2*(uSqr2*(T)81/(T)16 - uSqr*(T)27/(T)4
80 + C*(T)243/(T)40 + (T)9/(T)2)
82 + c_u3*(uSqr2*(T)243/(T)48 - uSqr*(T)81/(T)12 + (T)27/(T)6)
84 - c_u4*uSqr*(T)243/(T)48
87 - c_u5*uSqr*(T)729/(T)240
92 + c_u7*(T)2187/(T)5040
96 + C*(T)27/(T)20 - uSqr3*(T)27/(T)48 - E*(T)27/(T)24
97 - F*(T)81/(T)56 - uSqr*(T)3/(T)2 + uSqr2*(T)9/(T)8
99 - descriptors::t<T,L>(iPop);