Lines Matching refs:mu
43 PetscScalar mu; /* shear modulus */ member
128 const PetscReal mu = PetscRealPart(constants[0]); in f0_elas_quadratic_u() local
131 for (PetscInt d = 0; d < dim - 1; ++d) f0[d] += 2.0 * mu; in f0_elas_quadratic_u()
132 f0[dim - 1] += 2.0 * lambda + 4.0 * mu; in f0_elas_quadratic_u()
201 const PetscReal mu = PetscRealPart(constants[0]); in f0_elas_trig_u() local
205 …0; d < dim; ++d) f0[d] += -(2.0 * mu + lambda) * fact * PetscSinReal(2.0 * PETSC_PI * x[d]) - (d <… in f0_elas_trig_u()
215 const PetscReal mu = PetscRealPart(param->mu); in axial_disp_u() local
219 … * lambda * lambda + 8. * lambda * mu + 4 * mu * mu) / (4 * mu * (3 * lambda * lambda + 5. * lambd… in axial_disp_u()
220 u[1] = 0.25 * lambda / mu / (lambda + mu) * N * x[1]; in axial_disp_u()
294 const PetscReal mu = PetscRealPart(constants[0]); in f1_elas_u() local
300 f1[c * dim + d] += mu * (u_x[c * dim + d] + u_x[d * dim + c]); in f1_elas_u()
332 const PetscReal mu = PetscRealPart(constants[0]); in g3_elas_uu() local
338 g3[((c * Nc + c) * dim + d) * dim + d] += mu; in g3_elas_uu()
339 g3[((c * Nc + d) * dim + d) * dim + c] += mu; in g3_elas_uu()
376 PetscCall(PetscBagRegisterScalar(bag, &p->mu, 1.0, "mu", "Shear Modulus, Pa")); in SetupParameters()
593 constants[0] = param->mu; /* shear modulus, Pa */ in SetupPrimalProblem()