Searched refs:diag_ary (Results 1 – 1 of 1) sorted by relevance
48 const PetscScalar *diag_ary; in ComputeDamping() local55 PetscCall(VecGetArrayRead(gn->diag, &diag_ary)); in ComputeDamping()57 …for (i = 0; i < n; i++) damping_ary[i] = PetscClipInterval(diag_ary[i], PETSC_SQRT_MACHINE_EPSILON… in ComputeDamping()60 PetscCall(VecRestoreArrayRead(gn->diag, &diag_ary)); in ComputeDamping()169 PetscScalar *cnorms, *diag_ary; in GNComputeHessian() local208 PetscCall(VecGetArray(gn->diag, &diag_ary)); in GNComputeHessian()209 for (i = 0; i < cend - cstart; i++) diag_ary[i] = cnorms[cstart + i] * cnorms[cstart + i]; in GNComputeHessian()210 PetscCall(VecRestoreArray(gn->diag, &diag_ary)); in GNComputeHessian()