Home
last modified time | relevance | path

Searched refs:phypts (Results 1 – 3 of 3) sorted by relevance

/petsc/src/dm/impls/moab/
H A Ddmmbfem.cxx110 …etscReal *coords, const PetscInt npts, const PetscReal *quad, PetscReal *phypts, PetscReal *jxw, P… in Compute_Lagrange_Basis_1D_Internal() argument
118 if (phypts) PetscCall(PetscArrayzero(phypts, npts * 3)); in Compute_Lagrange_Basis_1D_Internal()
137 if (phypts) phypts[3 * j + 0] += phi[i + offset] * vertices[0]; in Compute_Lagrange_Basis_1D_Internal()
166 if (phypts) phypts[3 * j + 0] += phi[i + offset] * vertices[0]; in Compute_Lagrange_Basis_1D_Internal()
220 …etscReal *coords, const PetscInt npts, const PetscReal *quad, PetscReal *phypts, PetscReal *jxw, P… in Compute_Lagrange_Basis_2D_Internal() argument
229 if (phypts) PetscCall(PetscArrayzero(phypts, npts * 3)); in Compute_Lagrange_Basis_2D_Internal()
257 if (phypts) { in Compute_Lagrange_Basis_2D_Internal()
258 phypts[3 * j + 0] += phi[i + offset] * vertices[0]; in Compute_Lagrange_Basis_2D_Internal()
259 phypts[3 * j + 1] += phi[i + offset] * vertices[1]; in Compute_Lagrange_Basis_2D_Internal()
260 phypts[3 * j + 2] += phi[i + offset] * vertices[2]; in Compute_Lagrange_Basis_2D_Internal()
[all …]
/petsc/src/ksp/ksp/tutorials/
H A Dex36.cxx265 PetscReal *phi, *phypts, *jxw; in ComputeRHS_MOAB() local
277 PetscCall(PetscMalloc3(user->VPERE * npoints, &phi, npoints * 3, &phypts, npoints, &jxw)); in ComputeRHS_MOAB()
299 PetscCall(DMMoabFEMComputeBasis(user->dim, nconn, vpos, quadratureObj, phypts, jxw, phi, NULL)); in ComputeRHS_MOAB()
304 const double ff = ForcingFunction(&phypts[3 * q], user); in ComputeRHS_MOAB()
343 PetscCall(PetscFree3(phi, phypts, jxw)); in ComputeRHS_MOAB()
361 PetscReal *phi, *dphi[3], *phypts, *jxw; in ComputeMatrix_MOAB() local
376 …>VPERE * npoints, &dphi[1], user->VPERE * npoints, &dphi[2], npoints * 3, &phypts, npoints, &jxw)); in ComputeMatrix_MOAB()
394 PetscCall(DMMoabFEMComputeBasis(user->dim, nconn, vpos, quadratureObj, phypts, jxw, phi, dphi)); in ComputeMatrix_MOAB()
402 rho = ComputeDiffusionCoefficient(&phypts[q * 3], user); in ComputeMatrix_MOAB()
403 alpha = ComputeReactionCoefficient(&phypts[q * 3], user); in ComputeMatrix_MOAB()
[all …]
H A Dex35.cxx294 PetscReal *phi, *phypts, *jxw; in ComputeRHS() local
306 PetscCall(PetscMalloc3(user->VPERE * npoints, &phi, npoints * 3, &phypts, npoints, &jxw)); in ComputeRHS()
334 PetscCall(DMMoabFEMComputeBasis(2, nconn, vpos, quadratureObj, phypts, jxw, phi, NULL)); in ComputeRHS()
338 ff = ComputeForcingFunction(&phypts[3 * q], user); in ComputeRHS()
379 PetscCall(PetscFree3(phi, phypts, jxw)); in ComputeRHS()
397 PetscReal *phi, *dphi[2], *phypts, *jxw; in ComputeMatrix() local
412 …>VPERE * npoints, &dphi[0], user->VPERE * npoints, &dphi[1], npoints * 3, &phypts, npoints, &jxw)); in ComputeMatrix()
434 PetscCall(DMMoabFEMComputeBasis(2, nconn, vpos, quadratureObj, phypts, jxw, phi, dphi)); in ComputeMatrix()
443 rho = ComputeDiffusionCoefficient(&phypts[q * 3], user); in ComputeMatrix()
488 PetscCall(PetscFree5(phi, dphi[0], dphi[1], phypts, jxw)); in ComputeMatrix()