Lines Matching refs:friction
267 } friction; member
360 if (thi->friction.irefgam == 0) { in THIFriction()
362 … thi->friction.irefgam = 1. / (0.5 * PetscSqr(thi->friction.refvel * units->meter / units->year)); in THIFriction()
363 …thi->friction.eps2 = 0.5 * PetscSqr(thi->friction.epsvel * units->meter / units->year) * thi->f… in THIFriction()
365 if (thi->friction.exponent == 0) { in THIFriction()
369 …*beta2 = rbeta2 * PetscPowReal(thi->friction.eps2 + gam * thi->friction.irefgam, thi->friction.ex… in THIFriction()
370 …*dbeta2 = thi->friction.exponent * *beta2 / (thi->friction.eps2 + gam * thi->friction.irefgam) * t… in THIFriction()
522 thi->friction.refvel = 100.; in THICreate()
523 thi->friction.epsvel = 1.; in THICreate()
525 …friction_refvel", "Reference velocity for sliding", "", thi->friction.refvel, &thi->friction.refve… in THICreate()
526 …ion_epsvel", "Regularization velocity for sliding", "", thi->friction.epsvel, &thi->friction.epsve… in THICreate()
529 thi->friction.exponent = (m - 1) / 2; in THICreate()