Searched refs:mycoo (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/mat/tests/ |
| H A D | ex254.c | 37 coo_data mycoo; in main() local
45 mycoo.n = 0; in main()
54 for (PetscInt i = 0; i < ncoos; i++) mycoo.n += coos[i % 3].n; in main()
55 PetscCall(PetscMalloc2(mycoo.n, &mycoo.i, mycoo.n, &mycoo.j)); in main()
56 mycoo.n = 0; in main()
58 PetscCall(PetscArraycpy(mycoo.i + mycoo.n, coos[i % 3].i, coos[i % 3].n)); in main()
59 PetscCall(PetscArraycpy(mycoo.j + mycoo.n, coos[i % 3].j, coos[i % 3].n)); in main()
60 mycoo.n += coos[i % 3].n; in main()
63 } else if (ncoos == 1 && PetscGlobalRank < 3) mycoo = coos[PetscGlobalRank]; in main()
65 if (missing_diagonal && PetscGlobalRank == 0) mycoo = coos[1]; in main()
[all …]
|
| H A D | ex266.c | 35 coo_data mycoo; in main() local
41 mycoo = coos[rank / 3]; in main()
48 PetscCall(PetscMalloc1(mycoo.n, &vals)); in main()
49 for (k = 0; k < mycoo.n; k++) { in main()
50 vals[k] = mycoo.j[k]; in main()
51 PetscCall(MatSetValue(A, mycoo.i[k], mycoo.j[k], vals[k], ADD_VALUES)); in main()
60 …for (k = 0; k < mycoo.n / 2; k++) PetscCall(MatSetValue(B, mycoo.i[k], mycoo.j[k], vals[k], ADD_VA… in main()
66 …for (k = mycoo.n / 2; k < mycoo.n; k++) PetscCall(MatSetValue(C, mycoo.i[k], mycoo.j[k], vals[k], … in main()
|