Lines Matching refs:dist2w
226 & dist2w, vort, gVnrm, con,
260 & dist2w (npro), shape(npro,nshl),
306 dist2w(i)=min(dmax,dist2w(i))
308 rd=sclrm(i)*saKappaP2Inv/(dist2w(i)**2*gVnrm(i)+1.0d-12)
310 dist2w(i)=dist2w(i)-fd*max(zero,dist2w(i)-dmax)
315 elDwl(:)=elDwl(:)+dist2w(:)
324 Stilde = vort + sclrm*fv2/(saKappa*dist2w)**2!unfix
327 r(:) = sclrm(:)/Stilde(:)/(saKappa*dist2w(:))**2
368 & -(saCw1*fw - saCb1*ft2/saKappa**2)*(sclrm/dist2w/dist2w)
371 & -(saCw1*fw - saCb1*ft2/saKappa**2)*(sclrm/dist2w/dist2w)
392 stp = stp/(saKappa*dist2w)**2
395 rp(:) = rp(:)/(saKappa*dist2w(:)*Stilde(:))**2
406 & -(saCw1*fw - saCb1*ft2/saKappa**2)*(sclrm/dist2w)**2
409 & -saCw1*(fwp*sclrm**2 + 2*sclrm*fw)/dist2w**2