Lines Matching refs:u1
680 & u1(npro), u2(npro),
761 u1=zero
765 u1 = u1 + shp(i,intp)*yl(:,i,2)
773 fresli(:,i,1) = rho * u1 * shp(i,intp) !rho * u1 * WdetJ
779 fresli(:,i,6) = rho * u1 * u1 * shp(i,intp) !rho * u1 * u1 * WdetJ
782 fresli(:,i,9) = rho * u1 * u2 * shp(i,intp) !rho * u1 * u2 * WdetJ
783 fresli(:,i,10)= rho * u1 * u3 * shp(i,intp) !rho * u1 * u3 * WdetJ
834 & u1(npro), u2(npro),
999 u1=zero
1003 u1 = u1 + shp(i,intp)*yl(:,i,2)
1008 fresli(:,1) = fresli(:,22) * u1 !rho u1 * WdetJ
1012 fresli(:,4) = fresli(:,1) * u1 !rho u1 u1 *WdetJ