Lines Matching refs:sp
19 PetscErrorCode PetscSpaceSumGetNumSubspaces(PetscSpace sp, PetscInt *numSumSpaces) in PetscSpaceSumGetNumSubspaces() argument
22 PetscValidHeaderSpecific(sp, PETSCSPACE_CLASSID, 1); in PetscSpaceSumGetNumSubspaces()
24 …PetscTryMethod(sp, "PetscSpaceSumGetNumSubspaces_C", (PetscSpace, PetscInt *), (sp, numSumSpaces)); in PetscSpaceSumGetNumSubspaces()
42 PetscErrorCode PetscSpaceSumSetNumSubspaces(PetscSpace sp, PetscInt numSumSpaces) in PetscSpaceSumSetNumSubspaces() argument
45 PetscValidHeaderSpecific(sp, PETSCSPACE_CLASSID, 1); in PetscSpaceSumSetNumSubspaces()
46 PetscTryMethod(sp, "PetscSpaceSumSetNumSubspaces_C", (PetscSpace, PetscInt), (sp, numSumSpaces)); in PetscSpaceSumSetNumSubspaces()
68 PetscErrorCode PetscSpaceSumGetConcatenate(PetscSpace sp, PetscBool *concatenate) in PetscSpaceSumGetConcatenate() argument
71 PetscValidHeaderSpecific(sp, PETSCSPACE_CLASSID, 1); in PetscSpaceSumGetConcatenate()
72 PetscTryMethod(sp, "PetscSpaceSumGetConcatenate_C", (PetscSpace, PetscBool *), (sp, concatenate)); in PetscSpaceSumGetConcatenate()
92 PetscErrorCode PetscSpaceSumSetConcatenate(PetscSpace sp, PetscBool concatenate) in PetscSpaceSumSetConcatenate() argument
95 PetscValidHeaderSpecific(sp, PETSCSPACE_CLASSID, 1); in PetscSpaceSumSetConcatenate()
96 PetscTryMethod(sp, "PetscSpaceSumSetConcatenate_C", (PetscSpace, PetscBool), (sp, concatenate)); in PetscSpaceSumSetConcatenate()
117 PetscErrorCode PetscSpaceSumGetSubspace(PetscSpace sp, PetscInt s, PetscSpace *subsp) in PetscSpaceSumGetSubspace() argument
120 PetscValidHeaderSpecific(sp, PETSCSPACE_CLASSID, 1); in PetscSpaceSumGetSubspace()
122 …PetscTryMethod(sp, "PetscSpaceSumGetSubspace_C", (PetscSpace, PetscInt, PetscSpace *), (sp, s, sub… in PetscSpaceSumGetSubspace()
141 PetscErrorCode PetscSpaceSumSetSubspace(PetscSpace sp, PetscInt s, PetscSpace subsp) in PetscSpaceSumSetSubspace() argument
144 PetscValidHeaderSpecific(sp, PETSCSPACE_CLASSID, 1); in PetscSpaceSumSetSubspace()
146 …PetscTryMethod(sp, "PetscSpaceSumSetSubspace_C", (PetscSpace, PetscInt, PetscSpace), (sp, s, subsp… in PetscSpaceSumSetSubspace()
178 static PetscErrorCode PetscSpaceSumGetConcatenate_Sum(PetscSpace sp, PetscBool *concatenate) in PetscSpaceSumGetConcatenate_Sum() argument
180 PetscSpace_Sum *sum = (PetscSpace_Sum *)sp->data; in PetscSpaceSumGetConcatenate_Sum()
187 static PetscErrorCode PetscSpaceSumSetConcatenate_Sum(PetscSpace sp, PetscBool concatenate) in PetscSpaceSumSetConcatenate_Sum() argument
189 PetscSpace_Sum *sum = (PetscSpace_Sum *)sp->data; in PetscSpaceSumSetConcatenate_Sum()
192 …PetscCheck(!sum->setupcalled, PetscObjectComm((PetscObject)sp), PETSC_ERR_ARG_WRONGSTATE, "Cannot … in PetscSpaceSumSetConcatenate_Sum()
227 static PetscErrorCode PetscSpaceSetFromOptions_Sum(PetscSpace sp, PetscOptionItems PetscOptionsObje… in PetscSpaceSetFromOptions_Sum() argument
229 PetscSpace_Sum *sum = (PetscSpace_Sum *)sp->data; in PetscSpaceSetFromOptions_Sum()
235 PetscCall(PetscSpaceGetNumVariables(sp, &Nv)); in PetscSpaceSetFromOptions_Sum()
237 PetscCall(PetscSpaceGetNumComponents(sp, &Nc)); in PetscSpaceSetFromOptions_Sum()
238 PetscCall(PetscSpaceSumGetNumSubspaces(sp, &Ns)); in PetscSpaceSetFromOptions_Sum()
239 PetscCall(PetscSpaceGetDegree(sp, °, NULL)); in PetscSpaceSetFromOptions_Sum()
247 …PetscCheck(Ns >= 0 && (Nv <= 0 || Ns != 0), PetscObjectComm((PetscObject)sp), PETSC_ERR_ARG_OUTOFR… in PetscSpaceSetFromOptions_Sum()
248 if (Ns != sum->numSumSpaces) PetscCall(PetscSpaceSumSetNumSubspaces(sp, Ns)); in PetscSpaceSetFromOptions_Sum()
249 PetscCall(PetscObjectGetOptionsPrefix((PetscObject)sp, &prefix)); in PetscSpaceSetFromOptions_Sum()
254 PetscCall(PetscSpaceSumGetSubspace(sp, i, &subspace)); in PetscSpaceSetFromOptions_Sum()
258 PetscCall(PetscSpaceCreate(PetscObjectComm((PetscObject)sp), &subspace)); in PetscSpaceSetFromOptions_Sum()
265 …PetscCheck(sNv, PetscObjectComm((PetscObject)sp), PETSC_ERR_ARG_WRONGSTATE, "Subspace %" PetscInt_… in PetscSpaceSetFromOptions_Sum()
266 PetscCall(PetscSpaceSumSetSubspace(sp, i, subspace)); in PetscSpaceSetFromOptions_Sum()
272 static PetscErrorCode PetscSpaceSetUp_Sum(PetscSpace sp) in PetscSpaceSetUp_Sum() argument
274 PetscSpace_Sum *sum = (PetscSpace_Sum *)sp->data; in PetscSpaceSetUp_Sum()
283 PetscCall(PetscSpaceGetNumVariables(sp, &Nv)); in PetscSpaceSetUp_Sum()
284 PetscCall(PetscSpaceGetNumComponents(sp, &Nc)); in PetscSpaceSetUp_Sum()
285 PetscCall(PetscSpaceSumGetNumSubspaces(sp, &Ns)); in PetscSpaceSetUp_Sum()
288 PetscCall(PetscSpaceSumSetNumSubspaces(sp, Ns)); in PetscSpaceSetUp_Sum()
290 …PetscCheck(Ns >= 0, PetscObjectComm((PetscObject)sp), PETSC_ERR_ARG_OUTOFRANGE, "Cannot have %" Pe… in PetscSpaceSetUp_Sum()
295 PetscCall(PetscSpaceSumGetSubspace(sp, 0, &s0)); in PetscSpaceSetUp_Sum()
299 PetscCall(PetscSpaceSumGetSubspace(sp, i, &si)); in PetscSpaceSetUp_Sum()
313 PetscCall(PetscSpaceSumGetSubspace(sp, i, &si)); in PetscSpaceSetUp_Sum()
316 …PetscCheck(sNv == Nv, PetscObjectComm((PetscObject)sp), PETSC_ERR_ARG_WRONGSTATE, "Subspace %" Pet… in PetscSpaceSetUp_Sum()
322 PetscCall(PetscSpaceSumGetSubspace(sp, i, &si)); in PetscSpaceSetUp_Sum()
328 …if (concatenate) PetscCheck(sum_Nc == Nc, PetscObjectComm((PetscObject)sp), PETSC_ERR_ARG_OUTOFRAN… in PetscSpaceSetUp_Sum()
329 …else PetscCheck(minNc == Nc && maxNc == Nc, PetscObjectComm((PetscObject)sp), PETSC_ERR_ARG_OUTOFR… in PetscSpaceSetUp_Sum()
331 sp->degree = deg; in PetscSpaceSetUp_Sum()
332 sp->maxDegree = maxDeg; in PetscSpaceSetUp_Sum()
339 static PetscErrorCode PetscSpaceSumView_Ascii(PetscSpace sp, PetscViewer v) in PetscSpaceSumView_Ascii() argument
341 PetscSpace_Sum *sum = (PetscSpace_Sum *)sp->data; in PetscSpaceSumView_Ascii()
356 static PetscErrorCode PetscSpaceView_Sum(PetscSpace sp, PetscViewer viewer) in PetscSpaceView_Sum() argument
362 if (isascii) PetscCall(PetscSpaceSumView_Ascii(sp, viewer)); in PetscSpaceView_Sum()
366 static PetscErrorCode PetscSpaceDestroy_Sum(PetscSpace sp) in PetscSpaceDestroy_Sum() argument
368 PetscSpace_Sum *sum = (PetscSpace_Sum *)sp->data; in PetscSpaceDestroy_Sum()
379 for (d = 0; d < sp->Nv; ++d) PetscCall(PetscSpaceDestroy(&sum->heightsubspaces[d])); in PetscSpaceDestroy_Sum()
382 PetscCall(PetscObjectComposeFunction((PetscObject)sp, "PetscSpaceSumSetSubspace_C", NULL)); in PetscSpaceDestroy_Sum()
383 PetscCall(PetscObjectComposeFunction((PetscObject)sp, "PetscSpaceSumGetSubspace_C", NULL)); in PetscSpaceDestroy_Sum()
384 PetscCall(PetscObjectComposeFunction((PetscObject)sp, "PetscSpaceSumSetNumSubspaces_C", NULL)); in PetscSpaceDestroy_Sum()
385 PetscCall(PetscObjectComposeFunction((PetscObject)sp, "PetscSpaceSumGetNumSubspaces_C", NULL)); in PetscSpaceDestroy_Sum()
386 PetscCall(PetscObjectComposeFunction((PetscObject)sp, "PetscSpaceSumGetConcatenate_C", NULL)); in PetscSpaceDestroy_Sum()
387 PetscCall(PetscObjectComposeFunction((PetscObject)sp, "PetscSpaceSumSetConcatenate_C", NULL)); in PetscSpaceDestroy_Sum()
388 PetscCall(PetscObjectComposeFunction((PetscObject)sp, "PetscSpaceSumGetInterleave_C", NULL)); in PetscSpaceDestroy_Sum()
389 PetscCall(PetscObjectComposeFunction((PetscObject)sp, "PetscSpaceSumSetInterleave_C", NULL)); in PetscSpaceDestroy_Sum()
394 static PetscErrorCode PetscSpaceGetDimension_Sum(PetscSpace sp, PetscInt *dim) in PetscSpaceGetDimension_Sum() argument
396 PetscSpace_Sum *sum = (PetscSpace_Sum *)sp->data; in PetscSpaceGetDimension_Sum()
401 PetscCall(PetscSpaceSetUp(sp)); in PetscSpaceGetDimension_Sum()
402 PetscCall(PetscSpaceGetDimension(sp, dim)); in PetscSpaceGetDimension_Sum()
417 static PetscErrorCode PetscSpaceEvaluate_Sum(PetscSpace sp, PetscInt npoints, const PetscReal point… in PetscSpaceEvaluate_Sum() argument
419 PetscSpace_Sum *sum = (PetscSpace_Sum *)sp->data; in PetscSpaceEvaluate_Sum()
421 DM dm = sp->dm; in PetscSpaceEvaluate_Sum()
422 PetscInt Nc = sp->Nc, Nv = sp->Nv, Ns = sum->numSumSpaces; in PetscSpaceEvaluate_Sum()
428 PetscCall(PetscSpaceSetUp(sp)); in PetscSpaceEvaluate_Sum()
429 PetscCall(PetscSpaceEvaluate(sp, npoints, points, B, D, H)); in PetscSpaceEvaluate_Sum()
432 PetscCall(PetscSpaceGetDimension(sp, &pdimfull)); in PetscSpaceEvaluate_Sum()
452 …PetscCheck(offset + spdim <= pdimfull, PetscObjectComm((PetscObject)sp), PETSC_ERR_ARG_OUTOFRANGE,… in PetscSpaceEvaluate_Sum()
505 static PetscErrorCode PetscSpaceGetHeightSubspace_Sum(PetscSpace sp, PetscInt height, PetscSpace *s… in PetscSpaceGetHeightSubspace_Sum() argument
507 PetscSpace_Sum *sum = (PetscSpace_Sum *)sp->data; in PetscSpaceGetHeightSubspace_Sum()
512 PetscCall(PetscSpaceGetNumComponents(sp, &Nc)); in PetscSpaceGetHeightSubspace_Sum()
513 PetscCall(PetscSpaceGetNumVariables(sp, &dim)); in PetscSpaceGetHeightSubspace_Sum()
514 PetscCall(PetscSpaceGetDegree(sp, &order, NULL)); in PetscSpaceGetHeightSubspace_Sum()
515 PetscCall(PetscSpacePolynomialGetTensor(sp, &tensor)); in PetscSpaceGetHeightSubspace_Sum()
523 PetscCall(PetscSpaceCreate(PetscObjectComm((PetscObject)sp), &sub)); in PetscSpaceGetHeightSubspace_Sum()
524 PetscCall(PetscObjectGetName((PetscObject)sp, &name)); in PetscSpaceGetHeightSubspace_Sum()
562 PetscErrorCode PetscSpaceSumSetInterleave(PetscSpace sp, PetscBool interleave_basis, PetscBool inte… in PetscSpaceSumSetInterleave() argument
565 PetscValidHeaderSpecific(sp, PETSCSPACE_CLASSID, 1); in PetscSpaceSumSetInterleave()
566 …PetscTryMethod(sp, "PetscSpaceSumSetInterleave_C", (PetscSpace, PetscBool, PetscBool), (sp, interl… in PetscSpaceSumSetInterleave()
570 static PetscErrorCode PetscSpaceSumSetInterleave_Sum(PetscSpace sp, PetscBool interleave_basis, Pet… in PetscSpaceSumSetInterleave_Sum() argument
572 PetscSpace_Sum *sum = (PetscSpace_Sum *)sp->data; in PetscSpaceSumSetInterleave_Sum()
597 PetscErrorCode PetscSpaceSumGetInterleave(PetscSpace sp, PeOp PetscBool *interleave_basis, PeOp Pet… in PetscSpaceSumGetInterleave() argument
600 PetscValidHeaderSpecific(sp, PETSCSPACE_CLASSID, 1); in PetscSpaceSumGetInterleave()
603 …PetscTryMethod(sp, "PetscSpaceSumGetInterleave_C", (PetscSpace, PetscBool *, PetscBool *), (sp, in… in PetscSpaceSumGetInterleave()
607 static PetscErrorCode PetscSpaceSumGetInterleave_Sum(PetscSpace sp, PetscBool *interleave_basis, Pe… in PetscSpaceSumGetInterleave_Sum() argument
609 PetscSpace_Sum *sum = (PetscSpace_Sum *)sp->data; in PetscSpaceSumGetInterleave_Sum()
617 static PetscErrorCode PetscSpaceInitialize_Sum(PetscSpace sp) in PetscSpaceInitialize_Sum() argument
620 sp->ops->setfromoptions = PetscSpaceSetFromOptions_Sum; in PetscSpaceInitialize_Sum()
621 sp->ops->setup = PetscSpaceSetUp_Sum; in PetscSpaceInitialize_Sum()
622 sp->ops->view = PetscSpaceView_Sum; in PetscSpaceInitialize_Sum()
623 sp->ops->destroy = PetscSpaceDestroy_Sum; in PetscSpaceInitialize_Sum()
624 sp->ops->getdimension = PetscSpaceGetDimension_Sum; in PetscSpaceInitialize_Sum()
625 sp->ops->evaluate = PetscSpaceEvaluate_Sum; in PetscSpaceInitialize_Sum()
626 sp->ops->getheightsubspace = PetscSpaceGetHeightSubspace_Sum; in PetscSpaceInitialize_Sum()
628 …PetscCall(PetscObjectComposeFunction((PetscObject)sp, "PetscSpaceSumGetNumSubspaces_C", PetscSpace… in PetscSpaceInitialize_Sum()
629 …PetscCall(PetscObjectComposeFunction((PetscObject)sp, "PetscSpaceSumSetNumSubspaces_C", PetscSpace… in PetscSpaceInitialize_Sum()
630 …PetscCall(PetscObjectComposeFunction((PetscObject)sp, "PetscSpaceSumGetSubspace_C", PetscSpaceSumG… in PetscSpaceInitialize_Sum()
631 …PetscCall(PetscObjectComposeFunction((PetscObject)sp, "PetscSpaceSumSetSubspace_C", PetscSpaceSumS… in PetscSpaceInitialize_Sum()
632 …PetscCall(PetscObjectComposeFunction((PetscObject)sp, "PetscSpaceSumGetConcatenate_C", PetscSpaceS… in PetscSpaceInitialize_Sum()
633 …PetscCall(PetscObjectComposeFunction((PetscObject)sp, "PetscSpaceSumSetConcatenate_C", PetscSpaceS… in PetscSpaceInitialize_Sum()
634 …PetscCall(PetscObjectComposeFunction((PetscObject)sp, "PetscSpaceSumGetInterleave_C", PetscSpaceSu… in PetscSpaceInitialize_Sum()
635 …PetscCall(PetscObjectComposeFunction((PetscObject)sp, "PetscSpaceSumSetInterleave_C", PetscSpaceSu… in PetscSpaceInitialize_Sum()
652 PETSC_EXTERN PetscErrorCode PetscSpaceCreate_Sum(PetscSpace sp) in PetscSpaceCreate_Sum() argument
657 PetscValidHeaderSpecific(sp, PETSCSPACE_CLASSID, 1); in PetscSpaceCreate_Sum()
660 sp->data = sum; in PetscSpaceCreate_Sum()
661 PetscCall(PetscSpaceInitialize_Sum(sp)); in PetscSpaceCreate_Sum()