| /petsc/src/benchmarks/ |
| H A D | PetscVecNorm.c | 20 PetscCall(VecNorm(x, NORM_2, &norm)); in main() 21 PetscCall(VecNorm(x, NORM_2, &norm)); in main() 22 PetscCall(VecNorm(x, NORM_2, &norm)); in main() 23 PetscCall(VecNorm(x, NORM_2, &norm)); in main() 24 PetscCall(VecNorm(x, NORM_2, &norm)); in main() 25 PetscCall(VecNorm(x, NORM_2, &norm)); in main() 26 PetscCall(VecNorm(x, NORM_2, &norm)); in main() 27 PetscCall(VecNorm(x, NORM_2, &norm)); in main() 28 PetscCall(VecNorm(x, NORM_2, &norm)); in main() 29 PetscCall(VecNorm(x, NORM_2, &norm)); in main()
|
| /petsc/src/ksp/ksp/impls/cg/pipecgrr/ |
| H A D | pipecgrr.c | 60 PetscCall(VecNormBegin(U, NORM_2, &dp)); /* dp <- u'*u = e'*A'*B'*B*A'*e' */ in KSPSolve_PIPECGRR() 61 PetscCall(VecNormBegin(B, NORM_2, &db)); in KSPSolve_PIPECGRR() 64 PetscCall(VecNormEnd(U, NORM_2, &dp)); in KSPSolve_PIPECGRR() 65 PetscCall(VecNormEnd(B, NORM_2, &db)); in KSPSolve_PIPECGRR() 68 PetscCall(VecNormBegin(R, NORM_2, &dp)); /* dp <- r'*r = e'*A'*A*e */ in KSPSolve_PIPECGRR() 69 PetscCall(VecNormBegin(B, NORM_2, &db)); in KSPSolve_PIPECGRR() 72 PetscCall(VecNormEnd(R, NORM_2, &dp)); in KSPSolve_PIPECGRR() 73 PetscCall(VecNormEnd(B, NORM_2, &db)); in KSPSolve_PIPECGRR() 77 PetscCall(VecNormBegin(B, NORM_2, &db)); in KSPSolve_PIPECGRR() 81 PetscCall(VecNormEnd(B, NORM_2, &db)); in KSPSolve_PIPECGRR() [all …]
|
| /petsc/src/vec/vec/tests/ |
| H A D | ex34.c | 31 PetscCall(VecNorm(V, NORM_2, &nrm2)); in main() 36 PetscCall(VecNorm(V, NORM_2, &nrm2)); in main() 46 PetscCall(VecNorm(V, NORM_2, &nrm2)); in main() 51 PetscCall(VecNorm(V, NORM_2, &nrm2)); in main() 61 PetscCall(VecNorm(V, NORM_2, &nrm2)); in main() 67 PetscCall(VecNorm(V, NORM_2, &nrm2)); in main() 77 PetscCall(VecNorm(V, NORM_2, &nrm2)); in main() 83 PetscCall(VecNorm(V, NORM_2, &nrm2)); in main() 94 PetscCall(VecNorm(V, NORM_2, &nrm2)); in main() 99 PetscCall(VecNorm(W, NORM_2, &nrm2)); in main() [all …]
|
| H A D | ex47.c | 48 PetscCall(VecNorm(y, NORM_2, &norm)); in main() 49 PetscCall(VecNorm(x, NORM_2, &dnorm)); in main() 56 PetscCall(VecNorm(y, NORM_2, &norm)); in main() 57 PetscCall(VecNorm(x, NORM_2, &dnorm)); in main()
|
| H A D | ex19f.F90 | 45 PetscCallA(VecNorm(x, NORM_2, norm, ierr)) 50 PetscCallA(VecNorm(w, NORM_2, norm, ierr)) 55 PetscCallA(VecNorm(y, NORM_2, norm, ierr))
|
| H A D | ex53.c | 53 PetscCall(VecNorm(x, NORM_2, &norm_before)); in main() 54 PetscCall(VecNormAvailable(x, NORM_2, &available, &norm_after)); in main() 58 PetscCall(VecNormAvailable(x, NORM_2, &available, &norm_after)); in main()
|
| /petsc/src/vec/vec/tutorials/ |
| H A D | ex1.c | 77 PetscCall(VecNorm(x, NORM_2, &norm)); in main() 83 PetscCall(VecNorm(w, NORM_2, &norm)); in main() 89 PetscCall(VecNorm(y, NORM_2, &norm)); in main() 95 PetscCall(VecNorm(y, NORM_2, &norm)); in main() 101 PetscCall(VecNorm(y, NORM_2, &norm)); in main() 105 PetscCall(VecNorm(x, NORM_2, &norm)); in main() 111 PetscCall(VecNorm(w, NORM_2, &norm)); in main() 117 PetscCall(VecNorm(w, NORM_2, &norm)); in main() 123 PetscCall(VecNorm(w, NORM_2, &norm)); in main() 132 PetscCall(VecNorm(w, NORM_2, &norm)); in main() [all …]
|
| H A D | ex1f90.F90 | 96 PetscCallA(VecNorm(x, NORM_2, norm, ierr)) 103 PetscCallA(VecNorm(w, NORM_2, norm, ierr)) 110 PetscCallA(VecNorm(y, NORM_2, norm, ierr)) 117 PetscCallA(VecNorm(y, NORM_2, norm, ierr)) 124 PetscCallA(VecNorm(y, NORM_2, norm, ierr)) 130 PetscCallA(VecNorm(x, NORM_2, norm, ierr)) 137 PetscCallA(VecNorm(w, NORM_2, norm, ierr)) 144 PetscCallA(VecNorm(w, NORM_2, norm, ierr)) 151 PetscCallA(VecNorm(w, NORM_2, norm, ierr)) 162 PetscCallA(VecNorm(z(1), NORM_2, norm, ierr)) [all …]
|
| H A D | ex20f90.F90 | 98 PetscCallA(VecNorm(x, NORM_2, norm, ierr)) 105 PetscCallA(VecNorm(w, NORM_2, norm, ierr)) 112 PetscCallA(VecNorm(y, NORM_2, norm, ierr)) 119 PetscCallA(VecNorm(y, NORM_2, norm, ierr)) 126 PetscCallA(VecNorm(y, NORM_2, norm, ierr)) 132 PetscCallA(VecNorm(x, NORM_2, norm, ierr)) 139 PetscCallA(VecNorm(w, NORM_2, norm, ierr)) 146 PetscCallA(VecNorm(w, NORM_2, norm, ierr)) 153 PetscCallA(VecNorm(w, NORM_2, norm, ierr)) 164 PetscCallA(VecNorm(z(1), NORM_2, norm, ierr)) [all …]
|
| H A D | ex11f.F90 | 40 PetscCallA(VecNorm(x, NORM_2, norm, ierr)) 47 PetscCallA(VecStrideNorm(x, comp, NORM_2, norm, ierr)) 54 PetscCallA(VecStrideNorm(x, comp, NORM_2, norm, ierr))
|
| H A D | ex11.c | 40 PetscCall(VecNorm(x, NORM_2, &norm)); in main() 49 PetscCall(VecStrideNorm(x, 0, NORM_2, &norm)); in main() 58 PetscCall(VecStrideNorm(x, 1, NORM_2, &norm)); in main()
|
| H A D | ex11f90.F90 | 51 PetscCallA(VecNorm(x, NORM_2, norm, ierr)) 63 PetscCallA(VecStrideNorm(x, zero, NORM_2, norm, ierr)) 75 PetscCallA(VecStrideNorm(x, one, NORM_2, norm, ierr))
|
| /petsc/src/snes/linesearch/impls/basic/ |
| H A D | linesearchbasic.c | 33 PetscCall(VecNorm(F, NORM_2, &fnorm)); in SNESLineSearchApply_Basic() 37 PetscCall(VecNormBegin(Y, NORM_2, &linesearch->ynorm)); in SNESLineSearchApply_Basic() 38 PetscCall(VecNormBegin(W, NORM_2, &linesearch->xnorm)); in SNESLineSearchApply_Basic() 39 PetscCall(VecNormEnd(Y, NORM_2, &linesearch->ynorm)); in SNESLineSearchApply_Basic() 40 PetscCall(VecNormEnd(W, NORM_2, &linesearch->xnorm)); in SNESLineSearchApply_Basic()
|
| /petsc/src/snes/impls/ngmres/ |
| H A D | ngmresfunc.c | 123 if (xMnorm) PetscCall(VecNormBegin(XM, NORM_2, xMnorm)); in SNESNGMRESNorms_Private() 124 if (fMnorm) PetscCall(VecNormBegin(FM, NORM_2, fMnorm)); in SNESNGMRESNorms_Private() 127 PetscCall(VecNormBegin(D, NORM_2, yMnorm)); in SNESNGMRESNorms_Private() 129 if (xAnorm) PetscCall(VecNormBegin(XA, NORM_2, xAnorm)); in SNESNGMRESNorms_Private() 130 if (fAnorm) PetscCall(VecNormBegin(FA, NORM_2, fAnorm)); in SNESNGMRESNorms_Private() 133 PetscCall(VecNormBegin(D, NORM_2, yAnorm)); in SNESNGMRESNorms_Private() 137 PetscCall(VecNormBegin(D, NORM_2, dnorm)); in SNESNGMRESNorms_Private() 142 PetscCall(VecNormBegin(D, NORM_2, &ngmres->xnorms[i])); in SNESNGMRESNorms_Private() 145 if (xMnorm) PetscCall(VecNormEnd(XM, NORM_2, xMnorm)); in SNESNGMRESNorms_Private() 146 if (fMnorm) PetscCall(VecNormEnd(FM, NORM_2, fMnorm)); in SNESNGMRESNorms_Private() [all …]
|
| /petsc/src/snes/linesearch/impls/nleqerr/ |
| H A D | linesearchnleqerr.c | 65 PetscCall(VecNormBegin(Y, NORM_2, &ynorm)); in SNESLineSearchApply_NLEQERR() 66 PetscCall(VecNormBegin(X, NORM_2, &xnorm)); in SNESLineSearchApply_NLEQERR() 67 PetscCall(VecNormEnd(Y, NORM_2, &ynorm)); in SNESLineSearchApply_NLEQERR() 68 PetscCall(VecNormEnd(X, NORM_2, &xnorm)); in SNESLineSearchApply_NLEQERR() 100 PetscCall(VecNormBegin(G, NORM_2, &gnorm)); in SNESLineSearchApply_NLEQERR() 101 PetscCall(VecNormEnd(G, NORM_2, &gnorm)); in SNESLineSearchApply_NLEQERR() 174 PetscCall(VecNorm(W, NORM_2, &wnorm)); in SNESLineSearchApply_NLEQERR() 186 PetscCall(VecNorm(G, NORM_2, &gnorm)); in SNESLineSearchApply_NLEQERR() 250 PetscCall(VecNorm(X, NORM_2, &xnorm)); in SNESLineSearchApply_NLEQERR() 251 PetscCall(VecNorm(F, NORM_2, &fnorm)); in SNESLineSearchApply_NLEQERR()
|
| /petsc/src/ksp/ksp/impls/cr/ |
| H A D | cr.c | 46 PetscCall(VecNormBegin(RT, NORM_2, &dp)); /* dp <- RT'*RT */ in KSPSolve_CR() 48 PetscCall(VecNormEnd(RT, NORM_2, &dp)); /* dp <- RT'*RT */ in KSPSolve_CR() 54 PetscCall(VecNormBegin(R, NORM_2, &dp)); /* dp <- R'*R */ in KSPSolve_CR() 56 PetscCall(VecNormEnd(R, NORM_2, &dp)); /* dp <- RT'*RT */ in KSPSolve_CR() 97 PetscCall(VecNormBegin(RT, NORM_2, &dp)); /* dp <- || RT || */ in KSPSolve_CR() 99 PetscCall(VecNormEnd(RT, NORM_2, &dp)); /* dp <- || RT || */ in KSPSolve_CR() 109 PetscCall(VecNormBegin(R, NORM_2, &dp)); /* dp <- R'*R */ in KSPSolve_CR() 111 PetscCall(VecNormEnd(R, NORM_2, &dp)); /* dp <- R'*R */ in KSPSolve_CR()
|
| /petsc/src/ksp/ksp/impls/cg/pipecg/ |
| H A D | pipecg.c | 59 PetscCall(VecNormBegin(U, NORM_2, &dp)); /* dp <- u'*u = e'*A'*B'*B*A'*e' */ in KSPSolve_PIPECG() 62 PetscCall(VecNormEnd(U, NORM_2, &dp)); in KSPSolve_PIPECG() 65 PetscCall(VecNormBegin(R, NORM_2, &dp)); /* dp <- r'*r = e'*A'*A*e */ in KSPSolve_PIPECG() 68 PetscCall(VecNormEnd(R, NORM_2, &dp)); in KSPSolve_PIPECG() 94 PetscCall(VecNormBegin(R, NORM_2, &dp)); in KSPSolve_PIPECG() 96 PetscCall(VecNormBegin(U, NORM_2, &dp)); in KSPSolve_PIPECG() 106 PetscCall(VecNormEnd(R, NORM_2, &dp)); in KSPSolve_PIPECG() 108 PetscCall(VecNormEnd(U, NORM_2, &dp)); in KSPSolve_PIPECG()
|
| /petsc/src/mat/tests/ |
| H A D | ex53.c | 67 PetscCall(VecNorm(s2, NORM_2, &rnorm)); in main() 78 PetscCall(VecNorm(s2, NORM_2, &rnorm)); in main() 87 PetscCall(VecNorm(s1, NORM_2, &s1norm)); in main() 88 PetscCall(VecNorm(s2, NORM_2, &s2norm)); in main() 98 PetscCall(VecNorm(s1, NORM_2, &s1norm)); in main() 99 PetscCall(VecNorm(s2, NORM_2, &s2norm)); in main() 154 PetscCall(VecNorm(s1, NORM_2, &s1norm)); in main() 155 PetscCall(VecNorm(s2, NORM_2, &s2norm)); in main() 168 PetscCall(VecNorm(s1, NORM_2, &s1norm)); in main() 169 PetscCall(VecNorm(s2, NORM_2, &s2norm)); in main()
|
| H A D | ex185.c | 21 PetscCall(VecNorm(X, NORM_2, &xnorm)); in main() 23 PetscCall(VecNorm(Y, NORM_2, &ynorm)); in main() 51 PetscCall(VecNorm(Y, NORM_2, &ynorm)); in main() 56 PetscCall(VecNorm(Y, NORM_2, &ynorm)); in main() 61 PetscCall(VecNorm(Y, NORM_2, &ynorm)); in main()
|
| H A D | ex48.c | 112 PetscCall(VecNorm(s1, NORM_2, &s1norm)); in main() 113 PetscCall(VecNorm(s2, NORM_2, &s2norm)); in main() 172 PetscCall(VecNorm(yy, NORM_2, &rnorm)); in main() 185 PetscCall(VecNorm(s1, NORM_2, &s1norm)); in main() 186 PetscCall(VecNorm(s2, NORM_2, &s2norm)); in main() 198 PetscCall(VecNorm(s1, NORM_2, &s1norm)); in main() 199 PetscCall(VecNorm(s2, NORM_2, &s2norm)); in main() 209 PetscCall(VecNorm(s1, NORM_2, &s1norm)); in main() 210 PetscCall(VecNorm(s2, NORM_2, &s2norm)); in main() 221 PetscCall(VecNorm(s1, NORM_2, &s1norm)); in main() [all …]
|
| /petsc/src/ksp/ksp/impls/cg/groppcg/ |
| H A D | groppcg.c | 65 PetscCall(VecNorm(z, NORM_2, &dp)); /* dp <- z'*z = e'*A'*B'*B*A'*e' */ in KSPSolve_GROPPCG() 69 PetscCall(VecNorm(r, NORM_2, &dp)); /* dp <- r'*r = e'*A'*A*e */ in KSPSolve_GROPPCG() 105 PetscCall(VecNormBegin(r, NORM_2, &dp)); in KSPSolve_GROPPCG() 107 PetscCall(VecNormBegin(z, NORM_2, &dp)); in KSPSolve_GROPPCG() 115 PetscCall(VecNormEnd(r, NORM_2, &dp)); in KSPSolve_GROPPCG() 117 PetscCall(VecNormEnd(z, NORM_2, &dp)); in KSPSolve_GROPPCG()
|
| /petsc/src/snes/impls/ls/ |
| H A D | ls.c | 62 PetscCall(VecNorm(W, NORM_2, &a1)); in SNESNEWTONLSCheckLocalMin_Private() 71 PetscCall(VecNorm(W, NORM_2, &wnorm)); in SNESNEWTONLSCheckLocalMin_Private() 107 PetscCall(VecNorm(W1, NORM_2, &a1)); in SNESNEWTONLSCheckResidual_Private() 108 PetscCall(VecNorm(W2, NORM_2, &a2)); in SNESNEWTONLSCheckResidual_Private() 165 PetscCall(VecNormBegin(F, NORM_2, &fnorm)); in SNESSolve_NEWTONLS() 166 PetscCall(VecNormEnd(F, NORM_2, &fnorm)); in SNESSolve_NEWTONLS() 172 PetscCall(VecNorm(F, NORM_2, &fnorm)); /* fnorm <- ||F|| */ in SNESSolve_NEWTONLS() 191 …PetscCall(VecNorm(snes->vec_func, NORM_2, &fnorm)); /* no-op unless update() function changed f() … in SNESSolve_NEWTONLS()
|
| /petsc/src/ksp/ksp/tests/ |
| H A D | ex2.c | 81 PetscCall(VecNorm(r, NORM_2, &norm)); in main() 89 PetscCall(VecNorm(r, NORM_2, &norm)); in main() 95 PetscCall(VecNorm(r, NORM_2, &norm)); in main() 102 PetscCall(VecNorm(r, NORM_2, &norm)); in main()
|
| /petsc/src/ksp/ksp/impls/bcgs/qmrcgs/ |
| H A D | qmrcgs.c | 64 if (ksp->normtype != KSP_NORM_NONE) PetscCall(VecNorm(R, NORM_2, &dp)); in KSPSolve_QMRCGS() 80 PetscCall(VecNorm(R, NORM_2, &tau)); in KSPSolve_QMRCGS() 110 PetscCall(VecNorm(S, NORM_2, &F)); /* f <- norm(s) */ in KSPSolve_QMRCGS() 143 PetscCall(VecNorm(V, NORM_2, &NV)); /* nv <- norm(v) */ in KSPSolve_QMRCGS() 162 if (ksp->normtype != KSP_NORM_NONE && ksp->chknorm < i + 2) PetscCall(VecNorm(R, NORM_2, &dp)); in KSPSolve_QMRCGS() 172 PetscCall(VecNorm(R, NORM_2, &tau)); in KSPSolve_QMRCGS() 196 PetscCall(VecNorm(Z, NORM_2, &final)); in KSPSolve_QMRCGS()
|
| /petsc/src/snes/impls/ntrdc/ |
| H A D | ntrdc.c | 42 PetscCall(VecNorm(x, NORM_2, &nrm)); in SNESTRDC_KSPConverged_Private() 348 PetscCall(VecNorm(F, NORM_2, &fnorm)); /* fnorm <- || F || */ in SNESSolve_NEWTONTRDC() 350 PetscCall(VecNorm(X, NORM_2, &xnorm)); /* xnorm <- || X || */ in SNESSolve_NEWTONTRDC() 393 PetscCall(VecNorm(X, NORM_2, &xnorm)); in SNESSolve_NEWTONTRDC() 405 PetscCall(VecNorm(YNtmp, NORM_2, &ynnorm)); /* ynnorm <- || Y_newton || */ in SNESSolve_NEWTONTRDC() 415 PetscCall(VecNorm(GradF, NORM_2, &gfnorm)); /* grad f norm <- || grad f || */ in SNESSolve_NEWTONTRDC() 424 PetscCall(VecNorm(YCtmp, NORM_2, &ycnorm)); /* ycnorm <- || Y_cauchy || */ in SNESSolve_NEWTONTRDC() 430 PetscCall(VecNorm(YNtmp, NORM_2, &c0)); /* this could be improved */ in SNESSolve_NEWTONTRDC() 434 PetscCall(VecNorm(YCtmp, NORM_2, &c2)); /* this could be improved */ in SNESSolve_NEWTONTRDC() 451 PetscCall(VecNorm(Y, NORM_2, &ynorm)); /* compute the final ynorm */ in SNESSolve_NEWTONTRDC() [all …]
|