Lines Matching full:temp
60 const PetscInt TEMP = 2; variable
737 f0[0] += -u_t[uOff[TEMP]] * S * p_th / PetscSqr(u[uOff[TEMP]]); in f0_conduct_q()
740 for (d = 0; d < dim; ++d) f0[0] += p_th / u[uOff[TEMP]] * u_x[uOff_x[VEL] + d * dim + d]; in f0_conduct_q()
743 …(d = 0; d < dim; ++d) f0[0] -= p_th / (u[uOff[TEMP]] * u[uOff[TEMP]]) * u[uOff[VEL] + d] * u_x[uOf… in f0_conduct_q()
769 const PetscReal rho = p_th / PetscRealPart(u[uOff[TEMP]]); in f0_conduct_v()
833 f0[0] += u_t[uOff[TEMP]]; in f0_w()
835 for (d = 0; d < dim; ++d) f0[0] += u[uOff[VEL] + d] * u_x[uOff_x[TEMP] + d]; in f0_w()
847 f0[0] = c_p * S * p_th / u[uOff[TEMP]] * u_t[uOff[TEMP]]; in f0_conduct_w()
850 …for (d = 0; d < dim; ++d) f0[0] += c_p * p_th / u[uOff[TEMP]] * u[uOff[VEL] + d] * u_x[uOff_x[TEMP… in f0_conduct_w()
872 for (d = 0; d < dim; ++d) f1[d] = k / Pe * u_x[uOff_x[TEMP] + d]; in f1_conduct_w()
914 for (d = 0; d < dim; ++d) g0[d] = -p_th / PetscSqr(u[uOff[TEMP]]) * u_x[uOff_x[TEMP] + d]; in g0_conduct_qu()
923 for (d = 0; d < dim; ++d) g1[d * dim + d] = p_th / u[uOff[TEMP]]; in g1_conduct_qu()
933 g0[0] -= S * p_th / PetscSqr(u[uOff[TEMP]]) * u_tShift; in g0_conduct_qT()
935 g0[0] += 2.0 * S * p_th / PetscPowScalarInt(u[uOff[TEMP]], 3) * u_t[uOff[TEMP]]; in g0_conduct_qT()
937 …+= p_th / PetscSqr(u[uOff[TEMP]]) * (-u_x[uOff_x[VEL] + d * dim + d] + 2.0 / u[uOff[TEMP]] * u[uOf… in g0_conduct_qT()
946 for (d = 0; d < dim; ++d) g1[d] = -p_th / PetscSqr(u[uOff[TEMP]]) * u[uOff[VEL] + d]; in g1_conduct_qT()
979 for (d = 0; d < dim; ++d) g0[d] -= p_th * S / PetscSqr(u[uOff[TEMP]]) * u_t[uOff[VEL] + d]; in g0_conduct_vT()
983 …for (d = 0; d < dim; ++d) g0[c] -= p_th / PetscSqr(u[uOff[TEMP]]) * u[uOff[VEL] + d] * u_x[uOff_x[… in g0_conduct_vT()
987 g0[gdir] -= p_th / PetscSqr(u[uOff[TEMP]] * F); in g0_conduct_vT()
998 for (d = 0; d < dim; ++d) g0[d * dim + d] = S * p_th / u[uOff[TEMP]] * u_tShift; in g0_conduct_vu()
1002 … for (d = 0; d < dim; ++d) g0[c * Nc + d] += p_th / u[uOff[TEMP]] * u_x[uOff_x[VEL] + c * Nc + d]; in g0_conduct_vu()
1017 if (c == d) g1[(c * NcJ + d) * dim + e] += p_th / u[uOff[TEMP]] * u[uOff[VEL] + e]; in g1_conduct_vu()
1080 for (d = 0; d < dim; ++d) g0[d] = c_p * p_th / u[uOff[TEMP]] * u_x[uOff_x[TEMP] + d]; in g0_conduct_wu()
1091 g0[0] += c_p * S * p_th / u[uOff[TEMP]] * u_tShift; in g0_conduct_wT()
1093 g0[0] -= c_p * S * p_th / PetscSqr(u[uOff[TEMP]]) * u_t[uOff[TEMP]]; in g0_conduct_wT()
1095 …; d < dim; ++d) g0[0] -= c_p * p_th / PetscSqr(u[uOff[TEMP]]) * u[uOff[VEL] + d] * u_x[uOff_x[TEMP… in g0_conduct_wT()
1105 for (d = 0; d < dim; ++d) g1[d] += c_p * p_th / u[uOff[TEMP]] * u[uOff[VEL] + d]; in g1_conduct_wT()
1197 …_BC_ESSENTIAL, "top wall temp", label, 1, &id, TEMP, 0, NULL, (PetscVoidFn *)exactFuncs[TEMP], (Pe… in UniformBoundaryConditions()
1199 …_ESSENTIAL, "bottom wall temp", label, 1, &id, TEMP, 0, NULL, (PetscVoidFn *)exactFuncs[TEMP], (Pe… in UniformBoundaryConditions()
1201 …C_ESSENTIAL, "right wall temp", label, 1, &id, TEMP, 0, NULL, (PetscVoidFn *)exactFuncs[TEMP], (Pe… in UniformBoundaryConditions()
1203 …BC_ESSENTIAL, "left wall temp", label, 1, &id, TEMP, 0, NULL, (PetscVoidFn *)exactFuncs[TEMP], (Pe… in UniformBoundaryConditions()
1226 PetscCall(PetscDSSetResidual(ds, TEMP, f0_w, f1_w)); in SetupProblem()
1231 PetscCall(PetscDSSetJacobian(ds, TEMP, VEL, g0_wu, NULL, NULL, NULL)); in SetupProblem()
1232 PetscCall(PetscDSSetJacobian(ds, TEMP, TEMP, g0_wT, g1_wT, NULL, g3_wT)); in SetupProblem()
1237 PetscCall(PetscWeakFormSetIndexResidual(wf, NULL, 0, TEMP, 0, 1, f0_quadratic_w, 0, NULL)); in SetupProblem()
1241 exactFuncs[TEMP] = quadratic_T; in SetupProblem()
1244 exactFuncs_t[TEMP] = quadratic_T_t; in SetupProblem()
1250 PetscCall(PetscWeakFormSetIndexResidual(wf, NULL, 0, TEMP, 0, 1, f0_cubic_w, 0, NULL)); in SetupProblem()
1254 exactFuncs[TEMP] = cubic_T; in SetupProblem()
1257 exactFuncs_t[TEMP] = cubic_T_t; in SetupProblem()
1263 PetscCall(PetscWeakFormSetIndexResidual(wf, NULL, 0, TEMP, 0, 1, f0_cubic_trig_w, 0, NULL)); in SetupProblem()
1267 exactFuncs[TEMP] = cubic_trig_T; in SetupProblem()
1270 exactFuncs_t[TEMP] = cubic_trig_T_t; in SetupProblem()
1275 PetscCall(PetscWeakFormSetIndexResidual(wf, NULL, 0, TEMP, 0, 1, f0_taylor_green_w, 0, NULL)); in SetupProblem()
1279 exactFuncs[TEMP] = taylor_green_T; in SetupProblem()
1282 exactFuncs_t[TEMP] = taylor_green_T_t; in SetupProblem()
1293 PetscCall(PetscDSSetResidual(ds, TEMP, f0_conduct_w, f1_conduct_w)); in SetupProblem()
1297 PetscCall(PetscDSSetJacobian(ds, VEL, TEMP, g0_conduct_vT, NULL, NULL, NULL)); in SetupProblem()
1299 PetscCall(PetscDSSetJacobian(ds, PRES, TEMP, g0_conduct_qT, g1_conduct_qT, NULL, NULL)); in SetupProblem()
1300 PetscCall(PetscDSSetJacobian(ds, TEMP, VEL, g0_conduct_wu, NULL, NULL, NULL)); in SetupProblem()
1301 … PetscCall(PetscDSSetJacobian(ds, TEMP, TEMP, g0_conduct_wT, g1_conduct_wT, NULL, g3_conduct_wT)); in SetupProblem()
1307 …PetscCall(PetscWeakFormSetIndexResidual(wf, NULL, 0, TEMP, 0, 1, f0_conduct_quadratic_w, 0, NULL)); in SetupProblem()
1311 exactFuncs[TEMP] = quadratic_T; in SetupProblem()
1314 exactFuncs_t[TEMP] = quadratic_T_t; in SetupProblem()
1322 PetscCall(PetscWeakFormSetIndexResidual(wf, NULL, 0, TEMP, 0, 1, f0_conduct_pipe_w, 0, NULL)); in SetupProblem()
1326 exactFuncs[TEMP] = pipe_T; in SetupProblem()
1329 exactFuncs_t[TEMP] = pipe_T_t; in SetupProblem()
1341 …t wall temperature", label, 1, &id, TEMP, 0, NULL, (PetscVoidFn *)exactFuncs[TEMP], (PetscVoidFn *… in SetupProblem()
1344 …p wall temperature", label, 1, &id, TEMP, 0, NULL, (PetscVoidFn *)exactFuncs[TEMP], (PetscVoidFn *… in SetupProblem()
1347 …m wall temperature", label, 1, &id, TEMP, 0, NULL, (PetscVoidFn *)exactFuncs[TEMP], (PetscVoidFn *… in SetupProblem()
1353 …PetscCall(PetscWeakFormSetIndexResidual(wf, NULL, 0, TEMP, 0, 1, f0_conduct_pipe_wiggly_w, 0, NULL… in SetupProblem()
1357 exactFuncs[TEMP] = pipe_wiggly_T; in SetupProblem()
1360 exactFuncs_t[TEMP] = pipe_wiggly_T_t; in SetupProblem()
1372 …t wall temperature", label, 1, &id, TEMP, 0, NULL, (PetscVoidFn *)exactFuncs[TEMP], (PetscVoidFn *… in SetupProblem()
1375 …p wall temperature", label, 1, &id, TEMP, 0, NULL, (PetscVoidFn *)exactFuncs[TEMP], (PetscVoidFn *… in SetupProblem()
1378 …m wall temperature", label, 1, &id, TEMP, 0, NULL, (PetscVoidFn *)exactFuncs[TEMP], (PetscVoidFn *… in SetupProblem()
1413 PetscCall(PetscDSSetExactSolution(ds, TEMP, exactFuncs[TEMP], ctx)); in SetupProblem()
1416 PetscCall(PetscDSSetExactSolutionTimeDerivative(ds, TEMP, exactFuncs_t[TEMP], ctx)); in SetupProblem()
1487 PetscCall(DMSetField(dm, TEMP, NULL, (PetscObject)fe[TEMP])); in SetupDiscretization()
1497 PetscCall(PetscFEDestroy(&fe[TEMP])); in SetupDiscretization()