Searched refs:valsCopy2 (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/dm/dt/tests/ |
| H A D | ex4.c | 13 PetscScalar *vals, *valsCopy, *valsCopy2; in CheckSymmetry() local
35 … &idsCopy, nFunc, &idsCopy2, nFunc * dim, &vals, nFunc * dim, &valsCopy, nFunc * dim, &valsCopy2)); in CheckSymmetry()
46 for (j = 0; j < dim; j++) vals[dim * i + j] = valsCopy2[dim * i + j] = (PetscScalar)points[j]; in CheckSymmetry()
97 …for (l = 0; l < dim; l++) valsCopy2[(offset + k) * dim + l] = valsCopy[kLocal * dim + l] * (flip ?… in CheckSymmetry()
102 …valsCopy2[dim * k + l] == vals[dim * k + l], PETSC_COMM_SELF, PETSC_ERR_PLIB, "Symmetry failure: %… in CheckSymmetry()
109 PetscCall(PetscFree6(ids, idsCopy, idsCopy2, vals, valsCopy, valsCopy2)); in CheckSymmetry()
|