Lines Matching refs:dpstar
418 static PetscScalar gascl4, gascr4, cstarl, dpstar, cstarr; in riem1mdt() local
485 dpstar = zl * zr * (ustarr - ustarl) / (zl + zr); in riem1mdt()
486 *pstar -= dpstar; in riem1mdt()
488 if (PetscAbsScalar(dpstar) / PetscRealPart(*pstar) <= 1e-8) { in riem1mdt()
508 dpstar = zl * zr * (ustarr - ustarl) / (zl + zr); in riem1mdt()
509 *pstar -= dpstar; in riem1mdt()
511 if (PetscAbsScalar(dpstar) / PetscRealPart(*pstar) <= 1e-8) { in riem1mdt()
528 dpstar = zl * zr * (ustarr - ustarl) / (zl + zr); in riem1mdt()
529 *pstar -= dpstar; in riem1mdt()
531 if (PetscAbsScalar(dpstar) / PetscRealPart(*pstar) <= 1e-8) { in riem1mdt()
551 dpstar = zl * zr * (ustarr - ustarl) / (zl + zr); in riem1mdt()
552 *pstar -= dpstar; in riem1mdt()
554 if (PetscAbsScalar(dpstar) / PetscRealPart(*pstar) <= 1e-8) { in riem1mdt()