Searched refs:sgn (Results 1 – 4 of 4) sorted by relevance
| /petsc/src/ksp/ksp/impls/gmres/agmres/ |
| H A D | agmresorthog.c | 117 PetscScalar *sgn = agmres->sgn; in KSPAGMRESRoddec() local 213 sgn[d] = PetscSign(*RLOC(d, d)); in KSPAGMRESRoddec() 214 PetscCallBLAS("BLASscal", BLASscal_(&bpos, &sgn[d], RLOC(d, d), &N)); in KSPAGMRESRoddec() 238 PetscScalar *sgn = agmres->sgn; in KSPAGMRESRodvec() local 260 for (i = 0; i < nvec; i++) y[i] = sgn[i] * y[i]; in KSPAGMRESRodvec()
|
| H A D | agmresimpl.h | 26 …PetscScalar *sgn; /* Sign of the rotation in the QR factorization of the b… member
|
| H A D | agmres.c | 47 …PetscCall(PetscCalloc4(N + 1, &agmres->Scale, N + 1, &agmres->sgn, N + 1, &agmres->tloc, N + 1, &a… in KSPSetUp_AGMRES() 498 PetscCall(PetscFree4(agmres->Scale, agmres->sgn, agmres->tloc, agmres->temp)); in KSPDestroy_AGMRES()
|
| /petsc/src/dm/impls/plex/tests/ |
| H A D | ex8.c | 210 const PetscInt sgn = dim == 1 ? (f == 0 ? -1 : 1) : (ornt[f] < 0 ? -1 : 1); in CheckGaussLaw() local 213 for (d = 0; d < cdim; ++d) integral[d] += sgn * area * normal[d]; in CheckGaussLaw()
|