Searched refs:B_s (Results 1 – 1 of 1) sorted by relevance
730 PetscReal B_s = 0.0; in mandel_initial_u() local734 …B_s += (PetscCosReal(alpha_n) / (alpha_n - PetscSinReal(alpha_n) * PetscCosReal(alpha_n))) * Petsc… in mandel_initial_u()736 u[0] = ((P_0 * nu) / (2.0 * G * a) - (P_0 * nu_u) / (G * a) * A_s) * x[0] + P_0 / G * B_s; in mandel_initial_u()