Lines Matching refs:ceed
15 Ceed ceed = honee->ceed; in CreateKSPMassOperator_Unstabilized() local
28 PetscCallCeed(ceed, CeedOperatorCompositeGetSubList(honee->op_rhs_ctx->op, &sub_ops)); in CreateKSPMassOperator_Unstabilized()
29 PetscCallCeed(ceed, CeedOperatorGetFieldByName(sub_ops[sub_op_index], "q", &op_field)); in CreateKSPMassOperator_Unstabilized()
30 PetscCallCeed(ceed, CeedOperatorFieldGetData(op_field, NULL, &elem_restr_q, &basis_q, NULL)); in CreateKSPMassOperator_Unstabilized()
31 PetscCallCeed(ceed, CeedOperatorGetFieldByName(sub_ops[sub_op_index], "qdata", &op_field)); in CreateKSPMassOperator_Unstabilized()
32 PetscCallCeed(ceed, CeedOperatorFieldGetData(op_field, NULL, &elem_restr_qd, NULL, &q_data)); in CreateKSPMassOperator_Unstabilized()
35 PetscCallCeed(ceed, CeedElemRestrictionGetNumComponents(elem_restr_q, &num_comp_q)); in CreateKSPMassOperator_Unstabilized()
36 PetscCallCeed(ceed, CeedElemRestrictionGetNumComponents(elem_restr_qd, &q_data_size)); in CreateKSPMassOperator_Unstabilized()
38 PetscCall(HoneeMassQFunctionCreate(ceed, num_comp_q, q_data_size, &qf_mass)); in CreateKSPMassOperator_Unstabilized()
39 PetscCallCeed(ceed, CeedOperatorCreate(ceed, qf_mass, NULL, NULL, op_mass)); in CreateKSPMassOperator_Unstabilized()
40 PetscCallCeed(ceed, CeedOperatorSetName(*op_mass, "RHS Mass Operator")); in CreateKSPMassOperator_Unstabilized()
41 …PetscCallCeed(ceed, CeedOperatorSetField(*op_mass, "u", elem_restr_q, basis_q, CEED_VECTOR_ACTIVE)… in CreateKSPMassOperator_Unstabilized()
42 …PetscCallCeed(ceed, CeedOperatorSetField(*op_mass, "qdata", elem_restr_qd, CEED_BASIS_NONE, q_data… in CreateKSPMassOperator_Unstabilized()
43 …PetscCallCeed(ceed, CeedOperatorSetField(*op_mass, "v", elem_restr_q, basis_q, CEED_VECTOR_ACTIVE)… in CreateKSPMassOperator_Unstabilized()
45 PetscCallCeed(ceed, CeedVectorDestroy(&q_data)); in CreateKSPMassOperator_Unstabilized()
46 PetscCallCeed(ceed, CeedBasisDestroy(&basis_q)); in CreateKSPMassOperator_Unstabilized()
47 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_q)); in CreateKSPMassOperator_Unstabilized()
48 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_qd)); in CreateKSPMassOperator_Unstabilized()
49 PetscCallCeed(ceed, CeedQFunctionDestroy(&qf_mass)); in CreateKSPMassOperator_Unstabilized()
55 Ceed ceed = honee->ceed; in CreateKSPMass() local
88 PetscCallCeed(ceed, CeedOperatorDestroy(&op_mass)); in CreateKSPMass()
92 PetscErrorCode SetupLibceed(Ceed ceed, DM dm, Honee honee, AppCtx app_ctx, ProblemData problem) { in SetupLibceed() argument
114 …PetscCall(DMPlexCeedBasisCreate(ceed, dm, DMLABEL_DEFAULT, DMLABEL_DEFAULT_VALUE, height, dm_field… in SetupLibceed()
116 …PetscCall(DMPlexCeedElemRestrictionCreate(ceed, dm, DMLABEL_DEFAULT, DMLABEL_DEFAULT_VALUE, height… in SetupLibceed()
118 …PetscCall(DMPlexCeedElemRestrictionQDataCreate(ceed, dm, DMLABEL_DEFAULT, DMLABEL_DEFAULT_VALUE, h… in SetupLibceed()
119 PetscCallCeed(ceed, CeedElemRestrictionCreateVector(elem_restr_jd_i, &jac_data, NULL)); in SetupLibceed()
122 PetscCallCeed(ceed, CeedElemRestrictionCreateVector(elem_restr_q, &honee->q_ceed, NULL)); in SetupLibceed()
123 PetscCallCeed(ceed, CeedElemRestrictionCreateVector(elem_restr_q, &honee->q_dot_ceed, NULL)); in SetupLibceed()
124 PetscCallCeed(ceed, CeedElemRestrictionCreateVector(elem_restr_q, &honee->g_ceed, NULL)); in SetupLibceed()
125 …PetscCall(DMPlexCeedCoordinateCreateField(ceed, dm, DMLABEL_DEFAULT, DMLABEL_DEFAULT_VALUE, height… in SetupLibceed()
127 …PetscCall(QDataGet(ceed, dm, DMLABEL_DEFAULT, DMLABEL_DEFAULT_VALUE, &elem_restr_qd, &q_data, &q_d… in SetupLibceed()
142 PetscCallCeed(ceed, CeedBasisCreateProjection(basis_x, basis_q, &basis_xc)); in SetupLibceed()
143 …PetscCallCeed(ceed, CeedQFunctionCreateInterior(ceed, 1, problem->ics.qf_func_ptr, problem->ics.qf… in SetupLibceed()
144 PetscCallCeed(ceed, CeedQFunctionSetContext(qf_ics, problem->ics.qfctx)); in SetupLibceed()
145 PetscCallCeed(ceed, CeedQFunctionSetUserFlopsEstimate(qf_ics, 0)); in SetupLibceed()
146 PetscCallCeed(ceed, CeedQFunctionAddInput(qf_ics, "x", num_comp_x, CEED_EVAL_INTERP)); in SetupLibceed()
147 PetscCallCeed(ceed, CeedQFunctionAddInput(qf_ics, "dx", num_comp_x * dim, CEED_EVAL_GRAD)); in SetupLibceed()
148 PetscCallCeed(ceed, CeedQFunctionAddOutput(qf_ics, "q0", num_comp_q, CEED_EVAL_NONE)); in SetupLibceed()
150 PetscCallCeed(ceed, CeedOperatorCreate(ceed, qf_ics, NULL, NULL, &op_ics)); in SetupLibceed()
151 …PetscCallCeed(ceed, CeedOperatorSetField(op_ics, "x", elem_restr_x, basis_xc, CEED_VECTOR_ACTIVE)); in SetupLibceed()
152 …PetscCallCeed(ceed, CeedOperatorSetField(op_ics, "dx", elem_restr_x, basis_xc, CEED_VECTOR_ACTIVE)… in SetupLibceed()
153 …PetscCallCeed(ceed, CeedOperatorSetField(op_ics, "q0", elem_restr_q, CEED_BASIS_NONE, CEED_VECTOR_… in SetupLibceed()
154 …PetscCallCeed(ceed, CeedOperatorGetContextFieldLabel(op_ics, "evaluation time", &honee->phys->ics_… in SetupLibceed()
155 …PetscCall(OperatorApplyContextCreate(NULL, dm, honee->ceed, op_ics, x_coord, NULL, NULL, honee->Q_… in SetupLibceed()
157 PetscCallCeed(ceed, CeedBasisDestroy(&basis_xc)); in SetupLibceed()
158 PetscCallCeed(ceed, CeedQFunctionDestroy(&qf_ics)); in SetupLibceed()
159 PetscCallCeed(ceed, CeedOperatorDestroy(&op_ics)); in SetupLibceed()
165 …PetscCallCeed(ceed, CeedQFunctionCreateInterior(ceed, 1, problem->apply_vol_rhs.qf_func_ptr, probl… in SetupLibceed()
166 PetscCallCeed(ceed, CeedQFunctionSetContext(qf_rhs_vol, problem->apply_vol_rhs.qfctx)); in SetupLibceed()
167 PetscCallCeed(ceed, CeedQFunctionSetUserFlopsEstimate(qf_rhs_vol, 0)); in SetupLibceed()
168 PetscCallCeed(ceed, CeedQFunctionAddInput(qf_rhs_vol, "q", num_comp_q, CEED_EVAL_INTERP)); in SetupLibceed()
169 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_rhs_vol, "Grad_q", num_comp_q * dim, CEED_EVAL_GRAD)); in SetupLibceed()
170 … PetscCallCeed(ceed, CeedQFunctionAddInput(qf_rhs_vol, "qdata", q_data_size_vol, CEED_EVAL_NONE)); in SetupLibceed()
171 PetscCallCeed(ceed, CeedQFunctionAddInput(qf_rhs_vol, "x", num_comp_x, CEED_EVAL_INTERP)); in SetupLibceed()
173 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_rhs_vol, "div F_diff", honee->diff_flux_proj->num_dif… in SetupLibceed()
174 PetscCallCeed(ceed, CeedQFunctionAddOutput(qf_rhs_vol, "v", num_comp_q, CEED_EVAL_INTERP)); in SetupLibceed()
175 …PetscCallCeed(ceed, CeedQFunctionAddOutput(qf_rhs_vol, "Grad_v", num_comp_q * dim, CEED_EVAL_GRAD)… in SetupLibceed()
177 PetscCallCeed(ceed, CeedOperatorCreate(ceed, qf_rhs_vol, NULL, NULL, &op_rhs_vol)); in SetupLibceed()
178 …PetscCallCeed(ceed, CeedOperatorSetField(op_rhs_vol, "q", elem_restr_q, basis_q, CEED_VECTOR_ACTIV… in SetupLibceed()
179 …PetscCallCeed(ceed, CeedOperatorSetField(op_rhs_vol, "Grad_q", elem_restr_q, basis_q, CEED_VECTOR_… in SetupLibceed()
180 …PetscCallCeed(ceed, CeedOperatorSetField(op_rhs_vol, "qdata", elem_restr_qd, CEED_BASIS_NONE, q_da… in SetupLibceed()
181 PetscCallCeed(ceed, CeedOperatorSetField(op_rhs_vol, "x", elem_restr_x, basis_x, x_coord)); in SetupLibceed()
183 …PetscCallCeed(ceed, CeedOperatorSetField(op_rhs_vol, "div F_diff", elem_restr_diff_flux, basis_dif… in SetupLibceed()
184 …PetscCallCeed(ceed, CeedOperatorSetField(op_rhs_vol, "v", elem_restr_q, basis_q, CEED_VECTOR_ACTIV… in SetupLibceed()
185 …PetscCallCeed(ceed, CeedOperatorSetField(op_rhs_vol, "Grad_v", elem_restr_q, basis_q, CEED_VECTOR_… in SetupLibceed()
187 PetscCallCeed(ceed, CeedQFunctionDestroy(&qf_rhs_vol)); in SetupLibceed()
193 …PetscCallCeed(ceed, CeedQFunctionCreateInterior(ceed, 1, problem->apply_vol_ifunction.qf_func_ptr,… in SetupLibceed()
195 …PetscCallCeed(ceed, CeedQFunctionSetContext(qf_ifunction_vol, problem->apply_vol_ifunction.qfctx)); in SetupLibceed()
196 PetscCallCeed(ceed, CeedQFunctionSetUserFlopsEstimate(qf_ifunction_vol, 0)); in SetupLibceed()
197 PetscCallCeed(ceed, CeedQFunctionAddInput(qf_ifunction_vol, "q", num_comp_q, CEED_EVAL_INTERP)); in SetupLibceed()
198 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_ifunction_vol, "Grad_q", num_comp_q * dim, CEED_EVAL_… in SetupLibceed()
199 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_ifunction_vol, "q dot", num_comp_q, CEED_EVAL_INTERP)… in SetupLibceed()
200 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_ifunction_vol, "qdata", q_data_size_vol, CEED_EVAL_NO… in SetupLibceed()
201 PetscCallCeed(ceed, CeedQFunctionAddInput(qf_ifunction_vol, "x", num_comp_x, CEED_EVAL_INTERP)); in SetupLibceed()
203 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_ifunction_vol, "div F_diff", honee->diff_flux_proj->n… in SetupLibceed()
204 … PetscCallCeed(ceed, CeedQFunctionAddOutput(qf_ifunction_vol, "v", num_comp_q, CEED_EVAL_INTERP)); in SetupLibceed()
205 …PetscCallCeed(ceed, CeedQFunctionAddOutput(qf_ifunction_vol, "Grad_v", num_comp_q * dim, CEED_EVAL… in SetupLibceed()
206 …if (num_comps_jac_data) PetscCallCeed(ceed, CeedQFunctionAddOutput(qf_ifunction_vol, "jac_data", n… in SetupLibceed()
208 PetscCallCeed(ceed, CeedOperatorCreate(ceed, qf_ifunction_vol, NULL, NULL, &op_ifunction_vol)); in SetupLibceed()
209 …PetscCallCeed(ceed, CeedOperatorSetField(op_ifunction_vol, "q", elem_restr_q, basis_q, CEED_VECTOR… in SetupLibceed()
210 …PetscCallCeed(ceed, CeedOperatorSetField(op_ifunction_vol, "Grad_q", elem_restr_q, basis_q, CEED_V… in SetupLibceed()
211 …PetscCallCeed(ceed, CeedOperatorSetField(op_ifunction_vol, "q dot", elem_restr_q, basis_q, honee->… in SetupLibceed()
212 …PetscCallCeed(ceed, CeedOperatorSetField(op_ifunction_vol, "qdata", elem_restr_qd, CEED_BASIS_NONE… in SetupLibceed()
213 … PetscCallCeed(ceed, CeedOperatorSetField(op_ifunction_vol, "x", elem_restr_x, basis_x, x_coord)); in SetupLibceed()
215 …PetscCallCeed(ceed, CeedOperatorSetField(op_ifunction_vol, "div F_diff", elem_restr_diff_flux, bas… in SetupLibceed()
216 …PetscCallCeed(ceed, CeedOperatorSetField(op_ifunction_vol, "v", elem_restr_q, basis_q, CEED_VECTOR… in SetupLibceed()
217 …PetscCallCeed(ceed, CeedOperatorSetField(op_ifunction_vol, "Grad_v", elem_restr_q, basis_q, CEED_V… in SetupLibceed()
218 …if (num_comps_jac_data) PetscCallCeed(ceed, CeedOperatorSetField(op_ifunction_vol, "jac_data", ele… in SetupLibceed()
220 PetscCallCeed(ceed, CeedQFunctionDestroy(&qf_ifunction_vol)); in SetupLibceed()
226 …PetscCallCeed(ceed, CeedQFunctionCreateInterior(ceed, 1, problem->apply_vol_ijacobian.qf_func_ptr,… in SetupLibceed()
228 …PetscCallCeed(ceed, CeedQFunctionSetContext(qf_ijacobian_vol, problem->apply_vol_ijacobian.qfctx)); in SetupLibceed()
229 PetscCallCeed(ceed, CeedQFunctionSetUserFlopsEstimate(qf_ijacobian_vol, 0)); in SetupLibceed()
230 … PetscCallCeed(ceed, CeedQFunctionAddInput(qf_ijacobian_vol, "dq", num_comp_q, CEED_EVAL_INTERP)); in SetupLibceed()
231 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_ijacobian_vol, "Grad_dq", num_comp_q * dim, CEED_EVAL… in SetupLibceed()
232 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_ijacobian_vol, "qdata", q_data_size_vol, CEED_EVAL_NO… in SetupLibceed()
233 …if (num_comps_jac_data) PetscCallCeed(ceed, CeedQFunctionAddInput(qf_ijacobian_vol, "jac_data", nu… in SetupLibceed()
234 … PetscCallCeed(ceed, CeedQFunctionAddOutput(qf_ijacobian_vol, "v", num_comp_q, CEED_EVAL_INTERP)); in SetupLibceed()
235 …PetscCallCeed(ceed, CeedQFunctionAddOutput(qf_ijacobian_vol, "Grad_v", num_comp_q * dim, CEED_EVAL… in SetupLibceed()
237 PetscCallCeed(ceed, CeedOperatorCreate(ceed, qf_ijacobian_vol, NULL, NULL, &op_ijacobian_vol)); in SetupLibceed()
238 …PetscCallCeed(ceed, CeedOperatorSetField(op_ijacobian_vol, "dq", elem_restr_q, basis_q, CEED_VECTO… in SetupLibceed()
239 …PetscCallCeed(ceed, CeedOperatorSetField(op_ijacobian_vol, "Grad_dq", elem_restr_q, basis_q, CEED_… in SetupLibceed()
240 …PetscCallCeed(ceed, CeedOperatorSetField(op_ijacobian_vol, "qdata", elem_restr_qd, CEED_BASIS_NONE… in SetupLibceed()
241 …if (num_comps_jac_data) PetscCallCeed(ceed, CeedOperatorSetField(op_ijacobian_vol, "jac_data", ele… in SetupLibceed()
242 …PetscCallCeed(ceed, CeedOperatorSetField(op_ijacobian_vol, "v", elem_restr_q, basis_q, CEED_VECTOR… in SetupLibceed()
243 …PetscCallCeed(ceed, CeedOperatorSetField(op_ijacobian_vol, "Grad_v", elem_restr_q, basis_q, CEED_V… in SetupLibceed()
245 PetscCallCeed(ceed, CeedQFunctionDestroy(&qf_ijacobian_vol)); in SetupLibceed()
252 PetscCallCeed(ceed, CeedOperatorCreateComposite(ceed, &op_rhs)); in SetupLibceed()
253 PetscCallCeed(ceed, CeedOperatorCompositeAddSub(op_rhs, op_rhs_vol)); in SetupLibceed()
256 …PetscCall(OperatorApplyContextCreate(dm, dm, ceed, op_rhs, honee->q_ceed, honee->g_ceed, honee->Q_… in SetupLibceed()
259 …PetscCallCeed(ceed, CeedOperatorGetContextFieldLabel(op_rhs, "solution time", &honee->phys->soluti… in SetupLibceed()
260 …PetscCallCeed(ceed, CeedOperatorGetContextFieldLabel(op_rhs, "timestep size", &honee->phys->timest… in SetupLibceed()
262 PetscCallCeed(ceed, CeedOperatorDestroy(&op_rhs)); in SetupLibceed()
269 PetscCallCeed(ceed, CeedOperatorCreateComposite(ceed, &honee->op_ifunction)); in SetupLibceed()
270 PetscCallCeed(ceed, CeedOperatorCompositeAddSub(honee->op_ifunction, op_ifunction_vol)); in SetupLibceed()
272 PetscCallCeed(ceed, CeedOperatorCreateComposite(ceed, &op_ijacobian)); in SetupLibceed()
273 PetscCallCeed(ceed, CeedOperatorCompositeAddSub(op_ijacobian, op_ijacobian_vol)); in SetupLibceed()
278 …PetscCallCeed(ceed, CeedOperatorGetContextFieldLabel(honee->op_ifunction, "solution time", &honee-… in SetupLibceed()
279 …PetscCallCeed(ceed, CeedOperatorGetContextFieldLabel(honee->op_ifunction, "timestep size", &honee-… in SetupLibceed()
284 PetscCallCeed(ceed, CeedOperatorDestroy(&op_ijacobian)); in SetupLibceed()
286 … if (app_ctx->sgs_model_type == SGS_MODEL_DATA_DRIVEN) PetscCall(SgsDDSetup(ceed, honee, problem)); in SetupLibceed()
289 if (problem->use_strong_bc_ceed) PetscCall(SetupStrongBC_Ceed(ceed, dm, honee, problem)); in SetupLibceed()
290 if (app_ctx->sgs_train_enable) PetscCall(SGS_DD_TrainingSetup(ceed, honee)); in SetupLibceed()
293 PetscCallCeed(ceed, CeedVectorDestroy(&q_data)); in SetupLibceed()
294 PetscCallCeed(ceed, CeedVectorDestroy(&jac_data)); in SetupLibceed()
295 PetscCallCeed(ceed, CeedVectorDestroy(&x_coord)); in SetupLibceed()
296 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_q)); in SetupLibceed()
297 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_x)); in SetupLibceed()
298 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_qd)); in SetupLibceed()
299 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_jd_i)); in SetupLibceed()
300 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_diff_flux)); in SetupLibceed()
301 PetscCallCeed(ceed, CeedBasisDestroy(&basis_diff_flux)); in SetupLibceed()
302 PetscCallCeed(ceed, CeedBasisDestroy(&basis_q)); in SetupLibceed()
303 PetscCallCeed(ceed, CeedBasisDestroy(&basis_x)); in SetupLibceed()
304 PetscCallCeed(ceed, CeedVectorDestroy(&div_diff_flux_ceed)); in SetupLibceed()
305 PetscCallCeed(ceed, CeedOperatorDestroy(&op_ijacobian_vol)); in SetupLibceed()
306 PetscCallCeed(ceed, CeedOperatorDestroy(&op_ifunction_vol)); in SetupLibceed()
307 PetscCallCeed(ceed, CeedOperatorDestroy(&op_rhs_vol)); in SetupLibceed()