Lines Matching refs:gam
582 …lar *uxm, PetscScalar *px, PetscScalar *utx, PetscScalar *ubx, PetscScalar *gam, PetscScalar *rho1) in riemannsolver() argument
596 *gam = *gaml; in riemannsolver()
620 *gam = cvmgm_(gaml, gamr, &sgn0); in riemannsolver()
621 gasc1 = *gam - 1.; in riemannsolver()
622 gasc2 = (*gam + 1.) * .5; in riemannsolver()
623 gasc3 = gasc2 / *gam; in riemannsolver()
624 gasc4 = 1. / (*gam - 1.); in riemannsolver()
625 c0 = PetscSqrtScalar(*gam * p0 / r0); in riemannsolver()
627 w0 = *gam * r0 * p0 * (gasc3 * streng / p0 + 1.); in riemannsolver()
630 d__2 = -1. / *gam; in riemannsolver()
634 cstar = PetscSqrtScalar(*gam * pstar / rstar); in riemannsolver()
647 s = p0 / PetscPowScalar(r0, *gam); in riemannsolver()
648 d__1 = cx * cx / (*gam * s); in riemannsolver()
650 *px = cx * cx * *rx / *gam; in riemannsolver()