Lines Matching refs:rmu
1 subroutine getDiff( dwl,yl, shape, xmudmi, xl, rmu, rho) argument
9 real*8 yl(npro,nshl,ndof), rmu(npro), xmudmi(npro,ngauss),
38 rmu = datmat(1,2,1)
65 rmu = datmat(1,2,2) + (datmat(1,2,1)-datmat(1,2,2))*prop_blend
86 rmu = rmu + xmudmi(:,intp)
89 call AddEddyViscSA(yl, shape, rmu)
92 call AddEddyViscKE(yl, dwl, shape, rho, sigmaInv, rmu)
97 call EviscDESIC (xl,rmu,xmudmi)
191 subroutine AddEddyViscSA(yl,shape,rmu)
201 & rmu
240 rmu(e) = rmu(e) + abs(evisc)
267 xki = abs(Turb)/rmu(e)
270 rmu(e) = rmu(e) + fv1*abs(Turb)
278 subroutine AddSAVar(yl,shape,rmu) argument
288 & rmu
328 rmu(e)=datmat(1,2,1)
329 rmu(e) = (rmu(e) + abs(savar)) * saSigmaInv
336 subroutine AddEddyViscKE(yl, dwl, shape, rho, sigmaInv, rmu) argument
349 & rmu
371 Rey = sqrt(kay) * dw * rho(e) / rmu(e)
372 Ret = kay*kay * epsInv * rho(e) / rmu(e)
380 rmu(e) = rmu(e) + eviscKE*sigmaInv