Lines Matching refs:ceed
30 Ceed ceed = sgs_dd_data_->op_sgs_apply_ctx->ceed; in SgsDDDataDestroy() local
32 PetscCallCeed(ceed, CeedVectorDestroy(&sgs_dd_data_->sgs_nodal_ceed)); in SgsDDDataDestroy()
33 PetscCallCeed(ceed, CeedVectorDestroy(&sgs_dd_data_->grad_velo_ceed)); in SgsDDDataDestroy()
58 Ceed ceed; in SgsDDSetupDataDestroy() local
61 PetscCall(CeedElemRestrictionGetCeed(sgs_dd_setup_data->elem_restr_sgs, &ceed)); in SgsDDSetupDataDestroy()
63 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&sgs_dd_setup_data->elem_restr_grid_aniso)); in SgsDDSetupDataDestroy()
64 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&sgs_dd_setup_data->elem_restr_sgs)); in SgsDDSetupDataDestroy()
65 PetscCallCeed(ceed, CeedVectorDestroy(&sgs_dd_setup_data->grid_aniso_ceed)); in SgsDDSetupDataDestroy()
66 PetscCallCeed(ceed, CeedQFunctionContextDestroy(&sgs_dd_setup_data->sgsdd_qfctx)); in SgsDDSetupDataDestroy()
67 PetscCallCeed(ceed, CeedQFunctionContextDestroy(&sgs_dd_setup_data->ifunction_qfctx)); in SgsDDSetupDataDestroy()
69 …PetscCheck(CeedDestroy(&ceed) == CEED_ERROR_SUCCESS, PETSC_COMM_SELF, PETSC_ERR_LIB, "Destroying C… in SgsDDSetupDataDestroy()
113 static PetscErrorCode SgsDDSetupNodalEvaluation_Fused(Ceed ceed, Honee honee, SgsDDSetupData sgs_dd… in SgsDDSetupNodalEvaluation_Fused() argument
126 …PetscCall(DMPlexCeedElemRestrictionCreate(ceed, honee->dm, DMLABEL_DEFAULT, DMLABEL_DEFAULT_VALUE,… in SgsDDSetupNodalEvaluation_Fused()
128 PetscCallCeed(ceed, CeedElemRestrictionGetNumComponents(elem_restr_q, &num_comp_q)); in SgsDDSetupNodalEvaluation_Fused()
129 …PetscCallCeed(ceed, CeedElemRestrictionGetNumComponents(sgs_dd_setup_data->elem_restr_grid_aniso, … in SgsDDSetupNodalEvaluation_Fused()
135 …PetscCallCeed(ceed, CeedOperatorGetFieldByName(grad_velo_proj->l2_rhs_ctx->op, "velocity gradient"… in SgsDDSetupNodalEvaluation_Fused()
136 PetscCallCeed(ceed, CeedOperatorFieldGetElemRestriction(op_field, &elem_restr_grad_velo)); in SgsDDSetupNodalEvaluation_Fused()
137 …PetscCallCeed(ceed, CeedElemRestrictionGetNumComponents(elem_restr_grad_velo, &num_comp_grad_velo)… in SgsDDSetupNodalEvaluation_Fused()
139 …PetscCall(DMPlexCeedCoordinateCreateField(ceed, honee->dm, DMLABEL_DEFAULT, DMLABEL_DEFAULT_VALUE,… in SgsDDSetupNodalEvaluation_Fused()
140 …PetscCall(DMPlexCeedElemRestrictionCreate(ceed, sgs_dd_data->dm_sgs, DMLABEL_DEFAULT, DMLABEL_DEFA… in SgsDDSetupNodalEvaluation_Fused()
141 …PetscCallCeed(ceed, CeedElemRestrictionCreateVector(elem_restr_sgs, &sgs_dd_data->sgs_nodal_ceed, … in SgsDDSetupNodalEvaluation_Fused()
143 …PetscCall(GetInverseMultiplicity(ceed, sgs_dd_data->dm_sgs, DMLABEL_DEFAULT, DMLABEL_DEFAULT_VALUE… in SgsDDSetupNodalEvaluation_Fused()
149 …PetscCallCeed(ceed, CeedQFunctionCreateInterior(ceed, 1, ComputeSgsDDNodal_Prim, ComputeSgsDDNodal… in SgsDDSetupNodalEvaluation_Fused()
152 …PetscCallCeed(ceed, CeedQFunctionCreateInterior(ceed, 1, ComputeSgsDDNodal_Conserv, ComputeSgsDDNo… in SgsDDSetupNodalEvaluation_Fused()
155 …PetscCallCeed(ceed, CeedQFunctionCreateInterior(ceed, 1, ComputeSgsDDNodal_Entropy, ComputeSgsDDNo… in SgsDDSetupNodalEvaluation_Fused()
161 …PetscCall(DMPlexCeedBasisCreate(ceed, honee->dm, DMLABEL_DEFAULT, DMLABEL_DEFAULT_VALUE, 0, 0, &ba… in SgsDDSetupNodalEvaluation_Fused()
162 PetscCallCeed(ceed, CeedBasisCreateProjection(basis_x, basis_q, &basis_x_to_q)); in SgsDDSetupNodalEvaluation_Fused()
164 PetscCallCeed(ceed, CeedQFunctionSetContext(qf_sgs_dd_nodal, sgs_dd_setup_data->sgsdd_qfctx)); in SgsDDSetupNodalEvaluation_Fused()
165 PetscCallCeed(ceed, CeedQFunctionAddInput(qf_sgs_dd_nodal, "q", num_comp_q, CEED_EVAL_NONE)); in SgsDDSetupNodalEvaluation_Fused()
166 PetscCallCeed(ceed, CeedQFunctionAddInput(qf_sgs_dd_nodal, "x", num_comp_x, CEED_EVAL_INTERP)); in SgsDDSetupNodalEvaluation_Fused()
167 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_sgs_dd_nodal, "gradient velocity", num_comp_grad_velo… in SgsDDSetupNodalEvaluation_Fused()
168 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_sgs_dd_nodal, "anisotropy tensor", num_comp_grid_anis… in SgsDDSetupNodalEvaluation_Fused()
169 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_sgs_dd_nodal, "inverse multiplicity", 1, CEED_EVAL_NO… in SgsDDSetupNodalEvaluation_Fused()
170 …PetscCallCeed(ceed, CeedQFunctionAddOutput(qf_sgs_dd_nodal, "km_sgs", sgs_dd_data->num_comp_sgs, C… in SgsDDSetupNodalEvaluation_Fused()
172 PetscCallCeed(ceed, CeedOperatorCreate(ceed, qf_sgs_dd_nodal, NULL, NULL, &op_sgs_dd_nodal)); in SgsDDSetupNodalEvaluation_Fused()
173 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_dd_nodal, "q", elem_restr_q, CEED_BASIS_NONE, hone… in SgsDDSetupNodalEvaluation_Fused()
174 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_dd_nodal, "x", elem_restr_x, basis_x_to_q, x_coord… in SgsDDSetupNodalEvaluation_Fused()
175 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_dd_nodal, "gradient velocity", elem_restr_grad_vel… in SgsDDSetupNodalEvaluation_Fused()
176 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_dd_nodal, "anisotropy tensor", sgs_dd_setup_data->… in SgsDDSetupNodalEvaluation_Fused()
178 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_dd_nodal, "inverse multiplicity", elem_restr_inv_m… in SgsDDSetupNodalEvaluation_Fused()
179 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_dd_nodal, "km_sgs", elem_restr_sgs, CEED_BASIS_NON… in SgsDDSetupNodalEvaluation_Fused()
181 …PetscCall(OperatorApplyContextCreate(grad_velo_proj->dm, sgs_dd_data->dm_sgs, ceed, op_sgs_dd_noda… in SgsDDSetupNodalEvaluation_Fused()
187 PetscCallCeed(ceed, CeedVectorDestroy(&inv_multiplicity)); in SgsDDSetupNodalEvaluation_Fused()
188 PetscCallCeed(ceed, CeedVectorDestroy(&x_coord)); in SgsDDSetupNodalEvaluation_Fused()
189 PetscCallCeed(ceed, CeedBasisDestroy(&basis_x_to_q)); in SgsDDSetupNodalEvaluation_Fused()
190 PetscCallCeed(ceed, CeedBasisDestroy(&basis_q)); in SgsDDSetupNodalEvaluation_Fused()
191 PetscCallCeed(ceed, CeedBasisDestroy(&basis_x)); in SgsDDSetupNodalEvaluation_Fused()
192 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_q)); in SgsDDSetupNodalEvaluation_Fused()
193 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_x)); in SgsDDSetupNodalEvaluation_Fused()
194 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_inv_multiplicity)); in SgsDDSetupNodalEvaluation_Fused()
195 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_grad_velo)); in SgsDDSetupNodalEvaluation_Fused()
196 PetscCallCeed(ceed, CeedQFunctionDestroy(&qf_sgs_dd_nodal)); in SgsDDSetupNodalEvaluation_Fused()
197 PetscCallCeed(ceed, CeedOperatorDestroy(&op_sgs_dd_nodal)); in SgsDDSetupNodalEvaluation_Fused()
202 static PetscErrorCode SgsDDSetupNodalEvaluation_Sequential_Ceed(Ceed ceed, SgsDDData sgs_dd_data, S… in SgsDDSetupNodalEvaluation_Sequential_Ceed() argument
211 …PetscCallCeed(ceed, CeedQFunctionCreateInterior(ceed, 1, ComputeSgsDDNodal_Sequential_Inference, C… in SgsDDSetupNodalEvaluation_Sequential_Ceed()
214 PetscCallCeed(ceed, CeedQFunctionSetContext(qf_sgs_dd_inference, sgs_dd_setup_data->sgsdd_qfctx)); in SgsDDSetupNodalEvaluation_Sequential_Ceed()
215 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_sgs_dd_inference, "model inputs", sgs_dd_data->num_co… in SgsDDSetupNodalEvaluation_Sequential_Ceed()
216 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_sgs_dd_inference, "inverse multiplicity", 1, CEED_EVA… in SgsDDSetupNodalEvaluation_Sequential_Ceed()
217 …PetscCallCeed(ceed, CeedQFunctionAddOutput(qf_sgs_dd_inference, "model outputs", sgs_dd_data->num_… in SgsDDSetupNodalEvaluation_Sequential_Ceed()
219 …PetscCallCeed(ceed, CeedOperatorCreate(ceed, qf_sgs_dd_inference, NULL, NULL, &op_sgs_dd_inference… in SgsDDSetupNodalEvaluation_Sequential_Ceed()
220 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_dd_inference, "model inputs", elem_restr_dd_inputs… in SgsDDSetupNodalEvaluation_Sequential_Ceed()
221 PetscCallCeed(ceed, in SgsDDSetupNodalEvaluation_Sequential_Ceed()
223 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_dd_inference, "model outputs", elem_restr_dd_outpu… in SgsDDSetupNodalEvaluation_Sequential_Ceed()
225 …PetscCall(OperatorApplyContextCreate(sgs_dd_data->dm_dd_inputs, sgs_dd_data->dm_dd_outputs, ceed, … in SgsDDSetupNodalEvaluation_Sequential_Ceed()
229 PetscCallCeed(ceed, CeedOperatorDestroy(&op_sgs_dd_inference)); in SgsDDSetupNodalEvaluation_Sequential_Ceed()
230 PetscCallCeed(ceed, CeedQFunctionDestroy(&qf_sgs_dd_inference)); in SgsDDSetupNodalEvaluation_Sequential_Ceed()
250 static PetscErrorCode SgsDDSetupNodalEvaluation_Sequential_Torch(Ceed ceed, SgsDDData sgs_dd_data, … in SgsDDSetupNodalEvaluation_Sequential_Torch() argument
259 PetscCallCeed(ceed, CeedGetResource(ceed, &ceed_resource)); in SgsDDSetupNodalEvaluation_Sequential_Torch()
311 static PetscErrorCode SgsDDSetupNodalEvaluation_Sequential(Ceed ceed, Honee honee, SgsDDSetupData s… in SgsDDSetupNodalEvaluation_Sequential() argument
368 …PetscCallCeed(ceed, CeedElemRestrictionGetNumComponents(sgs_dd_setup_data->elem_restr_grid_aniso, … in SgsDDSetupNodalEvaluation_Sequential()
373 …PetscCallCeed(ceed, CeedOperatorGetFieldByName(grad_velo_proj->l2_rhs_ctx->op, "velocity gradient"… in SgsDDSetupNodalEvaluation_Sequential()
374 PetscCallCeed(ceed, CeedOperatorFieldGetElemRestriction(op_field, &elem_restr_grad_velo)); in SgsDDSetupNodalEvaluation_Sequential()
375 …PetscCallCeed(ceed, CeedElemRestrictionGetNumComponents(elem_restr_grad_velo, &num_comp_grad_velo)… in SgsDDSetupNodalEvaluation_Sequential()
376 …PetscCallCeed(ceed, CeedElemRestrictionCreateVector(elem_restr_grad_velo, &sgs_dd_data->grad_velo_… in SgsDDSetupNodalEvaluation_Sequential()
378 …PetscCall(DMPlexCeedElemRestrictionCreate(ceed, honee->dm, DMLABEL_DEFAULT, DMLABEL_DEFAULT_VALUE,… in SgsDDSetupNodalEvaluation_Sequential()
379 …PetscCall(DMPlexCeedElemRestrictionCreate(ceed, sgs_dd_data->dm_sgs, DMLABEL_DEFAULT, DMLABEL_DEFA… in SgsDDSetupNodalEvaluation_Sequential()
380 …PetscCallCeed(ceed, CeedElemRestrictionCreateVector(elem_restr_sgs, &sgs_dd_data->sgs_nodal_ceed, … in SgsDDSetupNodalEvaluation_Sequential()
381 …PetscCall(DMPlexCeedElemRestrictionCollocatedCreate(ceed, sgs_dd_data->dm_sgs, DMLABEL_DEFAULT, DM… in SgsDDSetupNodalEvaluation_Sequential()
383 PetscCallCeed(ceed, CeedElemRestrictionCreateVector(elem_restr_eigvec, &eigvec, NULL)); in SgsDDSetupNodalEvaluation_Sequential()
385 …PetscCall(DMPlexCeedElemRestrictionCreate(ceed, sgs_dd_data->dm_dd_inputs, DMLABEL_DEFAULT, DMLABE… in SgsDDSetupNodalEvaluation_Sequential()
387 …PetscCall(DMPlexCeedElemRestrictionCreate(ceed, sgs_dd_data->dm_dd_outputs, DMLABEL_DEFAULT, DMLAB… in SgsDDSetupNodalEvaluation_Sequential()
390 …PetscCall(GetInverseMultiplicity(ceed, sgs_dd_data->dm_sgs, DMLABEL_DEFAULT, DMLABEL_DEFAULT_VALUE… in SgsDDSetupNodalEvaluation_Sequential()
399 … PetscCallCeed(ceed, CeedQFunctionCreateInterior(ceed, 1, ComputeSgsDDNodal_Sequential_Inputs_Prim, in SgsDDSetupNodalEvaluation_Sequential()
403 …PetscCallCeed(ceed, CeedQFunctionCreateInterior(ceed, 1, ComputeSgsDDNodal_Sequential_Inputs_Conse… in SgsDDSetupNodalEvaluation_Sequential()
407 …PetscCallCeed(ceed, CeedQFunctionCreateInterior(ceed, 1, ComputeSgsDDNodal_Sequential_Inputs_Entro… in SgsDDSetupNodalEvaluation_Sequential()
412 PetscCallCeed(ceed, CeedQFunctionSetContext(qf_sgs_dd_inputs, sgs_dd_setup_data->sgsdd_qfctx)); in SgsDDSetupNodalEvaluation_Sequential()
413 PetscCallCeed(ceed, CeedQFunctionAddInput(qf_sgs_dd_inputs, "q", num_comp_q, CEED_EVAL_NONE)); in SgsDDSetupNodalEvaluation_Sequential()
414 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_sgs_dd_inputs, "gradient velocity", num_comp_grad_vel… in SgsDDSetupNodalEvaluation_Sequential()
415 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_sgs_dd_inputs, "anisotropy tensor", num_comp_grid_ani… in SgsDDSetupNodalEvaluation_Sequential()
416 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_sgs_dd_inputs, "inverse multiplicity", 1, CEED_EVAL_N… in SgsDDSetupNodalEvaluation_Sequential()
417 …PetscCallCeed(ceed, CeedQFunctionAddOutput(qf_sgs_dd_inputs, "eigenvectors", num_comp_eigvec, CEED… in SgsDDSetupNodalEvaluation_Sequential()
418 …PetscCallCeed(ceed, CeedQFunctionAddOutput(qf_sgs_dd_inputs, "model inputs", sgs_dd_data->num_comp… in SgsDDSetupNodalEvaluation_Sequential()
420 PetscCallCeed(ceed, CeedOperatorCreate(ceed, qf_sgs_dd_inputs, NULL, NULL, &op_sgs_dd_inputs)); in SgsDDSetupNodalEvaluation_Sequential()
421 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_dd_inputs, "q", elem_restr_q, CEED_BASIS_NONE, hon… in SgsDDSetupNodalEvaluation_Sequential()
422 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_dd_inputs, "gradient velocity", elem_restr_grad_ve… in SgsDDSetupNodalEvaluation_Sequential()
423 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_dd_inputs, "anisotropy tensor", sgs_dd_setup_data-… in SgsDDSetupNodalEvaluation_Sequential()
425 PetscCallCeed(ceed, in SgsDDSetupNodalEvaluation_Sequential()
427 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_dd_inputs, "eigenvectors", elem_restr_eigvec, CEED… in SgsDDSetupNodalEvaluation_Sequential()
428 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_dd_inputs, "model inputs", elem_restr_dd_inputs, C… in SgsDDSetupNodalEvaluation_Sequential()
430 …PetscCall(OperatorApplyContextCreate(grad_velo_proj->dm, sgs_dd_data->dm_dd_inputs, ceed, op_sgs_d… in SgsDDSetupNodalEvaluation_Sequential()
432 PetscCallCeed(ceed, CeedOperatorDestroy(&op_sgs_dd_inputs)); in SgsDDSetupNodalEvaluation_Sequential()
433 PetscCallCeed(ceed, CeedQFunctionDestroy(&qf_sgs_dd_inputs)); in SgsDDSetupNodalEvaluation_Sequential()
440 …PetscCallCeed(ceed, CeedQFunctionCreateInterior(ceed, 1, ComputeSgsDDNodal_Sequential_Outputs, Com… in SgsDDSetupNodalEvaluation_Sequential()
442 PetscCallCeed(ceed, CeedQFunctionSetContext(qf_sgs_dd_outputs, sgs_dd_setup_data->sgsdd_qfctx)); in SgsDDSetupNodalEvaluation_Sequential()
443 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_sgs_dd_outputs, "model outputs", sgs_dd_data->num_com… in SgsDDSetupNodalEvaluation_Sequential()
444 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_sgs_dd_outputs, "anisotropy tensor", num_comp_grid_an… in SgsDDSetupNodalEvaluation_Sequential()
445 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_sgs_dd_outputs, "inverse multiplicity", 1, CEED_EVAL_… in SgsDDSetupNodalEvaluation_Sequential()
446 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_sgs_dd_outputs, "eigenvectors", num_comp_eigvec, CEED… in SgsDDSetupNodalEvaluation_Sequential()
447 …PetscCallCeed(ceed, CeedQFunctionAddOutput(qf_sgs_dd_outputs, "km_sgs", sgs_dd_data->num_comp_sgs,… in SgsDDSetupNodalEvaluation_Sequential()
449 … PetscCallCeed(ceed, CeedOperatorCreate(ceed, qf_sgs_dd_outputs, NULL, NULL, &op_sgs_dd_outputs)); in SgsDDSetupNodalEvaluation_Sequential()
450 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_dd_outputs, "model outputs", elem_restr_dd_outputs… in SgsDDSetupNodalEvaluation_Sequential()
451 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_dd_outputs, "anisotropy tensor", sgs_dd_setup_data… in SgsDDSetupNodalEvaluation_Sequential()
453 PetscCallCeed(ceed, in SgsDDSetupNodalEvaluation_Sequential()
455 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_dd_outputs, "eigenvectors", elem_restr_eigvec, CEE… in SgsDDSetupNodalEvaluation_Sequential()
456 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_dd_outputs, "km_sgs", elem_restr_sgs, CEED_BASIS_N… in SgsDDSetupNodalEvaluation_Sequential()
458 …PetscCall(OperatorApplyContextCreate(sgs_dd_data->dm_dd_outputs, sgs_dd_data->dm_sgs, ceed, op_sgs… in SgsDDSetupNodalEvaluation_Sequential()
460 PetscCallCeed(ceed, CeedOperatorDestroy(&op_sgs_dd_outputs)); in SgsDDSetupNodalEvaluation_Sequential()
461 PetscCallCeed(ceed, CeedQFunctionDestroy(&qf_sgs_dd_outputs)); in SgsDDSetupNodalEvaluation_Sequential()
468 …PetscCall(SgsDDSetupNodalEvaluation_Sequential_Ceed(ceed, sgs_dd_data, sgs_dd_setup_data, elem_res… in SgsDDSetupNodalEvaluation_Sequential()
472 …PetscCall(SgsDDSetupNodalEvaluation_Sequential_Torch(ceed, sgs_dd_data, sgs_dd_setup_data, elem_re… in SgsDDSetupNodalEvaluation_Sequential()
478 PetscCallCeed(ceed, CeedVectorDestroy(&inv_multiplicity)); in SgsDDSetupNodalEvaluation_Sequential()
479 PetscCallCeed(ceed, CeedVectorDestroy(&eigvec)); in SgsDDSetupNodalEvaluation_Sequential()
480 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_inv_multiplicity)); in SgsDDSetupNodalEvaluation_Sequential()
481 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_eigvec)); in SgsDDSetupNodalEvaluation_Sequential()
482 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_dd_inputs)); in SgsDDSetupNodalEvaluation_Sequential()
483 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_dd_outputs)); in SgsDDSetupNodalEvaluation_Sequential()
484 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_grad_velo)); in SgsDDSetupNodalEvaluation_Sequential()
485 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_q)); in SgsDDSetupNodalEvaluation_Sequential()
490 static PetscErrorCode SgsSetupNodalIFunction(Ceed ceed, Honee honee, SgsDDSetupData sgs_dd_setup_da… in SgsSetupNodalIFunction() argument
503 …PetscCall(DMPlexCeedElemRestrictionCreate(ceed, honee->dm, DMLABEL_DEFAULT, DMLABEL_DEFAULT_VALUE,… in SgsSetupNodalIFunction()
510 …PetscCall(DMPlexCeedBasisCreate(ceed, honee->dm, DMLABEL_DEFAULT, DMLABEL_DEFAULT_VALUE, 0, 0, &ba… in SgsSetupNodalIFunction()
511 …PetscCall(DMPlexCeedBasisCreate(ceed, sgs_dd_data->dm_sgs, DMLABEL_DEFAULT, DMLABEL_DEFAULT_VALUE,… in SgsSetupNodalIFunction()
512 …PetscCall(QDataGet(ceed, sgs_dd_data->dm_sgs, DMLABEL_DEFAULT, DMLABEL_DEFAULT_VALUE, &elem_restr_… in SgsSetupNodalIFunction()
517 …PetscCallCeed(ceed, CeedQFunctionCreateInterior(ceed, 1, IFunction_NodalSgs_Prim, IFunction_NodalS… in SgsSetupNodalIFunction()
520 …PetscCallCeed(ceed, CeedQFunctionCreateInterior(ceed, 1, IFunction_NodalSgs_Conserv, IFunction_Nod… in SgsSetupNodalIFunction()
523 …PetscCallCeed(ceed, CeedQFunctionCreateInterior(ceed, 1, IFunction_NodalSgs_Entropy, IFunction_Nod… in SgsSetupNodalIFunction()
527 PetscCallCeed(ceed, CeedQFunctionSetContext(qf_sgs_apply, sgs_dd_setup_data->ifunction_qfctx)); in SgsSetupNodalIFunction()
528 PetscCallCeed(ceed, CeedQFunctionAddInput(qf_sgs_apply, "q", num_comp_q, CEED_EVAL_INTERP)); in SgsSetupNodalIFunction()
529 PetscCallCeed(ceed, CeedQFunctionAddInput(qf_sgs_apply, "qdata", q_data_size, CEED_EVAL_NONE)); in SgsSetupNodalIFunction()
530 …PetscCallCeed(ceed, CeedQFunctionAddInput(qf_sgs_apply, "km_sgs", sgs_dd_data->num_comp_sgs, CEED_… in SgsSetupNodalIFunction()
531 …PetscCallCeed(ceed, CeedQFunctionAddOutput(qf_sgs_apply, "Grad_v", num_comp_q * dim, CEED_EVAL_GRA… in SgsSetupNodalIFunction()
533 PetscCallCeed(ceed, CeedOperatorCreate(ceed, qf_sgs_apply, NULL, NULL, &op_sgs_apply)); in SgsSetupNodalIFunction()
534 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_apply, "q", elem_restr_q, basis_q, CEED_VECTOR_ACT… in SgsSetupNodalIFunction()
535 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_apply, "qdata", elem_restr_qd, CEED_BASIS_NONE, q_… in SgsSetupNodalIFunction()
536 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_apply, "km_sgs", sgs_dd_setup_data->elem_restr_sgs… in SgsSetupNodalIFunction()
537 …PetscCallCeed(ceed, CeedOperatorSetField(op_sgs_apply, "Grad_v", elem_restr_q, basis_q, CEED_VECTO… in SgsSetupNodalIFunction()
539 …PetscCall(OperatorApplyContextCreate(honee->dm, honee->dm, ceed, op_sgs_apply, honee->q_ceed, hone… in SgsSetupNodalIFunction()
542 PetscCallCeed(ceed, CeedVectorDestroy(&q_data)); in SgsSetupNodalIFunction()
543 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_qd)); in SgsSetupNodalIFunction()
544 PetscCallCeed(ceed, CeedBasisDestroy(&basis_sgs)); in SgsSetupNodalIFunction()
545 PetscCallCeed(ceed, CeedOperatorDestroy(&op_sgs_apply)); in SgsSetupNodalIFunction()
546 PetscCallCeed(ceed, CeedQFunctionDestroy(&qf_sgs_apply)); in SgsSetupNodalIFunction()
547 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_q)); in SgsSetupNodalIFunction()
548 PetscCallCeed(ceed, CeedBasisDestroy(&basis_q)); in SgsSetupNodalIFunction()
644 PetscErrorCode SgsDDSetup(Ceed ceed, Honee honee, ProblemData problem) { in SgsDDSetup() argument
659 …PetscCall(DMPlexCeedElemRestrictionCreate(ceed, honee->dm, DMLABEL_DEFAULT, DMLABEL_DEFAULT_VALUE,… in SgsDDSetup()
660 …PetscCall(DMPlexCeedBasisCreate(ceed, honee->dm, DMLABEL_DEFAULT, DMLABEL_DEFAULT_VALUE, 0, 0, &ba… in SgsDDSetup()
662 …PetscCall(VelocityGradientProjectionSetup(ceed, honee, problem, honee->phys->state_var, elem_restr… in SgsDDSetup()
663 PetscCallCeed(ceed, CeedElemRestrictionDestroy(&elem_restr_q)); in SgsDDSetup()
664 PetscCallCeed(ceed, CeedBasisDestroy(&basis_q)); in SgsDDSetup()
700 …PetscCallCeed(ceed, CeedQFunctionContextGetDataRead(problem->apply_vol_ifunction.qfctx, CEED_MEM_H… in SgsDDSetup()
702 …PetscCallCeed(ceed, CeedQFunctionContextRestoreDataRead(problem->apply_vol_ifunction.qfctx, &newt_… in SgsDDSetup()
703 PetscCallCeed(ceed, CeedQFunctionContextCreate(honee->ceed, &sgs_dd_setup_data->sgsdd_qfctx)); in SgsDDSetup()
704 PetscCallCeed(ceed, in SgsDDSetup()
706 …PetscCallCeed(ceed, CeedQFunctionContextSetDataDestroy(sgs_dd_setup_data->sgsdd_qfctx, CEED_MEM_HO… in SgsDDSetup()
708 …PetscCallCeed(ceed, CeedQFunctionContextReferenceCopy(problem->apply_vol_ifunction.qfctx, &sgs_dd_… in SgsDDSetup()
711 …PetscCall(GridAnisotropyTensorProjectionSetupApply(ceed, honee, &sgs_dd_setup_data->elem_restr_gri… in SgsDDSetup()
716 PetscCall(SgsDDSetupNodalEvaluation_Fused(ceed, honee, sgs_dd_setup_data)); in SgsDDSetup()
720 PetscCall(SgsDDSetupNodalEvaluation_Sequential(ceed, honee, sgs_dd_setup_data)); in SgsDDSetup()
725 PetscCall(SgsSetupNodalIFunction(ceed, honee, sgs_dd_setup_data)); in SgsDDSetup()