Searched refs:VISC_DISL (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/snes/tutorials/ |
| H A D | ex30.c | 60 #define VISC_DISL 2 macro
437 } else if (iVisc == VISC_DISL) { in Viscosity()
474 if (param->ivisc == VISC_DIFN || param->ivisc >= VISC_DISL) { /* viscosity is T-dependent */ in XMomentumResidual()
480 if (param->ivisc >= VISC_DISL) { /* olivine dislocation creep */ in XMomentumResidual()
527 if (param->ivisc == VISC_DIFN || param->ivisc >= VISC_DISL) { /* viscosity is T-dependent */ in ZMomentumResidual()
533 if (param->ivisc >= VISC_DISL) { /* olivine dislocation creep */ in ZMomentumResidual()
691 if (ivisc >= VISC_DISL) epsC = CalcSecInv(x, i, j, CELL_CENTER, user); in XNormalStress()
702 if (ivisc >= VISC_DISL) epsC = CalcSecInv(x, i, j, CELL_CORNER, user); in XNormalStress()
731 if (ivisc >= VISC_DISL) epsC = CalcSecInv(x, i, j, CELL_CENTER, user); in ZNormalStress()
741 if (ivisc >= VISC_DISL) epsC = CalcSecInv(x, i, j, CELL_CORNER, user); in ZNormalStress()
[all …]
|