316       Vec dA, dS;  in main()  local
318       PetscCall(MatCreateVecs(A, &dA, NULL));  in main()
320       PetscCall(MatGetDiagonal(A, dA));  in main()
322       PetscCall(VecAXPY(dA, -1.0, dS));  in main()
323       PetscCall(VecNorm(dA, NORM_INFINITY, &err));  in main()
325       PetscCall(VecDestroy(&dA));  in main()
341       Mat      sA, sS, dA, dS, At, St;  in main()  local
355       PetscCall(MatConvert(sA, MATDENSE, MAT_INITIAL_MATRIX, &dA));  in main()
357       PetscCall(MatAXPY(dA, -1.0, dS, SAME_NONZERO_PATTERN));  in main()
358       PetscCall(MatNorm(dA, NORM_FROBENIUS, &err));  in main()
362       PetscCall(MatDestroy(&dA));  in main()
372       PetscCall(MatConvert(sA, MATDENSE, MAT_INITIAL_MATRIX, &dA));  in main()
374       PetscCall(MatAXPY(dA, -1.0, dS, SAME_NONZERO_PATTERN));  in main()
375       PetscCall(MatNorm(dA, NORM_FROBENIUS, &err));  in main()
379       PetscCall(MatDestroy(&dA));  in main()
388       Mat          tA, tS, dA, dS;  in main()  local
409       PetscCall(MatConvert(A, MATDENSE, MAT_INITIAL_MATRIX, &dA));  in main()
411       PetscCall(MatAXPY(dA, -1.0, dS, SAME_NONZERO_PATTERN));  in main()
412       PetscCall(MatNorm(dA, NORM_FROBENIUS, &err));  in main()
414       PetscCall(MatDestroy(&dA));  in main()