| /petsc/src/ksp/pc/tests/output/ |
| H A D | ex6_1.out | 1 flg == 1 => both index sets are same
2 i = 0,flg = 1
3 i = 1,flg = 1
4 i = 2,flg = 1
5 i = 3,flg = 1
6 i = 4,flg = 1
7 i = 5,flg = 1
8 i = 6,flg = 1
9 i = 7,flg = 1
10 i = 8,flg = 1
[all …]
|
| /petsc/src/benchmarks/ |
| H A D | PetscMemcmp.c | 9 PetscBool flg; in main() local
17 PetscMemcmp(A, B, sizeof(PetscScalar) * 0, &flg); in main()
21 PetscMemcmp(A, B, sizeof(PetscScalar) * 10000, &flg); in main()
22 PetscMemcmp(A, B, sizeof(PetscScalar) * 10000, &flg); in main()
23 PetscMemcmp(A, B, sizeof(PetscScalar) * 10000, &flg); in main()
24 PetscMemcmp(A, B, sizeof(PetscScalar) * 10000, &flg); in main()
25 PetscMemcmp(A, B, sizeof(PetscScalar) * 10000, &flg); in main()
26 PetscMemcmp(A, B, sizeof(PetscScalar) * 10000, &flg); in main()
27 PetscMemcmp(A, B, sizeof(PetscScalar) * 10000, &flg); in main()
28 PetscMemcmp(A, B, sizeof(PetscScalar) * 10000, &flg); in main()
[all …]
|
| H A D | PLogEvent.c | 8 PetscBool flg; in main() local
43 PetscCall(PetscOptionsHasName(NULL, "-log", &flg)); in main()
44 if (flg) fprintf(stderr, "-log "); in main()
45 PetscCall(PetscOptionsHasName(NULL, "-log_all", &flg)); in main()
46 if (flg) fprintf(stderr, "-log_all "); in main()
47 PetscCall(PetscOptionsHasName(NULL, "-log_view", &flg)); in main()
48 if (flg) fprintf(stderr, "-log_view "); in main()
49 PetscCall(PetscOptionsHasName(NULL, "-log_mpe", &flg)); in main()
50 if (flg) fprintf(stderr, "-log_mpe "); in main()
|
| /petsc/src/vec/is/is/tests/ |
| H A D | ex1.c | 16 PetscBool flg; in main() local
48 PetscCall(ISPermutation(is, &flg)); in main()
49 PetscCheck(!flg, PETSC_COMM_SELF, PETSC_ERR_PLIB, "ISPermutation"); in main()
50 PetscCall(ISGetInfo(is, IS_PERMUTATION, IS_LOCAL, compute, &flg)); in main()
51 …PetscCheck(rank != 0 || flg, PETSC_COMM_SELF, PETSC_ERR_PLIB, "ISGetInfo(IS_PERMUTATION,IS_LOCAL)"… in main()
52 …PetscCheck(rank == 0 || !flg, PETSC_COMM_SELF, PETSC_ERR_PLIB, "ISGetInfo(IS_PERMUTATION,IS_LOCAL)… in main()
53 PetscCall(ISIdentity(is, &flg)); in main()
54 PetscCheck(rank != 0 || flg, PETSC_COMM_SELF, PETSC_ERR_PLIB, "ISIdentity"); in main()
55 PetscCheck(rank == 0 || !flg, PETSC_COMM_SELF, PETSC_ERR_PLIB, "ISIdentity"); in main()
56 PetscCall(ISGetInfo(is, IS_IDENTITY, IS_LOCAL, compute, &flg)); in main()
[all …]
|
| /petsc/src/sys/tutorials/ |
| H A D | ex9f.F90 | 14 PetscBool :: flg
45 …PetscCallA(PetscOptionsBool('-bool', 'Get an application bool', 'Man page', bdefault, bvalue, flg,…
46 if (flg) then
50 …tionsBoolArray('-boolarray', 'Get an application bool array', 'Man page', barray, nopt, flg, ierr))
51 if (flg) then
55 …etscOptionsEnum('-enum', 'Get an application enum', 'Man page', list, edefault, evalue, flg, ierr))
56 if (flg) then
60 …PetscCallA(PetscOptionsInt('-int', 'Get an application int', 'Man page', idefault, ivalue, flg, ie…
61 if (flg) then
65 …cOptionsIntArray('-intarray', 'Get an application int array', 'Man page', iarray, nopt, flg, ierr))
[all …]
|
| /petsc/src/sys/objects/ |
| H A D | tagm.c | 66 PetscMPIInt *maxval, flg; in PetscCommGetNewTag() local
71 PetscCallMPI(MPI_Comm_get_attr(comm, Petsc_Counter_keyval, &counter, &flg)); in PetscCommGetNewTag()
72 …PetscCheck(flg, PETSC_COMM_SELF, PETSC_ERR_ARG_CORRUPT, "Bad MPI communicator supplied; must be a … in PetscCommGetNewTag()
76 PetscCallMPI(MPI_Comm_get_attr(MPI_COMM_WORLD, MPI_TAG_UB, &maxval, &flg)); in PetscCommGetNewTag()
77 …PetscCheck(flg, PETSC_COMM_SELF, PETSC_ERR_LIB, "MPI error: MPI_Comm_get_attr() is not returning a… in PetscCommGetNewTag()
116 PetscMPIInt flg; in PetscCommGetComm() local
120 PetscCallMPI(MPI_Comm_get_attr(comm_in, Petsc_Counter_keyval, &counter, &flg)); in PetscCommGetComm()
121 …PetscCheck(flg, comm_in, PETSC_ERR_ARG_WRONGSTATE, "Requires a PETSc communicator as input, do not… in PetscCommGetComm()
153 PetscMPIInt flg; in PetscCommRestoreComm() local
158 PetscCallMPI(MPI_Comm_get_attr(comm_in, Petsc_Counter_keyval, &counter, &flg)); in PetscCommRestoreComm()
[all …]
|
| /petsc/src/mat/tests/ |
| H A D | ex177.c | 14 PetscBool flg; in main() local
22 PetscCall(PetscOptionsGetString(NULL, NULL, "-f", file, sizeof(file), &flg)); in main()
23 PetscCheck(flg, PETSC_COMM_WORLD, PETSC_ERR_USER, "Must indicate binary file with the -f option"); in main()
53 PetscCall(MatKAIJGetScaledIdentity(TA, &flg)); in main()
54 PetscCheck(!flg, PETSC_COMM_WORLD, PETSC_ERR_PLIB, "Error in Test 1: MatKAIJGetScaledIdentity()"); in main()
56 PetscCall(MatMultEqual(TA, B, 10, &flg)); in main()
57 …PetscCheck(flg, PETSC_COMM_WORLD, PETSC_ERR_CONV_FAILED, "Error in Test 1: MatMult() for KAIJ matr… in main()
59 PetscCall(MatMultAddEqual(TA, B, 10, &flg)); in main()
60 …PetscCheck(flg, PETSC_COMM_WORLD, PETSC_ERR_CONV_FAILED, "Error in Test 1: MatMultAdd() for KAIJ m… in main()
75 PetscCall(MatKAIJGetScaledIdentity(TA, &flg)); in main()
[all …]
|
| H A D | ex127.c | 9 PetscBool flg; in main() local
60 PetscCall(PetscOptionsHasName(NULL, NULL, "-check_symmetric", &flg)); in main()
61 if (flg) { in main()
62 PetscCall(MatIsSymmetric(A, 0.0, &flg)); in main()
63 PetscCheck(flg, PETSC_COMM_WORLD, PETSC_ERR_USER, "A is not symmetric"); in main()
90 if (flg) { in main()
91 PetscCall(MatIsSymmetric(A, 0.0, &flg)); in main()
92 PetscCheck(!flg, PETSC_COMM_WORLD, PETSC_ERR_USER, "A is symmetric"); in main()
96 PetscCall(PetscOptionsHasName(NULL, NULL, "-check_Hermitian", &flg)); in main()
97 if (flg && size == 1) { in main()
[all …]
|
| H A D | ex100.c | 12 PetscBool flg; in main() local
20 PetscCall(PetscOptionsGetString(NULL, NULL, "-f", file, sizeof(file), &flg)); in main()
21 PetscCheck(flg, PETSC_COMM_WORLD, PETSC_ERR_USER, "Must indicate binary file with the -f option"); in main()
40 PetscCall(MatMultEqual(MA, B, 10, &flg)); in main()
41 PetscCheck(flg, PETSC_COMM_WORLD, PETSC_ERR_CONV_FAILED, "Error: MatMul() for MAIJ matrix"); in main()
43 PetscCall(MatMultAddEqual(MA, B, 10, &flg)); in main()
44 PetscCheck(flg, PETSC_COMM_WORLD, PETSC_ERR_CONV_FAILED, "Error: MatMulAdd() for MAIJ matrix"); in main()
47 PetscCall(MatMultTransposeEqual(MA, B, 10, &flg)); in main()
48 PetscCheck(flg, PETSC_COMM_WORLD, PETSC_ERR_CONV_FAILED, "Error: MatMulAdd() for MAIJ matrix"); in main()
51 PetscCall(MatMultTransposeAddEqual(MA, B, 10, &flg)); in main()
[all …]
|
| H A D | ex185.c | 10 PetscBool flg; in main() local
33 PetscCall(MatMultEqual(A, B, 10, &flg)); in main()
34 if (!flg) PetscCall(PetscPrintf(PETSC_COMM_WORLD, "Error MatMult\n")); in main()
35 PetscCall(MatMultAddEqual(A, B, 10, &flg)); in main()
36 if (!flg) PetscCall(PetscPrintf(PETSC_COMM_WORLD, "Error MatMultAdd\n")); in main()
37 PetscCall(MatMultTransposeEqual(A, B, 10, &flg)); in main()
38 if (!flg) PetscCall(PetscPrintf(PETSC_COMM_WORLD, "Error MatMultTranspose\n")); in main()
39 PetscCall(MatMultTransposeAddEqual(A, B, 10, &flg)); in main()
40 if (!flg) PetscCall(PetscPrintf(PETSC_COMM_WORLD, "Error MatMultTransposeAdd\n")); in main()
41 PetscCall(MatMultHermitianTransposeEqual(A, B, 10, &flg)); in main()
[all …]
|
| H A D | ex115.c | 12 PetscBool flg, testptap = PETSC_TRUE, testmatmatmult = PETSC_TRUE; in main() local
19 PetscCall(PetscOptionsGetString(NULL, NULL, "-f", file, sizeof(file), &flg)); in main()
36 if (!flg) { /* Create a matrix and test MatSetValues */ in main()
142 PetscCall(MatMultEqual(B, A, 4, &flg)); in main()
143 PetscCheck(flg, PetscObjectComm((PetscObject)A), PETSC_ERR_PLIB, "Error Mat HYPRE init"); in main()
146 PetscCall(MatMultEqual(B, A, 4, &flg)); in main()
147 PetscCheck(flg, PetscObjectComm((PetscObject)A), PETSC_ERR_PLIB, "Error Mat HYPRE reuse"); in main()
150 PetscCall(MatMultEqual(D, A, 4, &flg)); in main()
151 PetscCheck(flg, PetscObjectComm((PetscObject)A), PETSC_ERR_PLIB, "Error Mat IS"); in main()
154 PetscCall(MatMultEqual(C, A, 4, &flg)); in main()
[all …]
|
| H A D | ex37.c | 10 PetscBool flg, isAIJ; in main() local
70 PetscCall(MatEqual(A, C, &flg)); in main()
71 …PetscCheck(flg, PETSC_COMM_SELF, PETSC_ERR_SUP, "MatDuplicate(C,MAT_COPY_VALUES,): Matrices are NO… in main()
85 PetscCall(MatEqual(A, C, &flg)); in main()
86 …PetscCheck(flg, PETSC_COMM_SELF, PETSC_ERR_SUP, "MatCopy(C,A,DIFFERENT_NONZERO_PATTERN): Matrices … in main()
94 PetscCall(MatEqual(A, C, &flg)); in main()
95 …PetscCheck(flg, PETSC_COMM_SELF, PETSC_ERR_SUP, "MatCopy(C,A,SAME_NONZERO_PATTERN): Matrices are N… in main()
101 PetscCall(MatEqual(A, C, &flg)); in main()
102 …PetscCheck(flg, PETSC_COMM_SELF, PETSC_ERR_SUP, "MatCopy(C,A,SUBSET_NONZERO_PATTERN): Matrices are… in main()
106 PetscCall(MatHasCongruentLayouts(C, &flg)); in main()
[all …]
|
| H A D | ex38.c | 11 PetscBool flg, Test_MatMatMult = PETSC_FALSE, mats_view = PETSC_FALSE; in main() local
32 PetscCall(PetscOptionsHasName(NULL, NULL, "-row_oriented", &flg)); in main()
33 if (flg) PetscCall(MatSetOption(C, MAT_ROW_ORIENTED, PETSC_TRUE)); in main()
35 PetscCall(PetscOptionsHasName(NULL, NULL, "-Cexp_view_ownership", &flg)); in main()
36 if (flg) { /* View ownership of explicit C */ in main()
91 PetscCall(MatMultEqual(C, Caij, 5, &flg)); in main()
92 PetscCheck(flg, PETSC_COMM_SELF, PETSC_ERR_ARG_NOTSAMETYPE, "C != Caij. MatMultEqual() fails"); in main()
93 PetscCall(MatMultTransposeEqual(C, Caij, 5, &flg)); in main()
94 …PetscCheck(flg, PETSC_COMM_SELF, PETSC_ERR_ARG_NOTSAMETYPE, "C != Caij. MatMultTransposeEqual() fa… in main()
97 PetscCall(MatMultAddEqual(C, Caij, 5, &flg)); in main()
[all …]
|
| /petsc/src/dm/tests/ |
| H A D | ex6.c | 22 PetscBool flg = PETSC_FALSE; in main() local
37 flg = PETSC_FALSE; in main()
38 PetscCall(PetscOptionsGetBool(NULL, NULL, "-star", &flg, NULL)); in main()
39 if (flg) stencil_type = DMDA_STENCIL_STAR; in main()
40 flg = PETSC_FALSE; in main()
41 PetscCall(PetscOptionsGetBool(NULL, NULL, "-box", &flg, NULL)); in main()
42 if (flg) stencil_type = DMDA_STENCIL_BOX; in main()
44 flg = PETSC_FALSE; in main()
45 PetscCall(PetscOptionsGetBool(NULL, NULL, "-xperiodic", &flg, NULL)); in main()
46 if (flg) bx = DM_BOUNDARY_PERIODIC; in main()
[all …]
|
| H A D | ex46.c | 15 PetscBool flg = PETSC_FALSE, distribute = PETSC_FALSE; in main() local
29 flg = PETSC_FALSE; in main()
30 PetscCall(PetscOptionsGetBool(NULL, NULL, "-star", &flg, NULL)); in main()
31 if (flg) stencil_type = DMDA_STENCIL_STAR; in main()
32 flg = PETSC_FALSE; in main()
33 PetscCall(PetscOptionsGetBool(NULL, NULL, "-box", &flg, NULL)); in main()
34 if (flg) stencil_type = DMDA_STENCIL_BOX; in main()
36 flg = PETSC_FALSE; in main()
37 PetscCall(PetscOptionsGetBool(NULL, NULL, "-xperiodic", &flg, NULL)); in main()
38 if (flg) bx = DM_BOUNDARY_PERIODIC; in main()
[all …]
|
| H A D | ex4.c | 14 PetscBool testorder = PETSC_FALSE, flg; in main() local
35 flg = PETSC_FALSE; in main()
36 PetscCall(PetscOptionsGetBool(NULL, NULL, "-xperiodic", &flg, NULL)); in main()
37 if (flg) bx = DM_BOUNDARY_PERIODIC; in main()
38 flg = PETSC_FALSE; in main()
39 PetscCall(PetscOptionsGetBool(NULL, NULL, "-yperiodic", &flg, NULL)); in main()
40 if (flg) by = DM_BOUNDARY_PERIODIC; in main()
41 flg = PETSC_FALSE; in main()
42 PetscCall(PetscOptionsGetBool(NULL, NULL, "-xghosted", &flg, NULL)); in main()
43 if (flg) bx = DM_BOUNDARY_GHOSTED; in main()
[all …]
|
| /petsc/src/sys/tests/ |
| H A D | ex56.c | 8 PetscBool has, flg; in main() local
15 PetscCall(PetscStrcmp(pkg, "hdf5", &flg)); in main()
17 …PetscCheck(!flg || has, PETSC_COMM_WORLD, PETSC_ERR_PLIB, "PetscHasExternalPackage() says HDF5 is … in main()
19 …PetscCheck(!flg || !has, PETSC_COMM_WORLD, PETSC_ERR_PLIB, "PetscHasExternalPackage() says HDF5 is… in main()
21 PetscCall(PetscStrcmp(pkg, "parmetis", &flg)); in main()
23 …PetscCheck(!flg || has, PETSC_COMM_WORLD, PETSC_ERR_PLIB, "PetscHasExternalPackage() says PARMETIS… in main()
25 …PetscCheck(!flg || !has, PETSC_COMM_WORLD, PETSC_ERR_PLIB, "PetscHasExternalPackage() says PARMETI… in main()
27 PetscCall(PetscStrcmp(pkg, "yaml", &flg)); in main()
29 …PetscCheck(!flg || has, PETSC_COMM_WORLD, PETSC_ERR_PLIB, "PetscHasExternalPackage() says YAML is … in main()
31 …PetscCheck(!flg || !has, PETSC_COMM_WORLD, PETSC_ERR_PLIB, "PetscHasExternalPackage() says YAML is… in main()
|
| /petsc/src/ksp/ksp/interface/ |
| H A D | itcl.c | 253 PetscBool all, flg; in KSPMonitorSetFromOptions() local
259 …scObjectComm((PetscObject)ksp), ((PetscObject)ksp)->options, prefix, opt, &viewer, &format, &flg)); in KSPMonitorSetFromOptions()
260 if (!flg) PetscFunctionReturn(PETSC_SUCCESS); in KSPMonitorSetFromOptions()
340 PetscBool flg, flag, reuse, set; in KSPSetFromOptions() local
356 …ar *)(((PetscObject)ksp)->type_name ? ((PetscObject)ksp)->type_name : KSPGMRES), type, 256, &flg)); in KSPSetFromOptions()
357 if (flg) PetscCall(KSPSetType(ksp, type)); in KSPSetFromOptions()
366 …or_cancel", "Remove any hardwired monitor routines", "KSPMonitorCancel", PETSC_FALSE, &flg, &set)); in KSPSetFromOptions()
367 if (set && flg) PetscCall(KSPMonitorCancel(ksp)); in KSPSetFromOptions()
378 … initial guess", "KSPSetInitialNonzero", ksp->guess_zero ? PETSC_FALSE : PETSC_TRUE, &flag, &flg)); in KSPSetFromOptions()
379 if (flg) PetscCall(KSPSetInitialGuessNonzero(ksp, flag)); in KSPSetFromOptions()
[all …]
|
| /petsc/src/vec/vec/tests/ |
| H A D | ex48.c | 112 static inline PetscErrorCode isRoot(const char path[], PetscBool *flg) in isRoot() argument
118 *flg = PetscNot(len); in isRoot()
119 if (!*flg) PetscCall(PetscStrcmp(path, "/", flg)); in isRoot()
123 static inline PetscErrorCode compare(PetscDataType dt, void *ptr0, void *ptr1, PetscBool *flg) in compare() argument
128 *flg = (PetscBool)(*(PetscInt *)ptr0 == *(PetscInt *)ptr1); in compare()
130 if (*flg) { in compare()
138 *flg = (PetscBool)(*(PetscReal *)ptr0 == *(PetscReal *)ptr1); in compare()
140 if (*flg) { in compare()
148 *flg = (PetscBool)(*(PetscBool *)ptr0 == *(PetscBool *)ptr1); in compare()
150 if (*flg) { in compare()
[all …]
|
| /petsc/src/sys/fileio/ |
| H A D | ftest.c | 24 …etscTestOwnership(const char fname[], char mode, uid_t fuid, gid_t fgid, int fmode, PetscBool *flg) in PetscTestOwnership() argument
36 *flg = PETSC_TRUE; in PetscTestOwnership()
39 *flg = PETSC_FALSE; in PetscTestOwnership()
43 if (!_access(fname, m)) *flg = PETSC_TRUE; in PetscTestOwnership()
50 …etscTestOwnership(const char fname[], char mode, uid_t fuid, gid_t fgid, int fmode, PetscBool *flg) in PetscTestOwnership() argument
102 if (fmode & rbit) *flg = PETSC_TRUE; in PetscTestOwnership()
104 if (fmode & wbit) *flg = PETSC_TRUE; in PetscTestOwnership()
106 if (fmode & ebit) *flg = PETSC_TRUE; in PetscTestOwnership()
161 PetscErrorCode PetscTestFile(const char fname[], char mode, PetscBool *flg) in PetscTestFile() argument
169 *flg = PETSC_FALSE; in PetscTestFile()
[all …]
|
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex87.c | 34 PetscBool flg[4] = {PETSC_FALSE, PETSC_FALSE, PETSC_FALSE, PETSC_FALSE}; in main() local
40 if (id == 1) PetscCall(PetscOptionsGetBool(NULL, NULL, "-empty_A11", flg, NULL)); in main()
72 PetscCall(PetscOptionsGetBool(NULL, NULL, "-transpose", flg + 1, NULL)); in main()
73 PetscCall(PetscOptionsGetBool(NULL, NULL, "-permute", flg + 2, NULL)); in main()
74 PetscCall(PetscOptionsGetBool(NULL, NULL, "-explicit", flg + 3, NULL)); in main()
75 if (flg[1]) { in main()
76 if (flg[2]) { in main()
80 if (!flg[3]) PetscCall(MatCreateTranspose(A[2 - flg[2]], A + 1 + flg[2])); in main()
81 else PetscCall(MatTranspose(A[2 - flg[2]], MAT_INITIAL_MATRIX, A + 1 + flg[2])); in main()
83 if (flg[2]) { in main()
[all …]
|
| H A D | ex76.c | 20 PetscBool flg, set, transpose = PETSC_FALSE, explicit = PETSC_FALSE; in main() local
70 flg = PETSC_FALSE; in main()
71 PetscCall(PetscOptionsGetBool(NULL, NULL, "-pc_hpddm_levels_1_st_share_sub_ksp", &flg, &set)); in main()
72 if (flg) { /* PETSc LU/Cholesky is struggling numerically for bs > 1 */ in main()
82 …cCall(PetscOptionsFList("-mat_type", "Matrix type", "MatSetType", MatList, type, type, 256, &flg)); in main()
91 flg = PETSC_FALSE; in main()
92 PetscCall(PetscOptionsGetBool(NULL, NULL, "-reset", &flg, NULL)); in main()
93 if (flg) { in main()
102 flg = PETSC_FALSE; in main()
103 PetscCall(PetscOptionsGetBool(NULL, NULL, "-set_rhs", &flg, NULL)); in main()
[all …]
|
| /petsc/src/sys/classes/draw/tests/ |
| H A D | ex3.c | 19 PetscBool useports, flg; in main() local
37 PetscCall(PetscOptionsHasName(NULL, NULL, "-nolegend", &flg)); in main()
38 if (flg) legend = NULL; in main()
39 PetscCall(PetscOptionsHasName(NULL, NULL, "-notoplabel", &flg)); in main()
40 if (flg) toplabel = NULL; in main()
41 PetscCall(PetscOptionsHasName(NULL, NULL, "-noxlabel", &flg)); in main()
42 if (flg) xlabel = NULL; in main()
43 PetscCall(PetscOptionsHasName(NULL, NULL, "-noylabel", &flg)); in main()
44 if (flg) ylabel = NULL; in main()
45 PetscCall(PetscOptionsHasName(NULL, NULL, "-nolabels", &flg)); in main()
[all …]
|
| /petsc/src/mat/utils/ |
| H A D | multequal.c | 9 static PetscErrorCode MatMultEqual_Private(Mat A, Mat B, PetscInt n, PetscBool *flg, PetscInt t, Pe… in MatMultEqual_Private() argument
26 PetscAssertPointer(flg, 4); in MatMultEqual_Private()
49 *flg = PETSC_TRUE; in MatMultEqual_Private()
101 *flg = PETSC_FALSE; in MatMultEqual_Private()
116 static PetscErrorCode MatMatMultEqual_Private(Mat A, Mat B, Mat C, PetscInt n, PetscBool *flg, Pets… in MatMatMultEqual_Private() argument
135 PetscAssertPointer(flg, 5); in MatMatMultEqual_Private()
170 *flg = PETSC_TRUE; in MatMatMultEqual_Private()
196 *flg = PETSC_FALSE; in MatMatMultEqual_Private()
233 PetscErrorCode MatMultEqual(Mat A, Mat B, PetscInt n, PetscBool *flg) in MatMultEqual() argument
236 PetscCall(MatMultEqual_Private(A, B, n, flg, 0, 0)); in MatMultEqual()
[all …]
|
| /petsc/src/vec/is/is/utils/ |
| H A D | iscomp.c | 35 PetscErrorCode ISEqual(IS is1, IS is2, PetscBool *flg) in ISEqual() argument
46 PetscAssertPointer(flg, 3); in ISEqual()
49 *flg = PETSC_TRUE; in ISEqual()
55 *flg = PETSC_FALSE; in ISEqual()
61 if (sz1 != sz2) *flg = PETSC_FALSE; in ISEqual()
88 PetscCallMPI(MPIU_Allreduce(&flag, flg, 1, MPI_C_BOOL, MPI_LAND, comm)); in ISEqual()
117 PetscErrorCode ISEqualUnsorted(IS is1, IS is2, PetscBool *flg) in ISEqualUnsorted() argument
128 PetscAssertPointer(flg, 3); in ISEqualUnsorted()
131 *flg = PETSC_TRUE; in ISEqualUnsorted()
137 *flg = PETSC_FALSE; in ISEqualUnsorted()
[all …]
|