Searched refs:zmzp (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ts/utils/dmplexlandau/ |
| H A D | land_tensors.h | 73 … 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()
|