Lines Matching refs:rr
404 …ar *gamr, PetscScalar *rl, PetscScalar *pl, PetscScalar *uxl, PetscScalar *rr, PetscScalar *pr, Pe… in riem1mdt() argument
435 cr = PetscSqrtScalar(*gamr * *pr / *rr); in riem1mdt()
437 wr = *rr * cr; in riem1mdt()
481 *rstarr = *rr * PetscPowScalar(d__1, d__2); in riem1mdt()
504 *rstarr = *rr * PetscPowScalar(d__1, d__2); in riem1mdt()
569 *rstarr = ((*gamr + 1.) * pst + *gamr - 1.) / ((*gamr - 1.) * pst + *gamr + 1.) * *rr; in riem1mdt()
582 …utl, PetscScalar *ubl, PetscScalar *gaml, PetscScalar *rho1l, PetscScalar *rr, PetscScalar *uxr, P… in riemannsolver() argument
592 if (*rl == *rr && *pr == *pl && *uxl == *uxr && *gaml == *gamr) { in riemannsolver()
610 iwave = riem1mdt(gaml, gamr, rl, pl, uxl, rr, pr, uxr, &rstarl, &rstarr, &pstar, &ustar); in riemannsolver()
617 r0 = cvmgm_(rl, rr, &sgn0); in riemannsolver()
683 …static PetscScalar bn[3], fn, ft, tg[3], pl, rl, pm, pr, rr, xp, ubl, ubm, ubr, dtt, unm, tmp, utl… in godunovflux() local
725 rr = ur[0]; in godunovflux()
742 uxr /= rr; in godunovflux()
744 utr /= rr; in godunovflux()
746 ubr /= rr; in godunovflux()
763 pr = (gamma - 1.) * (ur[ndim + 1] - rr * .5 * (d__1 * d__1 + d__2 * d__2 + d__3 * d__3)); in godunovflux()
765 rho1r = rr; in godunovflux()
767 …iwave = riemannsolver(&xcen, &xp, &dtt, &rl, &uxl, &pl, &utl, &ubl, &gaml, &rho1l, &rr, &uxr, &pr,… in godunovflux()