Searched refs:alpha_t (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ts/tutorials/ |
| H A D | ex10.c | 115 …PetscScalar Em, alpha, alpha_t, T = n->T, T_t = 1., chi = rd->I_H / (rd->k * T), chi_t = -chi / T … in RDMaterialEnergy_Saha() local
117 QuadraticSolve(a, a_t, b, b_t, c, c_t, &alpha, &alpha_t); /* Solve Eq 7 for alpha */ in RDMaterialEnergy_Saha()
122 dEm->T = Em / T * T_t + rd->k * T / rd->m_p * (1.5 * alpha_t + alpha_t * chi + alpha * chi_t); in RDMaterialEnergy_Saha()
128 …PetscScalar alpha, alpha_t, T = n->T, T_t = 1., chi = -0.3 / T, chi_t = -chi / T * T_t, a = 1., a_… in RDMaterialEnergy_Reduced() local
129 QuadraticSolve(a, a_t, b, b_t, c, c_t, &alpha, &alpha_t); in RDMaterialEnergy_Reduced()
133 dEm->T = alpha_t * T + (1. + alpha) * T_t + 0.3 * alpha_t; in RDMaterialEnergy_Reduced()
|