Home
last modified time | relevance | path

Searched refs:Swork (Results 1 – 2 of 2) sorted by relevance

/libCEED/examples/solids/qfunctions/
H A Dfinite-strain-neo-hookean.h98 …S(const CeedScalar lambda, const CeedScalar mu, const CeedScalar grad_u[3][3], CeedScalar Swork[6], in commonFS()
137 Swork[m] = (lambda * (*logJ)) * Cinvwork[m]; in commonFS()
138 for (CeedInt n = 0; n < 3; n++) Swork[m] += mu * C_inv[indj[m]][n] * E2[n][indk[m]]; in commonFS()
214 CeedScalar Swork[6], Cinvwork[6], logJ; in ElasFSResidual_NH() local
220 commonFS(lambda, mu, tempgradu, Swork, Cinvwork, &logJ); in ElasFSResidual_NH()
224 {Swork[0], Swork[5], Swork[4]}, in ElasFSResidual_NH()
225 {Swork[5], Swork[1], Swork[3]}, in ElasFSResidual_NH()
226 {Swork[4], Swork[3], Swork[2]} in ElasFSResidual_NH()
310 CeedScalar Swork[6], Cinvwork[6], logJ; in ElasFSJacobian_NH() local
316 commonFS(lambda, mu, tempgradu, Swork, Cinvwork, &logJ); in ElasFSJacobian_NH()
[all …]
H A Dfinite-strain-mooney-rivlin.h103 … CeedScalar Swork[6], CeedScalar Cwork[6], CeedScalar Cinvwork[6], CeedScalar *logJ) { in commonFSMR()
148 …Swork[i] = (lambda * *logJ - mu_1 - 2 * mu_2) * Cinvwork[i] + (mu_1 + mu_2 * I_1) * (i < 3) // id… in commonFSMR()
222 CeedScalar Swork[6], Cwork[6], Cinvwork[6], logJ; in ElasFSResidual_MR() local
223 commonFSMR(mu_1, mu_2, lambda, tempgradu, Swork, Cwork, Cinvwork, &logJ); in ElasFSResidual_MR()
227 {Swork[0], Swork[5], Swork[4]}, in ElasFSResidual_MR()
228 {Swork[5], Swork[1], Swork[3]}, in ElasFSResidual_MR()
229 {Swork[4], Swork[3], Swork[2]} in ElasFSResidual_MR()
315 CeedScalar Swork[6], Cwork[6], Cinvwork[6], logJ; in ElasFSJacobian_MR() local
316 commonFSMR(mu_1, mu_2, lambda, tempgradu, Swork, Cwork, Cinvwork, &logJ); in ElasFSJacobian_MR()
391 {Swork[0], Swork[5], Swork[4]}, in ElasFSJacobian_MR()
[all …]