Searched refs:dpstar (Results 1 – 1 of 1) sorted by relevance
418 static PetscScalar gascl4, gascr4, cstarl, dpstar, cstarr; in riem1mdt() local485 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()[all …]