12   PetscReal     norm1, norm2, rnorm, tol = 10 * PETSC_SMALL;  in main()  local
182   PetscCall(MatNorm(A, NORM_FROBENIUS, &norm1));  in main()
188   PetscCall(MatNorm(A, NORM_FROBENIUS, &norm1));  in main()
190   rnorm = PetscAbsReal(norm1 - norm2) / norm2;  in main()
191 …M_SELF, "Error: MatNorm_FROBENIUS, NormA=%16.14e NormsB=%16.14e\n", (double)norm1, (double)norm2));  in main()
192   PetscCall(MatNorm(A, NORM_INFINITY, &norm1));  in main()
194   rnorm = PetscAbsReal(norm1 - norm2) / norm2;  in main()
195 …_SELF, "Error: MatNorm_INFINITY(), NormA=%16.14e NormsB=%16.14e\n", (double)norm1, (double)norm2));  in main()
196   PetscCall(MatNorm(A, NORM_1, &norm1));  in main()
198   rnorm = PetscAbsReal(norm1 - norm2) / norm2;  in main()
199 …_SELF, "Error: MatNorm_INFINITY(), NormA=%16.14e NormsB=%16.14e\n", (double)norm1, (double)norm2));  in main()
239   PetscCall(VecNorm(s2, NORM_1, &norm1));  in main()
240 …if (norm1 > tol) PetscCall(PetscPrintf(PETSC_COMM_SELF, "Error:MatGetDiagonal(), ||s1-s2||=%g\n", …  in main()
252   PetscCall(VecNorm(s1, NORM_1, &norm1));  in main()
254   norm1 -= norm2;  in main()
255 …if (norm1 < -tol || norm1 > tol) PetscCall(PetscPrintf(PETSC_COMM_SELF, "Error:MatGetRowMaxAbs() \…  in main()
262     PetscCall(VecNorm(s1, NORM_1, &norm1));  in main()
264     norm1 -= norm2;  in main()
265 …if (norm1 < -tol || norm1 > tol) PetscCall(PetscPrintf(PETSC_COMM_SELF, "Error: MatMult(), norm1-n…  in main()
274     PetscCall(VecNorm(s1, NORM_1, &norm1));  in main()
276     norm1 -= norm2;  in main()
277 …if (norm1 < -tol || norm1 > tol) PetscCall(PetscPrintf(PETSC_COMM_SELF, "Error:MatMultAdd(), norm1…  in main()
292   norm1 = tol;  in main()
331 …if (10 * norm1 < norm2) PetscCall(PetscPrintf(PETSC_COMM_SELF, "MatForwardSolve and BackwardSolve:…  in main()
340 …norm1 < norm2 && lf - inc != -1) PetscCall(PetscPrintf(PETSC_COMM_SELF, "lf=%" PetscInt_FMT ", %" …  in main()
341     norm1 = norm2;  in main()