| H A D | ex106.c | 12 PetscInt I, J, ldim, low, high, iglobal, Istart, Iend; in main() local
50 for (I = Istart; I < Iend; I++) { in main()
52 i = I / n; in main()
53 j = I - i * n; in main()
55 J = I - n; in main()
56 PetscCall(MatSetValues(C, 1, &I, 1, &J, &v, ADD_VALUES)); in main()
59 J = I + n; in main()
60 PetscCall(MatSetValues(C, 1, &I, 1, &J, &v, ADD_VALUES)); in main()
63 J = I - 1; in main()
64 PetscCall(MatSetValues(C, 1, &I, 1, &J, &v, ADD_VALUES)); in main()
[all …]
|