Lines Matching refs:ceed
103 Ceed ceed = honee_bc->honee->ceed; in HoneeBCDestroy() local
106 if (honee_bc->qfctx) PetscCallCeed(ceed, CeedQFunctionContextDestroy(&honee_bc->qfctx)); in HoneeBCDestroy()
126 Ceed ceed; in HoneeBCCreateIFunctionQF() local
135 ceed = honee_bc->honee->ceed; in HoneeBCCreateIFunctionQF()
149 PetscCallCeed(ceed, CeedQFunctionCreateInterior(ceed, 1, qf_func_ptr, qf_loc, qf_ifunc)); in HoneeBCCreateIFunctionQF()
150 PetscCallCeed(ceed, CeedQFunctionSetContext(*qf_ifunc, qfctx)); in HoneeBCCreateIFunctionQF()
151 PetscCallCeed(ceed, CeedQFunctionSetUserFlopsEstimate(*qf_ifunc, 0)); in HoneeBCCreateIFunctionQF()
152 PetscCallCeed(ceed, CeedQFunctionAddInput(*qf_ifunc, "q", num_comp_q, CEED_EVAL_INTERP)); in HoneeBCCreateIFunctionQF()
153 …PetscCallCeed(ceed, CeedQFunctionAddInput(*qf_ifunc, "Grad_q", num_comp_q * dim_sur, CEED_EVAL_GRA… in HoneeBCCreateIFunctionQF()
154 …PetscCallCeed(ceed, CeedQFunctionAddInput(*qf_ifunc, "surface qdata", q_data_size_sur, CEED_EVAL_N… in HoneeBCCreateIFunctionQF()
155 PetscCallCeed(ceed, CeedQFunctionAddInput(*qf_ifunc, "x", num_comp_x, CEED_EVAL_INTERP)); in HoneeBCCreateIFunctionQF()
156 PetscCallCeed(ceed, CeedQFunctionAddOutput(*qf_ifunc, "v", num_comp_q, CEED_EVAL_INTERP)); in HoneeBCCreateIFunctionQF()
157 …if (num_comps_jac_data) PetscCallCeed(ceed, CeedQFunctionAddOutput(*qf_ifunc, "surface jacobian da… in HoneeBCCreateIFunctionQF()
174 Ceed ceed; in HoneeBCCreateIJacobianQF() local
183 ceed = honee_bc->honee->ceed; in HoneeBCCreateIJacobianQF()
197 PetscCallCeed(ceed, CeedQFunctionCreateInterior(ceed, 1, qf_func_ptr, qf_loc, qf_ijac)); in HoneeBCCreateIJacobianQF()
198 PetscCallCeed(ceed, CeedQFunctionSetContext(*qf_ijac, qfctx)); in HoneeBCCreateIJacobianQF()
199 PetscCallCeed(ceed, CeedQFunctionSetUserFlopsEstimate(*qf_ijac, 0)); in HoneeBCCreateIJacobianQF()
200 PetscCallCeed(ceed, CeedQFunctionAddInput(*qf_ijac, "dq", num_comp_q, CEED_EVAL_INTERP)); in HoneeBCCreateIJacobianQF()
201 …PetscCallCeed(ceed, CeedQFunctionAddInput(*qf_ijac, "Grad_dq", num_comp_q * dim_sur, CEED_EVAL_GRA… in HoneeBCCreateIJacobianQF()
202 …PetscCallCeed(ceed, CeedQFunctionAddInput(*qf_ijac, "surface qdata", q_data_size_sur, CEED_EVAL_NO… in HoneeBCCreateIJacobianQF()
203 PetscCallCeed(ceed, CeedQFunctionAddInput(*qf_ijac, "x", num_comp_x, CEED_EVAL_INTERP)); in HoneeBCCreateIJacobianQF()
204 …if (num_comps_jac_data) PetscCallCeed(ceed, CeedQFunctionAddInput(*qf_ijac, "surface jacobian data… in HoneeBCCreateIJacobianQF()
205 PetscCallCeed(ceed, CeedQFunctionAddOutput(*qf_ijac, "v", num_comp_q, CEED_EVAL_INTERP)); in HoneeBCCreateIJacobianQF()
221 Ceed ceed; in HoneeBCAddIFunctionOp() local
234 ceed = honee_bc->honee->ceed; in HoneeBCAddIFunctionOp()
241 …PetscCall(DMPlexCeedBasisCreate(ceed, dm, domain_label, label_value, height, bc_def->dm_field, &ba… in HoneeBCAddIFunctionOp()
242 …PetscCall(DMPlexCeedElemRestrictionCreate(ceed, dm, domain_label, label_value, height, bc_def->dm_… in HoneeBCAddIFunctionOp()
243 …PetscCall(DMPlexCeedCoordinateCreateField(ceed, dm, domain_label, label_value, height, &elem_restr… in HoneeBCAddIFunctionOp()
244 …PetscCall(QDataBoundaryGet(ceed, dm, domain_label, label_value, &elem_restr_qd, &q_data, &q_data_s… in HoneeBCAddIFunctionOp()
246 …PetscCall(DMPlexCeedElemRestrictionQDataCreate(ceed, dm, domain_label, label_value, height, num_co… in HoneeBCAddIFunctionOp()
247 PetscCallCeed(ceed, CeedElemRestrictionCreateVector(elem_restr_jac, &jac_data, NULL)); in HoneeBCAddIFunctionOp()
250 PetscCallCeed(ceed, CeedOperatorCreate(ceed, qf_ifunc, NULL, NULL, &sub_op_ifunc_)); in HoneeBCAddIFunctionOp()
251 …PetscCallCeed(ceed, CeedOperatorSetField(sub_op_ifunc_, "q", elem_restr_q, basis_q, CEED_VECTOR_AC… in HoneeBCAddIFunctionOp()
252 …PetscCallCeed(ceed, CeedOperatorSetField(sub_op_ifunc_, "Grad_q", elem_restr_q, basis_q, CEED_VECT… in HoneeBCAddIFunctionOp()
253 …PetscCallCeed(ceed, CeedOperatorSetField(sub_op_ifunc_, "surface qdata", elem_restr_qd, CEED_BASIS… in HoneeBCAddIFunctionOp()
254 PetscCallCeed(ceed, CeedOperatorSetField(sub_op_ifunc_, "x", elem_restr_x, basis_x, x_coord)); in HoneeBCAddIFunctionOp()
255 …PetscCallCeed(ceed, CeedOperatorSetField(sub_op_ifunc_, "v", elem_restr_q, basis_q, CEED_VECTOR_AC… in HoneeBCAddIFunctionOp()
257 …PetscCallCeed(ceed, CeedOperatorSetField(sub_op_ifunc_, "surface jacobian data", elem_restr_jac, C… in HoneeBCAddIFunctionOp()
259 PetscCallCeed(ceed, CeedOperatorCompositeAddSub(op_ifunc, sub_op_ifunc_)); in HoneeBCAddIFunctionOp()
262 PetscCallCeed(ceed, CeedVectorDestroy(&q_data)); in HoneeBCAddIFunctionOp()
263 PetscCallCeed(ceed, CeedVectorDestroy(&x_coord)); in HoneeBCAddIFunctionOp()
264 PetscCallCeed(ceed, CeedBasisDestroy(&basis_q)); in HoneeBCAddIFunctionOp()
265 PetscCallCeed(ceed, CeedBasisDestroy(&basis_x)); in HoneeBCAddIFunctionOp()
266 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_qd)); in HoneeBCAddIFunctionOp()
267 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_q)); in HoneeBCAddIFunctionOp()
268 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_x)); in HoneeBCAddIFunctionOp()
270 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_jac)); in HoneeBCAddIFunctionOp()
271 PetscCallCeed(ceed, CeedVectorDestroy(&jac_data)); in HoneeBCAddIFunctionOp()
290 Ceed ceed; in HoneeBCAddIJacobianOp() local
304 ceed = honee_bc->honee->ceed; in HoneeBCAddIJacobianOp()
310 …PetscCall(DMPlexCeedCoordinateCreateField(ceed, dm, domain_label, label_value, height, &elem_restr… in HoneeBCAddIJacobianOp()
311 …PetscCall(QDataBoundaryGet(ceed, dm, domain_label, label_value, &elem_restr_qd, &q_data, &q_data_s… in HoneeBCAddIJacobianOp()
316 PetscCallCeed(ceed, CeedOperatorGetFieldByName(sub_op_ifunc, "q", &op_field)); in HoneeBCAddIJacobianOp()
317 PetscCallCeed(ceed, CeedOperatorFieldGetData(op_field, NULL, &elem_restr_q, &basis_q, NULL)); in HoneeBCAddIJacobianOp()
319 … PetscCallCeed(ceed, CeedOperatorGetFieldByName(sub_op_ifunc, "surface jacobian data", &op_field)); in HoneeBCAddIJacobianOp()
320 … PetscCallCeed(ceed, CeedOperatorFieldGetData(op_field, NULL, &elem_restr_jac, NULL, &jac_data)); in HoneeBCAddIJacobianOp()
324 PetscCallCeed(ceed, CeedOperatorCreate(ceed, qf_ijac, NULL, NULL, &sub_op_ijac)); in HoneeBCAddIJacobianOp()
325 …PetscCallCeed(ceed, CeedOperatorSetField(sub_op_ijac, "dq", elem_restr_q, basis_q, CEED_VECTOR_ACT… in HoneeBCAddIJacobianOp()
326 …PetscCallCeed(ceed, CeedOperatorSetField(sub_op_ijac, "Grad_dq", elem_restr_q, basis_q, CEED_VECTO… in HoneeBCAddIJacobianOp()
327 …PetscCallCeed(ceed, CeedOperatorSetField(sub_op_ijac, "surface qdata", elem_restr_qd, CEED_BASIS_N… in HoneeBCAddIJacobianOp()
328 PetscCallCeed(ceed, CeedOperatorSetField(sub_op_ijac, "x", elem_restr_x, basis_x, x_coord)); in HoneeBCAddIJacobianOp()
329 …if (use_jac_data) PetscCallCeed(ceed, CeedOperatorSetField(sub_op_ijac, "surface jacobian data", e… in HoneeBCAddIJacobianOp()
330 …PetscCallCeed(ceed, CeedOperatorSetField(sub_op_ijac, "v", elem_restr_q, basis_q, CEED_VECTOR_ACTI… in HoneeBCAddIJacobianOp()
332 PetscCallCeed(ceed, CeedOperatorCompositeAddSub(op_ijac, sub_op_ijac)); in HoneeBCAddIJacobianOp()
334 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_q)); in HoneeBCAddIJacobianOp()
335 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_x)); in HoneeBCAddIJacobianOp()
337 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_jac)); in HoneeBCAddIJacobianOp()
338 PetscCallCeed(ceed, CeedVectorDestroy(&jac_data)); in HoneeBCAddIJacobianOp()
340 PetscCallCeed(ceed, CeedVectorDestroy(&q_data)); in HoneeBCAddIJacobianOp()
341 PetscCallCeed(ceed, CeedVectorDestroy(&x_coord)); in HoneeBCAddIJacobianOp()
342 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_qd)); in HoneeBCAddIJacobianOp()
343 PetscCallCeed(ceed, CeedBasisDestroy(&basis_q)); in HoneeBCAddIJacobianOp()
344 PetscCallCeed(ceed, CeedBasisDestroy(&basis_x)); in HoneeBCAddIJacobianOp()
345 PetscCallCeed(ceed, CeedOperatorDestroy(&sub_op_ijac)); in HoneeBCAddIJacobianOp()