Lines Matching refs:tmp
255 & dP2Inv, sixth, tmp, tmp1, p, dp, local
390 tmp = 1.0 / ( chiP3 + saCv1P3 )
391 fv1 = chiP3 * tmp
392 fv1p = 3.0 * viscInv * saCv1P3 * chiP2 * tmp**2
394 tmp = 1.0 / (1.0 + chi * fv1)
395 fv2 = 1.0 - chi * tmp
396 fv2p = (chiP2 * fv1p - viscInv) * tmp**2
399 tmp = SclrNN * k2d2Inv !eOkdP2
400 st = s + fv2 * tmp
401 stp = ep*k2d2Inv * fv2 + tmp*fv2p
406 r = tmp / st
411 tmp = 1.0 + saCw2 * (rP5 - 1.0)
412 g = r * tmp
413 gp = rp * (tmp + 5.0 * saCw2 * rP5)
416 tmp = 1.0 / (gP6 + saCw3P6)
417 tmp1 = ( (1.0 + saCw3P6) * tmp ) ** sixth
419 fwp = gp * tmp1 * saCw3P6 * tmp
426 tmp = zero
427 if(prat .lt. zero) tmp=prat
428 if(stp .lt. zero) tmp=tmp+SaCb1*stp*SclrNN
429 if(fw .gt. zero) tmp=tmp-two*tmp1*fw
430 if(fwp .gt. zero) tmp=tmp-tmp1*SclrNN*fwp
432 srcL(e) = -1.0*tmp
445 tmp = saCb2 * saSigmaInv
446 uMod(:,1) = u1(:) - tmp * gradS(:,1)
447 uMod(:,2) = u2(:) - tmp * gradS(:,2)
448 uMod(:,3) = u3(:) - tmp * gradS(:,3)