Lines Matching refs:TC
682 PetscScalar epsC = 0.0, etaC, TC, uE, uW, pC, z_scale; in XNormalStress() local
690 TC = param->potentialT * x[j][i].T * PetscExpScalar((j - 0.5) * dz * z_scale); in XNormalStress()
692 etaC = Viscosity(TC, epsC, dz * j, param); in XNormalStress()
701 TC = param->potentialT * TInterp(x, i, j) * PetscExpScalar(j * dz * z_scale); in XNormalStress()
703 etaC = Viscosity(TC, epsC, dz * (j + 0.5), param); in XNormalStress()
721 PetscScalar epsC = 0.0, etaC, TC; in ZNormalStress() local
730 TC = param->potentialT * x[j][i].T * PetscExpScalar((j - 0.5) * dz * z_scale); in ZNormalStress()
732 etaC = Viscosity(TC, epsC, dz * j, param); in ZNormalStress()
740 TC = param->potentialT * TInterp(x, i, j) * PetscExpScalar(j * dz * z_scale); in ZNormalStress()
742 etaC = Viscosity(TC, epsC, dz * (j + 0.5), param); in ZNormalStress()
1099 PetscReal eps, /* dx,*/ dz, T, epsC, TC; in ViscosityField() local
1127 …TC = PetscRealPart(param->potentialT * TInterp(x, i, j) * PetscExpScalar(j * dz * param->z_scale)); in ViscosityField()
1129 TC = T; in ViscosityField()
1137 v[j][i].T = Viscosity(TC, epsC, dz * j, param); in ViscosityField()