Lines Matching refs:wN
360 PetscScalar uN, uS, uE, uW, wN, wS, wE, wW; in CalcSecInv() local
372 wN = x[j][i].w; in CalcSecInv()
394 wN = param->sb; in CalcSecInv()
397 wN = WInterp(x, i, j); in CalcSecInv()
405 wS = -wN; in CalcSecInv()
413 eps22 = (wN - wS) / grid->dz; in CalcSecInv()
570 PetscScalar uE, uW, wN, wS, dudx, dwdz; in ContinuityResidual() local
576 wN = x[j][i].w; in ContinuityResidual()
577 dwdz = (wN - wS) / grid->dz; in ContinuityResidual()
590 PetscScalar uE, uW, wN, wS; in EnergyResidual() local
608 wS = wN = param->sb; in EnergyResidual()
614 wN = x[j][i].w; in EnergyResidual()
623 fN = wN * TN * dx; in EnergyResidual()
632 …fN = (wN * (-x[j + 2][i].T + 5.0 * (x[j + 1][i].T + x[j][i].T) - x[j - 1][i].T) / 8.0 - PetscAbsSc… in EnergyResidual()
722 PetscScalar pC, wN, wS, z_scale; in ZNormalStress() local
733 wN = x[j][i].w; in ZNormalStress()
743 if (i == j) wN = param->sb; in ZNormalStress()
744 else wN = WInterp(x, i, j); in ZNormalStress()
749 return 2.0 * etaC * (wN - wS) / dz - pC; in ZNormalStress()