Lines Matching refs:nodesets
12 PetscReal **nodesets; member
61 for (i = 0; i < nc; i++) PetscCall(PetscFree((*nf)->nodesets[i])); in Petsc1DNodeFamilyDestroy()
62 PetscCall(PetscFree((*nf)->nodesets)); in Petsc1DNodeFamilyDestroy()
68 …ErrorCode Petsc1DNodeFamilyGetNodeSets(Petsc1DNodeFamily f, PetscInt degree, PetscReal ***nodesets) in Petsc1DNodeFamilyGetNodeSets() argument
80 PetscCall(PetscArraycpy(new_nodesets, f->nodesets, nc)); in Petsc1DNodeFamilyGetNodeSets()
81 PetscCall(PetscFree(f->nodesets)); in Petsc1DNodeFamilyGetNodeSets()
82 f->nodesets = new_nodesets; in Petsc1DNodeFamilyGetNodeSets()
85 PetscCall(PetscMalloc1(i + 1, &f->nodesets[i])); in Petsc1DNodeFamilyGetNodeSets()
87 f->nodesets[i][0] = 0.5; in Petsc1DNodeFamilyGetNodeSets()
92 for (j = 0; j <= i; j++) f->nodesets[i][j] = (PetscReal)j / (PetscReal)i; in Petsc1DNodeFamilyGetNodeSets()
96 for (j = 0; j <= i; j++) f->nodesets[i][j] = ((PetscReal)j + 0.5) / ((PetscReal)i + 1.); in Petsc1DNodeFamilyGetNodeSets()
101 …ssLobattoJacobiQuadrature(i + 1, 0., 1., f->gaussJacobiExp, f->gaussJacobiExp, f->nodesets[i], w)); in Petsc1DNodeFamilyGetNodeSets()
103 …scDTGaussJacobiQuadrature(i + 1, 0., 1., f->gaussJacobiExp, f->gaussJacobiExp, f->nodesets[i], w)); in Petsc1DNodeFamilyGetNodeSets()
114 *nodesets = f->nodesets; in Petsc1DNodeFamilyGetNodeSets()
119 … PetscNodeRecursive_Internal(PetscInt dim, PetscInt degree, PetscReal **nodesets, PetscInt tup[], … in PetscNodeRecursive_Internal() argument
127 node[0] = nodesets[degree][tup[0]]; in PetscNodeRecursive_Internal()
128 node[1] = nodesets[degree][tup[1]]; in PetscNodeRecursive_Internal()
132 PetscReal wi = nodesets[degree][degree - tup[i]]; in PetscNodeRecursive_Internal()
135 …PetscCall(PetscNodeRecursive_Internal(dim - 1, degree - tup[i], nodesets, &tup[dim + 1], &node[dim… in PetscNodeRecursive_Internal()
149 PetscReal **nodesets = NULL; in Petsc1DNodeFamilyComputeSimplexNodes() local
160 PetscCall(Petsc1DNodeFamilyGetNodeSets(f, degree, &nodesets)); in Petsc1DNodeFamilyComputeSimplexNodes()
188 PetscCall(PetscNodeRecursive_Internal(dim, degree, nodesets, tupwork, nodework)); in Petsc1DNodeFamilyComputeSimplexNodes()