Home
last modified time | relevance | path

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

/petsc/src/ts/utils/dmplexlandau/
H A Dland_tensors.h73 … x[0], z = x[1], i1func, i2func, i3func, ks, es, pi4pow, sqrt_1s, r2, rp2, r2prp2, zmzp, zmzp2, tt; in LandauTensor2D() local
77 zmzp = z - zp; in LandauTensor2D()
79 zmzp2 = PetscSqr(zmzp); in LandauTensor2D()
98 Ud[0][0] = -pi4pow * (rp2 * i1func + PetscSqr(zmzp) * i2func); in LandauTensor2D()
99 Ud[0][1] = Ud[1][0] = Uk[0][1] = pi4pow * (zmzp) * (r * i2func - rp * i3func); in LandauTensor2D()
102 …Uk[1][0] = pi4pow * (zmzp) * (r * i3func - rp * i2func); /* 48 mults + 21 + 21 = 90 mul… in LandauTensor2D()