Lines Matching refs:g3

75 void g3_uu_3d_private(PetscScalar g3[], const PetscReal mu, const PetscReal lambda)  in g3_uu_3d_private()  argument
78 g3[0] += lambda; in g3_uu_3d_private()
79 g3[0] += mu; in g3_uu_3d_private()
80 g3[0] += mu; in g3_uu_3d_private()
81 g3[4] += lambda; in g3_uu_3d_private()
82 g3[8] += lambda; in g3_uu_3d_private()
83 g3[10] += mu; in g3_uu_3d_private()
84 g3[12] += mu; in g3_uu_3d_private()
85 g3[20] += mu; in g3_uu_3d_private()
86 g3[24] += mu; in g3_uu_3d_private()
87 g3[28] += mu; in g3_uu_3d_private()
88 g3[30] += mu; in g3_uu_3d_private()
89 g3[36] += lambda; in g3_uu_3d_private()
90 g3[40] += lambda; in g3_uu_3d_private()
91 g3[40] += mu; in g3_uu_3d_private()
92 g3[40] += mu; in g3_uu_3d_private()
93 g3[44] += lambda; in g3_uu_3d_private()
94 g3[50] += mu; in g3_uu_3d_private()
95 g3[52] += mu; in g3_uu_3d_private()
96 g3[56] += mu; in g3_uu_3d_private()
97 g3[60] += mu; in g3_uu_3d_private()
98 g3[68] += mu; in g3_uu_3d_private()
99 g3[70] += mu; in g3_uu_3d_private()
100 g3[72] += lambda; in g3_uu_3d_private()
101 g3[76] += lambda; in g3_uu_3d_private()
102 g3[80] += lambda; in g3_uu_3d_private()
103 g3[80] += mu; in g3_uu_3d_private()
104 g3[80] += mu; in g3_uu_3d_private()
113 if (k == l && i == j) g3[IDX(i, j, k, l)] += lambda; in g3_uu_3d_private()
114 if (i == k && j == l) g3[IDX(i, j, k, l)] += mu; in g3_uu_3d_private()
115 if (i == l && j == k) g3[IDX(i, j, k, l)] += mu; in g3_uu_3d_private()
126 …Shift, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar g3[]) in g3_uu_3d_alpha() argument
139 g3_uu_3d_private(g3, mu, lambda); in g3_uu_3d_alpha()
142 …Shift, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar g3[]) in g3_uu_3d() argument
144 g3_uu_3d_private(g3, s_mu, s_lambda); in g3_uu_3d()
147 …Shift, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar g3[]) in g3_lap() argument
150 for (d = 0; d < dim; ++d) g3[d * dim + d] = 1.0; in g3_lap()
153 …Shift, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar g3[]) in g3_lap_alpha() argument
163 for (int d = 0; d < dim; ++d) g3[d * dim + d] = lambda; in g3_lap_alpha()