Searched refs:Uk (Results 1 – 3 of 3) sorted by relevance
| /petsc/src/ts/utils/dmplexlandau/ |
| H A D | land_tensors.h | 71 … x[], const PetscReal rp, const PetscReal zp, PetscReal Ud[][2], PetscReal Uk[][2], const PetscRea… in LandauTensor2D()
99 Ud[0][1] = Ud[1][0] = Uk[0][1] = pi4pow * (zmzp) * (r * i2func - rp * i3func); in LandauTensor2D()
100 Uk[1][1] = Ud[1][1] = -pi4pow * ((r2prp2)*i2func - 2 * r * rp * i3func) * mask; in LandauTensor2D()
101 Uk[0][0] = -pi4pow * (zmzp2 * i3func + r * rp * i1func); in LandauTensor2D()
102 …Uk[1][0] = pi4pow * (zmzp) * (r * i3func - rp * i2func); /* 48 mults + 21 + 21 = 90 mul… in LandauTensor2D()
|
| H A D | plexland.c | 356 …PetscReal Ud[2][2], Uk[2][2], mask = (PetscAbs(vj[0] - x) < 100 * PETSC_SQRT_MACHINE_EPSILON && Pe… in LandauFormJacobian_Internal() local
357 LandauTensor2D(vj, x, y, Ud, Uk, mask); in LandauFormJacobian_Internal()
386 gg2_temp[d2] += Uk[d2][d3] * temp1[d3]; in LandauFormJacobian_Internal()
|
| /petsc/src/ts/utils/dmplexlandau/kokkos/ |
| H A D | landau.kokkos.cxx | 616 …PetscReal Ud[2][2], Uk[2][2], mask = (PetscAbs(vj[0] - x) < 100 * PETSC_SQRT_MACHINE_EPSILON && Pe… in LandauKokkosJacobian() local
617 LandauTensor2D(vj, x, y, Ud, Uk, mask); in LandauKokkosJacobian()
648 ggg.gg2[d2] += Uk[d2][d3] * temp1[d3]; in LandauKokkosJacobian()
|